Weten hoe je een nieuw veld toe te voegen aan een Microsoft Office Access- database tabel met behulp van Visual Basic.NET kan je programma dynamischer te maken . Access is een relationele database management systeem opgenomen in de Microsoft Office suite . VB.NET is een object - georiënteerde programmeertaal vaak de voorkeur van programmeurs voor het gebruiksgemak . In een paar stappen kunt u VB.NET code om een nieuwe tabel te maken te schrijven , gebruik dan de " ALTER TABLE " statement om een nieuw veld te maken . Instructies
1 Open Microsoft Visual Basic Express en klik op ' Nieuw project ... " aan de linkerkant van uw scherm . Dubbelklik op " Console Application " in het middelste deelvenster van de " New Project" venster .
Druk op " Ctrl " 2 en " A ", druk daarna op " Delete " om alle bestaande code te verwijderen . < br >
Kopieer 3 en plak deze code op uw " Module1.vb " module . Imports System.Data.OleDb
module Module1
Sub Main ( ) Dim myConnection
Zoals OleDbConnection
Dim myCommand Zoals OleDbCommand Dim mySQLString
als Koord myConnection
= Nieuwe OleDbConnection _
( " Provider = Microsoft.Jet.OLEDB.4.0 ; data Source = D : \\ Temp \\ myTextData.mdb ; " ) myConnection.Open ( ) op mySQLString
= " CREATE TAFEL cutomers ( FIRST_NAME TEKST , LAST_NAME TEXT ) "
myCommand = Nieuw OleDbCommand ( mySQLString , myConnection ) myCommand.ExecuteNonQuery
( ) mySQLString
= " INSERT INTO cutomers WAARDEN ( ' JOHN ' , ' SMITH ' ) "
myCommand = Nieuw OleDbCommand ( mySQLString , myConnection ) myCommand.ExecuteNonQuery
( ) mySQLString
= " INSERT INTO cutomers VALUES ( ' JOHN ' , ' SMITH ' ) "
myCommand = Nieuw OleDbCommand ( mySQLString , myConnection ) myCommand.ExecuteNonQuery
( ) mySQLString
= " ALTER TABLE cutomers ADD GESLACHT TEKST ; "
myCommand = nieuw OleDbCommand ( mySQLString , myConnection ) myCommand.ExecuteNonQuery
( ) MsgBox
( " U schiep de tafel klanten en voegde een nieuw veld met succes ! " ) End Sub End Module
4
Wijzig deze regel code en typ de naam van uw Access-database . ( " Provider
= Microsoft.Jet.OLEDB.4.0 ; data Source = C : . \\ CustomerData.mdb ; " ) op Twitter Run uw programma door op " F5 "
|
