Zone nule

vincent

Code:

Private Sub boun_Click()
If zone >= 1 Then
Dim a, b As Integer
a = Qté
b = zone
If a >= b Then
a = a - b
Else
MsgBox "Opération Impossible!", 16, "Erreur"
End If
Quantité = a
Qté.Visible = True
zone = ""
Else
MsgBox "Insérer une quantitée", 16, "Erreur"
End If

End Sub

alors les pros de la prog !
comment fait t'on pour detecter que mon entrée "zone" n'a aucune valeur tapé c'est a dir " " non pas " 0 "

_________________
Amicalement
vincent

kaloo

J'ai jamais fais de VB, mais dans la plupart des langages on fais comme ça:

si c'est un string (chaine de caracteres pas la culotte)

Code:

if zone == "" then ...

si c'est un pointeur (je sais meme pas s'il y en a en VB...)

Code:

if zone == null then ...

(j'ai pris en compte que tu cherchais a detecter une donnée vide "" et non un espace " ")

_________________

Pourquoi contredire une femme ? Il est tellement plus simple d'attendre
qu'elle change d'avis ! Jean Anouilh[/