Condition dans IF toujour incorrect VB

Résolu/Fermé
Baker - 15 févr. 2008 à 14:31
 Baker - 15 févr. 2008 à 15:00
Bonjour,
Voila j'ai petit probleme avec un if.

Private Sub bouton_devis1_Click() 'nouveau devis
Dim Dev as long
Dim strReq As Variant

Dev = InputBox("Saisir le numero du devis", "Nouveau devis")

If Dev <> 0 Then
strReq = DLookup("N_DEVIS", "DEVIS", "N_DEVIS=" & Dev)
If strReq = "" Then

dans la derniére ligne le la condition du if est toujour fausse même lorque strReq = null

d'ou vien ce probeme??

merci de votre aide
A voir également:

4 réponses

Darkito Messages postés 1191 Date d'inscription vendredi 7 décembre 2007 Statut Membre Dernière intervention 26 mai 2010 545
15 févr. 2008 à 14:41
Bonjour,
tu peux essayer avec les fonctions isnull et isempty
0
Bonjour

if est toujour fausse même lorque strReq = null
Quoi de plus normal ? "" et null, ça n'est pas la même chose, il n'y a aucune raison que visual basic les trouve égaux.
0
WhiteFang Messages postés 2056 Date d'inscription dimanche 1 septembre 2002 Statut Membre Dernière intervention 15 février 2008 204
15 févr. 2008 à 14:56
;-) Essaie déjà de remplacer le second If par un ElseIf... (sans oublier les "EndIf" !!! A chaque "If, faut un "End If" !)

Ou lance toi dans le "Select Case".... (plus puissant à mon avis quand il s'agit de traiter des cas multiples...)

;-)

PS : Ce petit bout de code me semble pompé d'un exemple tout fait, non ?

Sinon, bon, je serais toi, je ferais une forme (une boîte de dialogue), au lieu d'un InPutBox, ça sera plus facile à gérer (au niveau de la zone de texte et de son contenu - .Text-), avec un petit .Show quelque part et un .UnLoad quand c'est bon....

;-)
0
Merci bien Darkito ca fonctione avec isnull
0