Arama butonu
Bu konudaki kullanıcılar: 1 misafir, 1 mobil kullanıcı
1
Cevap
1577
Tıklama
0
Öne Çıkarma
visual basic windows media player sesi ekran üstünde sayısal gösterme yardım???
K
14 yıl
Onbaşı
Konu Sahibi

arkadaşlar ben basic 10 da wmp yapmak istiyorum ancak eklentisinden özellikleri kaldırdım kendi tuşlarımı eklemek istiyorum,,,
şimdi benim sorum ses için ScrollBar koydum sesi ayarladım ve ScrollBar içinde sayısal değerini göstermesi için label koydum ve
bağladım ancak ses ekranda sırıtmaya başladı,
1.)önce bu labelin medya oynamasında BackColor kısmını şeffaf yapmak
2.)labelin sayısal değeri Sesi açarken yada kapatırken göstermesi herhangi bir ScrollBar olayı yani ses ayarı yapmıyorken
kaybolması(hide olması)
şu ana kadar kullandığım kodlar şu şekilde
************************************************** *****
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
HScrollBar1.Value = 50
'Label1.Parent = AxWindowsMediaPlayer1
'Label1.BackColor = Color.Transparent '(bu kısım wmp oynatma yaparken malesef hiçbirşey görünmüyor burayı demeyin)
End Sub

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
AxWindowsMediaPlayer1.URL = TextBox1.Text
End Sub
Private Sub HScrollBar1_Scroll(sender As System.Object, e As System.Windows.Forms.ScrollEventArgs) Handles
HScrollBar1.Scroll
ToolTip1.SetToolTip(HScrollBar1, HScrollBar1.Value.ToString())
AxWindowsMediaPlayer1.settings.volume = HScrollBar1.Value
Label1.Text = HScrollBar1.Value * 1
End Sub
 
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
AxWindowsMediaPlayer1.Ctlcontrols.play()
End Sub
Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
AxWindowsMediaPlayer1.Ctlcontrols.stop()
End Sub
End Class
************************************************** **
arkadaşlar yardımlarınızı bekliyorum....!!!!

< Resime gitmek için tıklayın >

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil



A
14 yıl
Er

hocam ben süleyman karşı lojmandan :D
ikinci sorunuzun cevabı bende :D

Private Sub TrackBar1_MouseLeave(sender As Object, e As System.EventArgs) Handles TrackBar1.MouseLeave
Label2.Visible = False
End Sub
Private Sub TrackBar1_MouseMove(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles TrackBar1.MouseMove
Label2.Visible = True
End Sub

bu kodu yazarsanız sadece trackbara mause geldiğinde sayı görülür



DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.