Ciao a tutti
sto realizzando un programma di gestione cliente ed ho fatto un modulo in cui mettere tutte le funzioni.

ho fatto una funzione
che controlla la correttezza dell'email..in maniera +ttosto grossolana magari..cmq...

Public Sub controlla(valore)
If InStr(1, valore, "@") > 0 Then
Chiocciola = 1
End If

If InStr(1, valore, ".") > 0 Then
punto = 1
End If

If punto <> 1 Or Chiocciola <> 1 Then
MsgBox ("Email Errata")
TxtEmail.Text = ""
TxtEmail.SetFocus
End If
End Sub
Mi da un errore su TxtEmail.text ??
se scrivo form1.txtEmail.text="" è giusto me lo prende; ma il problema mi nasce dal fatto che tale funzione la utilizzo su + form.....
come posso fare.?
spero di essere stato chiaro.