Visual Basic 6 - Errore condizione if

allora ho un problema con questa sequenza

Private Sub Command1_Click()
Dim ascissa As Long
Dim ordinata As Long
Dim nickname As String

ascissa = 1650
ordinata = 10

cont = 0

If txt1.Text <> "marco" And txt2.Text < 18 Then
mouse_event MOUSEEVENTF_LEFTDOWN + MOUSEEVENTF_LEFTUP, ascissa, ordinata, 0, 0
SetCursorPos ascissa, ordinata
else

End If
end sub
allora il programma mi parte a meta se io metto dei valori ad txt1 e txt2 tutto apposto funziona bene
ma se io lascio la txt1 e txt2 vuota mi fa errore
io vorrei che se la txt 1 e 2 fossero vuote il programma finirebbe li senza risultarmi errore come posso fare plis aiuto

"Mi fa errore" che vuol dire? Quale errore?

E poi togli quella else che non serve a nulla

Cose da fare:
1. Imparare l'Italiano
2. Spiegare ***bene*** dove ti da errore, cosa dice l'errore
3. Non cè nessuna ragione nel codice che hai postato per cui dovrebbe darti errore, quindi posta il codice completo
4. Il codice va tra [ code ] e [/ code ]!!!

Ciao , sono un principiante ,ma vorrei dire la mia!
Non puoi risolvere aggiungendo due and ?

 If txt1.Text <> "marco" And txt2.Text < 18  and txt1.tx t<> "" and txt2.txt <> ""  Then 

oppure:

 If txt1.Text <> "marco" And txt2.Text < 18  and len(txt1.txt)> 0 and len(txt2.txt)> 0  Then 

Da l'esempio sembra anche che ci sia un else che non faccia niente , sembra inutile!