19. august 2002 - 19:21Der er
19 kommentarer og 1 løsning
Fejlkontrol i VBA i Access
Jeg har en stump vba kode der beregner indholdet af nogle felter ud fra hvad der dels er tastet ind af brugeren og dels hvad der slåes op i databasen. Hvis de felter der indgår i beregningen ikke er tastet ind og nedenstående formler således ikke er valide, starter debuggeren. Kan jeg indlægge en fejlkontrol i forbindelse med beregningerne, så der bare kommer en tekstbox med teksten "fejl i indtastede data"? Og hvordan?
Koden måler om der er indtastet en værdi i felterne felt1,felt2 og felt3. Hvis felterne er tomme får du MsgBox og procedüren forlades. Hvis betingelsen ikke er opfyldt (Der er indtastet en værdi) adderes felterne og resultatet vises i feltet Tekst6.
If IsNull(Me.felt1 Or Me.felt2 Or Me.felt3) Then MsgBox "Der er fejl i det indtastede" Exit Sub End If Tekst6 = felt1 + felt2 + felt3
Tak MUGS, jeg modificerede det lidt, således jeg kun får første fejl og først får opdateret når "opdater" er sand. If IsNull(Me.Costprice) And Opdater Then MsgBox "Please enter Costprice!" Opdater = False End If
Koden ser rigtig ud, så det er svært at gennemskue, hvad der er galt. Normalt kommer denne fejl, når feltet ikke eksisterer eller er stavet forkert. Har du kontrolleret, at du ved en fejl ikke har omdøbt feltet?
Hej Mugs Me.Costprice.SetFocus Virkede heller ikke, fejlen står ved .SetFocus. Jeg flytter ikke cursoren til de fejlbehæftede felter, men tak for hjælpen.
Hej MUGS Jeg har fået databasen, det var en postkasse der blev videresendt til der var fyldt. Jeg må erkende, at jeg ikke var klar over, at feltet "navn" også blev brugt.
Jeg har oprettet spørgsmål http://www.eksperten.dk/spm/248051, hvis du gider svare på det, så får du de absolut tilkomne point - tak for hjælpen.
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.
