Sub MioThread() My.Computer.Audio.Play("C:\suoni\accord.wav", AudioPlayMode.BackgroundLoop) End Sube gli faccio eseguire il codice del suonare la musica di sottofondo.
Alla fine ho risolto il problema. I thread non c'entrano nulla, in questo caso:
Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click My.Computer.Audio.Play("C:\suoni\accord.wav", AudioPlayMode.BackgroundLoop) End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click If DirectCast(sender, Button).Text <> "PUGNO" Then DirectCast(sender, Button).Text = "PUGNO" Else DirectCast(sender, Button).Text = "SCORREGGIA" End If End Sub End Class
Nessun commento:
Posta un commento