[VB/Access] Simpele code wil niet werken

[rik]

Private Sub Form_Current()

Beep

If Bedrijfsnaam.Value = Null Then
Kader28.Value = 2
Else
Kader28.Value = 1
End If

EndSub

Als ik van record naar record ga hoor ik een beep, de procedure wordt dus
wel aangeroepen.
Het kader met de twee radiobuttons switcht echter niet van waarde. Als ik
een stop zet bij Beep en dan heeft Bedrijfsnaam.Value de waarde Null, of er
staat wek een waarde in. Dat klopt dus ook.

Iemand enig idee?

[Splatter]

code:

...
If Bedrijfsnaam.Value = "" Then
...

Probeer dit eens.

[rik]

Op zondag 09 december 2001 01:55 schreef Splatter het volgende:

code:

...
If Bedrijfsnaam.Value = "" Then
...

Probeer dit eens.

Helaas, dat heeft weinig zin, dan werkt het niet meer. Begint ie over een lege string wat ie maar niks vindt.

Het zit m in het kader28.value = 2, dat pakt ie niet goed ofzo

[rik]

Ik heb het gevonden

Moest natuurlijk zijn:

[vb]
If IsNull(Bedrijfsnaam.Value) Then
Kader28.Value = 2
Else
Kader28.Value = 1
End If
[/vb]

dom dom dom