les valeurs nulles - VB/VBA/VBS - Programmation
Marsh Posté le 25-03-2003 à 10:23:16
Merci pour ton aide mais maintenant, j'ai un autre problème - voici mon code:
If CodeBar.Text = "" Then
ElseIf IsNull(Me![DateEmprunt]) Then
DateEmprunt.Value = Date
MsgBox "Vous empruntez un soft"
ElseIf Not IsNull(Me![DateEmprunt]) Then
DateRetour.Value = Date
MsgBox "Vous rendez un soft"
MsgBox "Fin du test de DateEmprunt"
End If
En fait, je dois m'y prendre à deux fois pour que la base enregistre mon emprunt... c'est donc pas très pratique! Je suis toute ouïe à vos propositions!
Marsh Posté le 25-03-2003 à 11:06:19
J'aurais codé comme ça ...
If CodeBar.Text <> "" Then
DateEmprunt.Value = Date
If IsNull(Me![DateEmprunt]) Then
MsgBox "Vous empruntez un soft"
Else
MsgBox "Vous rendez un soft"
end if
MsgBox "Fin du test de DateEmprunt"
End If
Marsh Posté le 25-03-2003 à 11:09:21
Merde j'ai pas vu que cette chaine
était <> donc ...
If CodeBar.Text <> "" Then
If IsNull(Me![DateEmprunt]) Then
DateEmprunt.Value = Date
MsgBox "Vous empruntez un soft"
Else
DateRetour.Value = Date
MsgBox "Vous rendez un soft"
end if
MsgBox "Fin du test de DateEmprunt"
End If
Marsh Posté le 25-03-2003 à 11:18:30
vttman2 a écrit : J'aurais codé comme ça ... |
En bon français: Si CodeBar.Text est différent alors mettre la date d'aujourd'hui dans le champ DateEmprunt et ensuite, Si DateEmprunt est null, mettre le mess "Vous empruntez un soft".
Ma question/remarque: rien qu'en changeant le champs codeBar, il inscrit dérectement la date actuelle dans le champ DateEmprunt et après il va tester ce mm champ pour savoir s'il est null(pas possible vu qu'il vient d'y mettre la date actuelle)... il y a un hic là, non?
Ne pas oubler que si le champ DateEmprunt n'est PAS Null, la base doit mettre la date actuelle dans le champ DateRetour(pour montrer qu'il est donc retourné au centre de prêt)...
Marsh Posté le 25-03-2003 à 12:59:37
vttman2 a écrit : Merde j'ai pas vu que cette chaine |
ok je comprends mieux là... je teste!
Marsh Posté le 25-03-2003 à 20:46:27
C'est exactement le même code, y'a juste que dans un cas, y'a un if et elseif dans lequel on fait les traîtements, et l'autre, deux if imbriqués, ce qui revient exactement au même
Marsh Posté le 25-03-2003 à 09:50:05
A ceux qui connaissent:
En VBA, j'ai créé une condition IF et testant si le champs "x" est null alors mettre "y" dedands.
Mais maintenant, j'aimerais faire le contraire, c'est-à-dire:
SI le champ "x" nest pas null alors mettre "y" dedans.
Le problème, le voici: qqun sait comment coder ce "n'est pas null" en VBA??
Merci pour vote futur aide!
---------------
Le bien ou le mal, l'homme ou l'animal, on ne voit jamais l'un sans l'autre