Microsoft Office Access er en relationel database management system anvendes ofte til små lokale databaser. Visual Basic for Applications ( VBA ) er en computer programmeringssprog, der anvendes til at automatisere rutineopgaver i Access og andre Microsoft Office-programmer. En forespørgsel er skabt til at hente information fra en database tabel. En NULL ikke er nul eller tom, men en ukendt værdi , der tager en byte plads i tabellen feltet . Du kan skrive VBA-kode til at oprette en tabel , føje poster til det herunder en NULL værdi, og forespørge bordet med en NULL argument. Instruktioner
1
Start Microsoft Office Access 2007 og vælg " Tom database " og derefter klikke på "Opret ". Klik på " Database Tools" og vælg " Visual Basic ". Klik på "Indsæt "-feltet og vælg " Modul ".
2
Tryk på " Ctrl + A " og tryk " Delete " for at slette alle eksisterende kode.
3 < p> Kopier og indsæt koden nedenfor ind i modulet. Koden vil vise en besked boks med produktet nummer, hvor beskrivelsen er NULL .
Option Sammenlign Database
Private Sub queryNULLfield ()
Dim strSQL As String
Dim dbs som database
Dim rst Som Recordset
Set dbs = CurrentDb
strSQL = " CREATE TABLE produkt (produkt , beskrivelse TEXT ) " < br >
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO produkt (produkt , Beskrivelse ) "
strSQL = strSQL & " VALUES (1, 'Bil '); " Salg
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO produkt (produkt , Beskrivelse ) "
strSQL = strSQL & , " VALUES (2, NULL) ; "
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO produkt (produkt , Beskrivelse )"
strSQL = strSQL & " VALUES (3, " computer "); "
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL )
SQLstr = " SELECT PRODUCT.Product , PRODUCT.Description "
SQLstr = SQLstr & " FROM Product "
SQLstr = SQLstr & " WHERE ((( PRODUCT.Description ) Is Null ) ) "
Set rst = dbs.OpenRecordset ( SQLstr )
rst.MoveLast
rst.MoveFirst
MsgBox" beskrivelse af produktet "& ; . rst.Fields (0) Value & "er NULL . "
rst.Close
dbs.Close
End Sub
< br >