• 
  

  hur man kan få frågan tomt argument VBA

  
  

Microsoft Office Access är en relationsdatabas management system används ofta för små lokala databaser . Visual Basic for Applications ( VBA ) är en dator programmeringsspråk som används för att automatisera rutinuppgifter i Access och andra Microsoft Office-program . En fråga är skapade för att hämta information från en databas tabell . En NULL inte är noll eller tomt men ett okänt värde som tar ett byte av plats i tabellen området . Du kan skriva VBA- kod för att skapa en tabell , lägga till poster i den inklusive ett NULL-värde och ifrågasätta tabell med ett NULL-argumentet .
1 .
Starta Microsoft Office Access 2007 och välj " tom databas ", klicka sedan på " Skapa ". Klicka på " Databas Verktyg "och välj " Visual Basic . " Klicka på " Infoga " och välj " Module ".
2 .
Tryck " Ctrl + A " och tryck på " Delete " för att radera alla befintliga koden .
3 .
Kopiera och klistra in koden nedan i modulen . Koden kommer att visa en meddelanderuta med produktnumret där beskrivningen är NULL .



Alternativ Jämför Database



Private Sub queryNULLfield ( )



Dim strSQL As String

Dim DBS som databas

Dim rst Som Recordset



Set DBS=CurrentDb



strSQL=" CREATE TABLE produkt (produkt , beskrivning TEXT ) , "

DoCmd . RunSQL ( strSQL )



strSQL=" INSERT INTO produkt (produkt , beskrivning) "

strSQL=strSQL " VALUES (1 , " Bil ');"

DoCmd. SetWarnings Falska

DoCmd. RunSQL ( strSQL )



strSQL=" INSERT INTO produkt (produkt , beskrivning) "

strSQL=strSQL " VALUES (2 , NULL ), "

DoCmd. SetWarnings Falska

DoCmd. RunSQL ( strSQL )



strSQL=" INSERT INTO produkt (produkt , beskrivning) "

strSQL=strSQL " VÄRDEN (3 , "dator ');"

DoCmd . SetWarnings Falska

DoCmd. RunSQL ( strSQL )



SQLstr=" SELECT PRODUCT. Product , PRODUCT. Description "

SQLstr=SQLstr " Från produktutveckling "

SQLstr=SQLstr " VAR ((( PRODUCT. Description ) Är Null ));"



Set rst=dbs. OpenRecordset ( SQLstr )



rst. MoveLast

rst. MoveFirst

MsgBox " Beskrivningen för produkten " rst. Fields (0) . Value " är NULL . "



rst. Close

dbs. Close



End Sub

Previous：nothing Next：Hur konvertera en ansökan från Visual Studio 2003 till 2005

Relaterade artiklar