Jump to content
Fórum Script Brasil
  • 0

Ajuda


sangrento55

Question

Ola galera e o seguinte eu tenho um player padrão do VB 2013 e eu jogo muito e queria o atalho do teclado para dar play e pause no player sem ter que sair do jogo

então eu uso:

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If My.Computer.Keyboard.AltKeyDown Then
AxWindowsMediaPlayer1.Ctlcontrols.play()
Else
AxWindowsMediaPlayer1.Ctlcontrols.stop()
End If
End Sub 

So que tem hora q esse não funciona, se você deixar em pause muito tempo.

E queria usar o botão "Play" do teclado mas não funciona de jeito nem um, se alguém puder me ajudar.

Obs o Keypreview já esta como True.

Obrigado desde já

Link to comment
Share on other sites

1 answer to this question

Recommended Posts

  • 0

Tenta fazer diferente..

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If My.Computer.Keyboard.AltKeyDown Then
AxWindowsMediaPlayer1.Ctlcontrols.play()
Elseif My.Computer.Keyboard.Outra Key Then
AxWindowsMediaPlayer1.Ctlcontrols.stop()
End If
End Sub 

Talvez funcione..

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152.2k
    • Total Posts
      652k
×
×
  • Create New...