Sapere come aggiungere un nuovo campo di una tabella di database di Microsoft Office Access utilizzando Visual Basic.NET può rendere il programma più dinamico . Access è un sistema di gestione di database relazionale incluso nella suite Microsoft Office . VB.NET è un linguaggio di programmazione orientato agli oggetti spesso preferito dai programmatori per la sua facilità d'uso . In pochi passi è possibile scrivere codice VB.NET per creare una nuova tabella , quindi utilizzare l'istruzione " ALTER TABLE " per creare un nuovo campo . Istruzioni
1

Aprire Microsoft Visual Basic Express e fare clic su " Nuovo progetto ... " nel riquadro di sinistra del vostro schermo . Fare doppio clic su " Applicazione console " nel riquadro centrale del "Nuovo progetto" Finestra.
2

Premere " Ctrl " e "A ", quindi premere "Cancella " per cancellare tutto il codice esistente.

3

Copia e incolla questo codice per il modulo " Module1.vb " .

Imports System.Data.OleDb

Module Module1
< p > Sub Main ( ) per

Dim myConnection Come OleDbConnection

Dim myCommand Come OleDbCommand

Dim mySQLString As String

myConnection = New OleDbConnection _

( "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = D : \\ Temp \\ myTextData.mdb ; " ) per

myConnection.Open ( ) per

mySQLString = " CREATE cutomers TAVOLA ( FIRST_NAME TESTO , LAST_NAME TESTO ) "

myCommand = New OleDbCommand ( mySQLString , myConnection ) per

myCommand.ExecuteNonQuery ( ) per

mySQLString =" INSERT INTO cutomers VALUES ( 'John ', ' Smith' ) "

myCommand = New OleDbCommand ( mySQLString , myConnection ) per

myCommand.ExecuteNonQuery ( ) per

mySQLString =" INSERT INTO cutomers VALUES ( ' John ' , ' Smith ' ) "

myCommand = New OleDbCommand ( mySQLString , myConnection ) per

myCommand.ExecuteNonQuery ( ) per

mySQLString =" ALTER TABLE ADD cutomers GENERE testo; "

myCommand = New OleDbCommand ( mySQLString , myConnection ) per

myCommand.ExecuteNonQuery ( ) per

MsgBox (" Tu hai creato la tabella clienti e aggiunto un nuovo campo con successo! " )

End Sub End Module

4

Modifica questa riga di codice e digitare il nome del database di Access .

( " Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C : \\. CustomerData.mdb ; " ) per

Eseguire il programma premendo il tasto " F5 "