[.NET] 在MDI內重複開啟影片

看板Visual_Basic作者seclusive (the farest path)時間11年前 (2014/05/07 11:35)推噓2(2推 0噓 1→)

留言3則, 2人參與討論串1/1

請輸入專案類型(網站專案或者應用程式專案)：VB.NET 目前想寫出來的功能是間格時間timer1後啟動video來呼叫media player播放影片以及啟動words來呼叫字幕在按下button1後過timer2後會再次啟動timer1 並重複撥放影片跟字幕但我目前第一次撥放OK 但timer2啟動timer1後卻無法成功呼叫video跟words來撥放不知道問題是卡在哪邊 >"< 還煩請各位前輩指教 m(_ _)m Public Class SaveScreen Dim count1 As Integer = 0 '計算timer1次數 Dim count2 As Integer = 0 '計算timer2次數 Dim Video As New MediaPlayer 'Call Mediaplayer播放 Dim words As New Labeluse Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load Video.MdiParent = Me words.MdiParent = Me End Sub Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick MessageBox.Show("Timer1 started") Timer1.Enabled = False Video.Show() words.Show() End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Video.Close() words.Close() PictureBox1.Image = Image.FromFile("C:\Users\Adrian\Desktop\DSC_0001.jpg") Timer2.Enabled = True MessageBox.Show("Timer2 start, plz wait 5 seconds.") End Sub Private Sub Timer2_Tick(sender As Object, e As EventArgs) Handles Timer2.Tick MessageBox.Show("Timer2 started.") Timer2.Enabled = False Timer1.Enabled = True MessageBox.Show("Timer1 start, plz wait 5 seconds.") End Sub End Class -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.240.66.241 ※ 文章網址: http://www.ptt.cc/bbs/Visual_Basic/M.1399433755.A.B11.html