ne meno cosi va

Private Sub Command1_Click()
Dim text1 As String
If text1 = ciro Then
MsgBox ottimo
Else
MsgBox ma
End If
End Sub