If BLock wird ignoriert

[NinaG]

Hallo,

In meinem VBA-Code wird in einem If-Block anscheinend jedesmal erst der Code ausgeführt, der für erfüllte Bedinung ist und danach jedesmal der Code für unerfüllte Bedinung. Also so als ob kein If-Block da wäre und die Anweisungen einfach nacheinander ausgeführt werden sollten.
Habe den Code jetz auf 2 Arten versucht:
1. (hier habe ich jedesmal hinterher 0):

Code [Auswählen] Erweitern

If Not (rs2!Betrag = Null) Then
     BestellungBetrag = CCur(rs2!Betrag)
Else
     BestellungBetrag = 0
End If

2. (hier bekomme ich, falls rs2!Betrag=Null ist eine fehlermeldung im else block, wegen unzulässiger verwendung von null):

Code [Auswählen] Erweitern

If rs2!Betrag = Null Then
     BestellungBetrag = 0
Else
     BestellungBetrag = rs2!Betrag
End If

Hat irgendjemand eine Idee, warum das passiert?
Danke für eure Hilf im voraus.

[el_gomero]

Hallo,

solche Codefragmente sind wenig hilfreich. Bitte die ganze Prozedur posten, ggf mit den Werten von Übergabeparametern.

[MaggieMay]

Hi,

Code [Auswählen] Erweitern

If rs2!Betrag = Null Then

auf NULL wird folgendermaßen abgefragt:

Code [Auswählen] Erweitern

If IsNull(rs2!Betrag) Then