Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> .

Come aggiungere campo Accesso Con Visual Basic

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

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 "

 

Programmazione © www.354353.com