Ciao a tutti ho due pulsnati e una casella di testo.

Premendo il pulsnate 1 devo scrivere un valore nella casella di testo(ok)
Premo il pulsante 2 e imposto che una variabile =si
se questo viene verificato il contenuto della casella di testo deve ripartire da zero se riprmo il pulsante 1

uso il seguente codice

codice:
Private Sub Command1_Click()
If valore = "si" Then
Text1.Text = ""
Else
Text1.Text = Text1.Text & ciro
valore = "no"

End If
End Sub

Private Sub Command5_Click()
Dim valore As String
valore = "si"


Print valore

End Sub