I am trying to set up a button to that when you click it, it will clear the text in a certain textbox.
I tryed to motify a previous code but it didn't work:

Private Sub cleartext_Click()
If inputtext.SelText = "" Then
Clear.SetText inputtext
Else
Clear.SetText inputtext.SelText
End If
End Sub

But that didnt work, but I took a shot...

Know whats wrong?

Thanks,
System