Visual Basic 6 - Metodo setfocus

Ciao a tutti, avrei una domanda: Posso usare il metodo setfocus in un condizionale? mi spiego meglio.Ho una textbox che al suo interno deve visualizzare 0 (zero) sempre. Io devo fare in modo che, quando lo stato della textbox passa ad attivo (e solo in quel caso) lo zero deve sparire.Ovviamente vale anche il contrario, se lo stato è non attivo lo zero deve ritornare.
Io ho pensato questo:

Private Sub Timer1_Timer()
if text1.setfocus then
text1.text = "" Else
text1.text=0
end if

Ma così mi dice "function o variabile non definita", come posso fare. Grazie in anticipo a tutti.

Se ho capito quello che vuoi fare, devi scrivere

Private Sub Text1_GotFocus()
    Text1.Text = ""
End Sub

Private Sub Text1_LostFocus()
    Text1.Text = "0"
End Sub

senza timer ...

Capito alla perfezione

sarò ripetitivo ma sei un grande.
Grazie mille