Daha fazlası için : http://programderslerim.blogspot.com/
Hoşgeldiniz arkadaşlar.Bu konumda sizlere VB'de Video Bittiğinde Kodun Aktif Olması'nı anlatacağım.Yapımı gerçekten çok basit.
Kendimize bir form oluşturup bu elemanları ekliyoruz :
Formumuza Eklenecekler:
- 1 Tane Media Player
- 1 Tane Label
- 2 Tane Timer
Timerlere tıklıyoruz ve properties bölümünden ayarları bunun gibi yapıyoruz :
Enabled = True
Interval = 1000
Timer1'e çift tıklayarak kod bloğuna giriyoruz ve bu kodu yazıyoruz :
Label1.Text = Label1.Text + 1
Timer2'ye çift tıklayarak kod bloğuna giriyoruz ve bu kodu yazıyoruz :
If Label1.Text = "10" Then AxWindowsMediaPlayer1.Ctlcontrols.stop() MsgBox("http://programderslerim.blogspot.com/", MsgBoxStyle.Information) End If
Bu kodda Label1.Text = "10" Kodunda 10 yazan yere videonun saniye cinsinden uzunluğunu yazın.
Kodun işlevi media player 10 saniye olunca video duracak ve mesaj olarak http://programderslerim.blogspot.com/ yazacak.
Unutmayın,bilmediğiniz şeyi sevemessiniz.Programlama dilinide bizimle seveceksiniz.Takipte kalın..
0 yorum:
Yorum Gönder