Zichtbaar/ Onzichtbaar

[OctaFish]

Ik had het email adres gisteravond weggehaald, want anders staat hij daar zo lang.
Als je het email adres nog nodig hebt, hoor ik 't wel.

 

[michaelmalines]

Ja liefst, want ik wil echt die database in orde krijgen

alvast bedankt

 

[OctaFish]

Met deze code moet het werken:

Private Sub Vr1A98n_AfterUpdate()
    If Nz(Me.Vr1A98n, "") <> "" Then
        If IsNumeric(Vr1A98n) Then
            If Val(Vr1A98n) = 98 Then
                Vr1A98.Visible = True
            Else
                Vr1A98.Visible = False
            End If
        Else
            Vr1A98.Visible = False
        End If
    Else
        Vr1A98.Visible = False
    End If
End Sub

Hiermee wordt het veld gecontroleerd op:
1. istie leeg? Ja? dan verbergen
2. isut een getal? Ja? Is het 98? Ja? dan tonen, anders verbergen

 

[michaelmalines]

Raar maar waar, maar zelfs uw database werkt niet weet echt niet wat ik fout doe of wat er schelt, na het invullen van 98 moet ik iets drukken of zo? ik doe gewoon tab of enter hé

 

[OctaFish]

Ik ook, en dan komt-ie tevoorschijn, of hij verdwijnt, bij 0 of leeglaten.
Hebben we het over hetzelfde veld??
Zie plaatjes...

 

[michaelmalines]

Jaja; tga over die zelfde ... Krijg nu ineens een foutmelding hmmm

 

[OctaFish]

Controleer eens of er andere fouten in de db zitten, en of er bibliotheken ontbreken. Beide zaken regel je in het VBA scherm, waar je terecht komt als je naar Foutoplossing gaat. Je kunt er ook gelijk heen met <Alt>+<F11>.
In het VBA scherm: <Foutopsporing>, <db Compileren>. Als het goed is, doet-ie niks, maar bij fouten springt hij naar de fouten die hij tegenkomt. En die moeten worden opgelost...
Maar eerst: kijk in <Extra>, <Verwijzingen> en kijk je je dezelfde bibliotheken hebt als in bijgaand plaatje, en ook in dezelfde volgorde.

 

[michaelmalines]

Stom vraag miss, maar waar is die "extra menu" ??

grtz

 

[OctaFish]

kunt er ook gelijk heen met <Alt>+<F11>

 

[michaelmalines]

geef niets aan, en ik doe dan terug die formulier en krijg zelfde fout .. en bij mij stonden die verwijzing nie zoals op uw screen, kheb da dan zelf gedaan zo en nog steeds niets ..
mijn vba is wel in engels raar

grtz

 

[OctaFish]

Morgen maar verder naar kijken...