[VB6] gestione orrori

[19semplicemente]

ho inserito un un drivelistbox il seguente codice...

------------------------------
Private Sub Drive1_Change()
On Error GoTo gestione

Dir1.path = Drive1.Drive

gestione:
MsgBox ("Vuoto!")
Exit Sub

End Sub
-------------------------------

praticamente volevo evitare
che ogni volta ke qualcuno clicca su
a:
e non c'è il floppy il programmi crasci.

purtroppo però.. o scelgo a: o scelgo c: mi viene sempre visualizzato il msgbox!!!


un'altra cosa.. perchè se scrivo:
MsgBox ("Vuoto!",vbOK, "Errore")

devo per forza euguagliarlo a qualcosa??
cioè x = msg("ecc ecc...")?

[Sypher]

Originariamente inviato da 19semplicemente
ho inserito un un drivelistbox il seguente codice...

------------------------------
Private Sub Drive1_Change()
On Error GoTo gestione

Dir1.path = Drive1.Drive

gestione:
MsgBox ("Vuoto!")
Exit Sub

End Sub
-------------------------------

praticamente volevo evitare
che ogni volta ke qualcuno clicca su
a:
e non c'è il floppy il programmi crasci.

purtroppo però.. o scelgo a: o scelgo c: mi viene sempre visualizzato il msgbox!!!


un'altra cosa.. perchè se scrivo:
MsgBox ("Vuoto!",vbOK, "Errore")

devo per forza euguagliarlo a qualcosa??
cioè x = msg("ecc ecc...")?

mmm per il secondo punto credo ti basti togliere le parentesi

[Sypher]

per il primo metti l'exit sub prima dell'etichetta "gestione:" altrimenti lo esegue sempre

[19semplicemente]

grazie

[cassano]

oppure puoi usare on error resume next che ignorera l'errore procedendo con la riga di codice successiva