Private Sub Buton_Click()
If Me.Label.Visible = False Then
Me.Label.Visible = True
Me.Buton.Caption = "DENEME"
Else
Me.Label.Visible = False
Me.Buton.Caption = "DENEDİM"
End If
End Sub
Bilgisayarımdaki bir sorun nedeni ile Vb. kurulu değil, ben deneyemedim, ancak aşağıdaki kodu siz deneyebilirsiniz sanırım.