In Visual Basic , l' Object Linking and Embedding , base di dati ( OLE DB ) interfaccia di programmazione permette di collegare il programma a un database . Con esso , è possibile salvare le informazioni dal vostro progetto di una tabella nel database e di riutilizzarli in altre applicazioni . È possibile creare le variabili in qualsiasi punto del progetto , come ad esempio da caselle di testo , caselle di controllo o lista selezioni , basta assicurarsi che il tipo di dati variabile corrisponda al tipo di dati del campo nella tabella del database. Istruzioni
1

Aprire Visual Basic e creare un nuovo progetto . Aprire la finestra di codice e creare una funzione digitando " Private Sub AddRecord ( ) "
2

Digitare le righe seguenti per creare variabili che la connessione al database : .

Dim dbCon come New OleDb.OleDbConnection

Dim DataSet come New DataSet

Dim dataAdap come OleDb.OleDbDataAdapter

Dim sqlCommand As String

La variabile " dbCon " stabilisce una connessione al database , " dataset" contiene i dati da esso , " dataAdap " esegue i comandi e interagisce con il database , e " sqlCommand " tiene le vostre domande .
3

connettersi al database con le seguenti righe:

dbCon.ConnectionString = " Provider = Microsoft.Jet.OLEDB.4.0; Data Source = path_to_database "

dbCon.Open ( ) per sostituire il

porzione " path_to_database " con la posizione fisica del database sul computer. Questa linea collega il programma Visual Basic per il database e la seconda riga si apre il database
4

Digitare le righe seguenti per caricare i dati dal database : .

SqlCommand = "SELECT * FROM tblContacts "

dataAdap = New OleDb.OleDbDataAdapter ( SqlCommand dbCon ) per

dataAdap.Fill (DataSet , " Database " ) per adattatore i dati

ora contiene tutte le record all'interno del vostro tavolo . È possibile utilizzare un nome diverso da "Database" per identificare meglio il vostro tavolo . Ad esempio , se la tabella contiene le informazioni di contatto , è possibile denominare questo " Contatti"
5

Creare le seguenti variabili : .

Dim comBuild As New OleDb.OleDbCommandBuilder ( dataAdap )

Dim dataNewRow come DataRow

La prima linea convalida un comando di inserimento nella tabella quando si utilizza un oggetto DataRow . La seconda riga crea l'oggetto DataRow
6

Digitare le righe seguenti per aggiungere una nuova riga alla tabella nel database e salvare le variabili ai campi nel record : .

DataNewRow = dataSet.Tables ( "Database" ) . NewRow ( ) per

dataNewRow.Item ( 1 ) = variable1

dataNewRow.Item ( 2) = variable2

dataNewRow.Item ( " field_name " ) = variabile3

dataSet.Tables ( " Database" ) . Rows.Add ( dataNewRow ) per

dataAdap.Update (DataSet , "Database" ) per

la prima riga si prepara un nuovo record con i campi vuoti . Le prossime tre righe aggiungono informazioni. Le prime due utilizzano i numeri di indice di campi tabella e inserire queste variabili nella prima e seconda campi del record . Il terzo utilizza il nome del campo per identificare in quale campo per memorizzare quella variabile . Il quinto e il sesto linee aggiungere il record con le variabili al vostro tavolo e commettono i dati
7

digitare la seguente riga di chiudere la connessione al database : .

DbCon.Close ( ) per

Chiama la funzione altrove nel codice , ad esempio in un evento click del pulsante " AddRecord ()" .