06. december 2004 - 13:02Der er
3 kommentarer og 1 løsning
Filter funktion
Hej,
Når jeg kører mit nedestående kode, så virker alt fint, bortset fra at når jeg beder den lave filter på et postnummer som ikke står i basen og jeg så skal indtaste et andet tal, brokker den sig over at feltet Inputfelt mangler fokus. Debuggeren stopper dér hvor den tjekker længden af feltet.
Private Sub Inputfelt_Change() If Len(Me.Inputfelt.Text) = 4 Then Me.Filter = "[Postnr] = '" & Me.Inputfelt.Text & " '" Me.FilterOn = True Else Me.FilterOn = False End If Me.Inputfelt.SetFocus
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
dim Vara as string VARa = Me.Postnr If DCount("*", "TABELNAVN", "[Postnr] =" & VARa) =0 Then MsgBox "Der er ingen poster med denne værdi." Exit sub If Len(Me.Inputfelt.Text) = 4 Then Me.Filter = "[Postnr] = '" & Me.Inputfelt.Text & " '" Me.FilterOn = True Else Me.FilterOn = False End If Me.Inputfelt.SetFocus
Når jeg prøver at køre din kode, så stopper den ved "Me.FilterOn = True" og siger "Du har annulleret den forrige handling".
Også selvom jeg rettede den anden fejl i koden, den med VARa til Me.Inputfelt.Text
Synes godt om
Ny brugerNybegynder
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.
