have viden om, hvordan man indsætter en null-værdi i en tabel ved hjælp af Microsoft Visual Basic med ADOX tilslutning kan gøre din ansøgning mere dynamisk. En null-værdi kan repræsentere en tom værdi i en database tabel. VB.NET er et objekt -orienteret programmeringssprog, der anvendes til at oprette Windows-programmer. ADOX , hvilket er en udvidelse til ADO objekter , giver genstande til skema ændring, herunder sikkerhed. I et par trin, du vil skabe en VB.NET projekt , der forbinder til en Access-database til at oprette en tabel og indsætte en null-værdi . Ting du skal
Microsoft Visual Basic Express & Access-database
Vis Flere Instruktioner
1

Start Microsoft Visual Basic Express . Klik på " Nyt projekt " og derefter vælge "Windows Forms Application " . Klik på "OK". Klik på " Toolbox" på den venstre rude på skærmen derefter dobbeltklikke på " Button " for at tilføje en ny knap .
2

Dobbeltklik " Button1 " for at åbne " Form1.vb "-modulet . Klik på " Projekt "-menuen og derefter vælge " Tilføj reference .. " Vælg " COM" fanebladet og klik derefter på "Microsoft Active Data Objects Library" og klik på " OK". Følg samme proces, og tilføjer "Microsoft ADO Ext for DDL og sikkerhed. ".
3

Skriv følgende at erklære dine variabler : Hej

Dim cn Som ADODB.Connection

Dim kat som ADOX.Catalog

Dim objTable Som ADOX.Table

Dim sqlStr As String

cn = Ny ADODB . tilslutning

Cat = Ny ADOX.Catalog

objTable = Ny ADOX.Table
4

Skriv følgende for at oprette en ny variabel , og sæt den til NULL : < br >

Dim værdi Som VariantType

value = Constants.vbNull
5

Skriv følgende for at oprette en forbindelse til Access-databasen : Hej

Cn . Open ( " Provider = Microsoft.ACE.OLEDB.12.0 , datakilde = C: \\ Northwind 2007.accdb " )

Cat.ActiveConnection = Cn

Rediger følgende kode , og indtast stien og navn til din database : Hej

C: \\ Northwind 2007.accdb
6

Skriv følgende for at oprette en ny tabel kaldet " ADOXTable " : Hej

objTable . Name = " ADOXTable "

objTable.Columns.Append ( "ID" , ADOX.DataTypeEnum.adInteger )

objTable.Columns.Append ( " IdDesc " , ADOX.DataTypeEnum.adWChar ) < br >

Cat.Tables.Append ( objTable )
7

Skriv følgende for at indsætte en ny rekord af data med en NULL værdi : Hej

sqlStr = " INSERT INTO " & ( objTable.Name ) & " (ID , IdDesc ) "

sqlStr = sqlStr & " VALUES (5, " & værdi & ") "

Cn.Execute ( sqlStr ) < br >
8

Skriv følgende for at frigøre variabler fra hukommelsen : Hej

Cat = Nothing

Cn.Close ()

Cn = Nothing

Tryk på " F5 " for at køre dit program og derefter klikke på " Button1 . "