VB6 Password e problema

[sebamix]

Originariamente inviato da Cina76
Oppure prova cosi'

dim risposta as string
risposta=MsgBox "Password Errata ritentare l'inserimento",vbyesno,app.exename
if risposta=vbyes then
txtPassword=""
txtUtente=""
txtPassword.setfocus
else
exit sub
end if

MsgBox ritorna un tipo preciso di dati! (vbMsgBoxResult)!
Poi in questo caso non occorre assegnare una variabile al MsgBox perchè tanto i risultati possibili sono solo 2.
Quindi

if msgbox("Password errata." & vbCrLf & "Ritentare?", vbYesNo + vbQuestion, "Attenzione ...")=vbYes Then
   txtPassword=""
   txtUtente=""
   txtPassword.setfocus
Else
  Exit Sub
End if

Ah, usa i tag code e /code così il codice ti viene formattato.