Avatar billede mlhave Nybegynder
29. december 2003 - 12:12 Der er 2 kommentarer og
1 løsning

Check på om et felt er tomt

Hvad er der galt her.
Jeg forsøger at lave en knap der skal åbne en anden form, men inden den gør det skal den undersøge om et felt på formen indeholder en værdi. Hvis der ikke er en værdi i det felt skal proceduren stoppe.

Her er koden:

Private Sub cmdVisNiveau1_Click()
On Error GoTo Err_cmdVisNiveau1_Click

    Dim stDocName As String
    Dim stLinkCriteria As String
    Dim bCheck As Boolean

    Me.Repaint
   
    bCheck = IsEmpty(Me![GLevel1])

    If bCheck = False Then
        MsgBox "The field is empty, so it is not possible to go to next level", vbInformation
        Exit Sub
    End If

    stDocName = "frmGeografiVedligeholdLand"
   
    stLinkCriteria = "[LandNr]=" & Me![LandNr]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdVisNiveau1_Click:
    Exit Sub

Err_cmdVisNiveau1_Click:
    MsgBox "The field is empty, so it is not possible to go to next level", vbInformation
    Resume Exit_cmdVisNiveau1_Click
   
End Sub
29. december 2003 - 12:15 #1
Læg denne funktion i et modul og brug herefter funktionen Tom til at checke om et felt er tomt:

Function Tom(MyControl As Control) As Integer
    Tom = False

    If IsNull(MyControl) Then
        Tom = True
    Else
        If MyControl = "" Then
            Tom = True
        End If
    End If
End Function



Eks:
bCheck = Tom(Me![GLevel1])
29. december 2003 - 12:16 #2
eller blot:

If Tom(Me![GLevel1])= False Then
        MsgBox "The field is empty, so it is not possible to go to next level", vbInformation
        Exit Sub
End If
Avatar billede mlhave Nybegynder
29. december 2003 - 12:22 #3
Takker :o)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester