Condition dans IF toujour incorrect VB

Résolu
Baker -  
 Baker -
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   Statut Membre Dernière intervention   545
 
Bonjour,
tu peux essayer avec les fonctions isnull et isempty
0
le père
 
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 2063 Date d'inscription   Statut Membre Dernière intervention   204
 
;-) 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
Baker
 
Merci bien Darkito ca fonctione avec isnull
0