codice:
Private Sub Command1_Click()
  sss Text1()
End Sub
stesso errore su sss text1()