Recherche
Recherche
Les mémos
Je débute...
Visites

 994650 visiteurs

 2 visiteurs en ligne

FAQ
Déplier Fermer  Comment faire...

Utiliser la fonction StrPtr() qui renvoie l'adresse de la variable


Dim sInput As String

sInput = InputBox("Allons y ... testez-moi", "Demo InputBox")

If StrPtr(sInput) = 0 Then

MsgBox "Vous avez annulé..."

Else

If Len(sInput) = 0 Then
MsgBox "Vous avez appuyé sur OK, mais sans saisie."
Else
MsgBox "Vous avez appuyé sur OK, la valeur est : " & sInput
End If

End If


Dernière modification :02/02/2007 : 07:12 Hyperlien