zichtbaar maken van velden met voorwaarden

[mm_the_matrix]

hallo,

ik heb 2 velden waar gezocht wordt op factuurnr

het eerste zoekt in combinatie met bedrijfsid
het andere op in combinatie met het projectid (wat dan weer aan het bedrijf is gekoppeld)
er zijn nog 2 andere velden die alleen zichtbaar mogen worden als factuurid is ingevuld.

nu ben ik er achter gekomen dat waarde Null niet wordt geaccepteerd (dus heb ik de waarde 0 als standaard waarde neergezet.

hieronder het stukje code wat ik bedacht had.
If (Forms!briefuit!projectid = 0) And (Forms!briefuit!factuurnr = 0) Then
Form!fac1.Visible = False
Form!fac2.Visible = True
Form!looptijd.Visible = False
Form!einddatum.Visible = False
Else
If (Forms!briefuit!projectid = 0) And (Forms!briefuit!factuurnr = Not 0) Then
Form!fac1.Visible = False
Form!fac2.Visible = True
Form!looptijd.Visible = True
Form!einddatum.Visible = True
Else
If (Forms!briefuit!projectid = Not 0) And (Forms!briefuit!factuurnr = 0) Then
Form!fac1.Visible = True
Form!fac2.Visible = False
Form!looptijd.Visible = False
Form!einddatum.Visible = False
Else
Form!fac1.Visible = True
Form!fac2.Visible = False
Form!looptijd.Visible = True
Form!einddatum.Visible = True
End If
End If
End If

maar nu blijkt vba ook niet met Not overweg te kunnen wie verteld me hoe ik dit op moet lossen.

als ik ipv "not 0" 1 neerzet werkt het wel (maar daar heb ik dus niets aan)

 

[mm_the_matrix]

If (Forms!briefuit!projectid = 0) Then
If (Forms!briefuit!factuurnr = 0) Then
Form!icontact.Visible = True
Form!iaq.Visible = True
Form!iproject.Visible = True
Form!fac2.Visible = True
Form!fac1.Visible = False
Form!looptijd.Visible = False
Form!einddatum.Visible = False
Else
Form!icontact.Visible = True
Form!iaq.Visible = True
Form!iproject.Visible = True
Form!fac2.Visible = True
Form!fac1.Visible = false
Form!looptijd.Visible = true
Form!einddatum.Visible = true
Else
If (Forms!briefuit!factuurnr = 0) Then
Form!icontact.Visible = True
Form!iaq.Visible = True
Form!iproject.Visible = True
Form!fac2.Visible = false
Form!fac1.Visible = true
Form!looptijd.Visible = False
Form!einddatum.Visible = False
Else
Form!icontact.Visible = True
Form!iaq.Visible = True
Form!iproject.Visible = True
Form!fac2.Visible = True
Form!fac1.Visible = False
Form!looptijd.Visible = true
Form!einddatum.Visible = true

werkte overgens ook niet omdat hij over die else in het midden overspringt

 

[Guus2005]

not 0 is dus eigenlijk alle waarden ongelijk aan 0 dus

...
If (Forms!briefuit!projectid <> 0) And (Forms!briefuit!factuurnr = 0) Then
...

Enjoy!

 

[mm_the_matrix]

zucht...

toen ik dat probeerde kreeg ik een foutmelding...

toen ik jou voorbeeld toepaste ook...

maar toen ik goed keek bleek ik de = te hebben laten staan.

Hartelijk dank.