Sapendo 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 relazionali 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 il "ALTER TABLE" istruzione per creare un nuovo campo.

istruzione

1 Aprire Microsoft Visual Basic Express e fare clic su "Nuovo progetto ..." nel riquadro a sinistra dello schermo. Fare doppio clic su "Applicazione Console" nel riquadro centrale della finestra "Nuovo progetto".

2 Premere il tasto "Ctrl" e "A", quindi premere "Delete" per eliminare tutto il codice esistente.

3 Copia e incolla questo codice al modulo "Module1.vb".

Imports System.Data.OleDb

Module Module1

Sub Main()

myConnection fioco come OleDbConnection

myCommand fioco come OleDbCommand

mySQLString Dim As String

myConnection = nuovo OleDbConnection _

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

myConnection.Open ()

mySQLString = "CREATE TABLE cutomers (FIRST_NAME testo, LAST_NAME TESTO)"

myCommand = Nuovo OleDbCommand (mySQLString, myConnection)

myCommand.ExecuteNonQuery ()

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

myCommand = Nuovo OleDbCommand (mySQLString, myConnection)

myCommand.ExecuteNonQuery ()

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

myCommand = Nuovo OleDbCommand (mySQLString, myConnection)

myCommand.ExecuteNonQuery ()

mySQLString = "ALTER TABLE ADD cutomers GENERE TESTO;"

myCommand = Nuovo OleDbCommand (mySQLString, myConnection)

myCommand.ExecuteNonQuery ()

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

End Sub

Modulo fine

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;")

Eseguire il programma premendo il tasto "F5".