Strumenti
picturebox = quante ne volete
button = 1
Label = 3
Codici
Private Sub Form1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseEnter
If Button1.Enabled = False Then MsgBox("Hai perso!")
Me.Close()
End If
Private Sub Label1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.MouseEnter
MsgBox("Hai vinto sbloccato livello 2")
Form2.Show()
Me.Hide()
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Label1.Enabled = True Button1.Enabled = False
1 commento:
wow!
Posta un commento