[Resolvido] Problemas com código Vb.net para Vb6

[By Pedro 0]

ae galera do forum.. tudo bem?

bom eu estou criando uma aplaicação para controlar o volume de um activex media player

 

 

encontrei um exemplo em vb.net mas estou programando em vb 6

 

alguem poderia "converter" este código para vb6 pra mim

 

sendo que ele tipo irá pegar o valor atual do scroll e repassará para o componente activex

 

 

aqui vai o código

Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll
		' So we can see the value of our trackbar
		Label1.Text = TrackBar1.Value

		' Set the media player volume accordingly (we multiply by 10 because its on a 1-100
		' scale and our ticks, by default, is 10 ticks)
		' If you want finer control you can set the trackbar from 1 - 100 and then you won't
		' need to multiply at all.
		MediaPlayer1.settings.volume = TrackBar1.Value * 10
End Sub

[quintelab 91]

Movido Plataforma .NET http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Visual Basic

[scorpio 7]

Qual componente você usa?

[By Pedro 0]

estou utilizando wmp.dll

 

 

existe alguma outra melhor??? pois estou desenvolvendo um player executavel de streaming

[By Pedro 0]

Somente essa função de controle de volume.

O resto ja fiz.

Mute

play

stop

pause

[scorpio 7]

Acho que você quer um controle slider.

 

Coloque ele na tela e no evento scroll

 

Private Sub Slider1_Scroll()
WindowsMediaPlayer1.settings.volume = Slider1.Value
End Sub

Isso ?

[By Pedro 0]

se for só isso eu vo fica mto puto e mto feliz ao mesmo tempo =] vo testa aki vlw

[By Pedro 0]

cara consegui o que tava querendo MUITO OBRIGADO MESMO.

 

VLW

[scorpio 7]

parabéns cara!..

 

flw