Imparare come creare un database utilizzando Visual Basic.NET ( VB.NET ) durante l'utilizzo di una barra di avanzamento come indicatore di processo può rendere l'applicazione più user-friendly . Utilizzando un database di Access come un luogo per memorizzare impostazioni utente o altre informazioni che l'applicazione ha bisogno è sicuramente meglio di molti file di testo . È possibile creare le tabelle nel database per memorizzare i dati e poi recuperarlo utilizzando istruzioni SQL . Utilizzare l'oggetto " ADOX " per creare il database e utilizzare la classe " OleDbConnection " per effettuare una connessione e modificare il database . Cose che ti serviranno
Microsoft Visual Studio
Mostra più istruzioni
1

lancio di Microsoft Visual Studio , fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer ed espandere " Visual Basic " di sotto "Installato Modelli. " Fare clic su " Windows" e fare doppio clic su " Applicazione Windows Form " dal centro della finestra di dialogo per creare un nuovo progetto .
2

doppio clic " ProgressBar " per aggiungere un nuovo controllo barra di avanzamento per il vostro modulo , quindi fare doppio clic su "Pulsante " per aggiungere un nuovo pulsante al form .
3

doppio clic su " Button1 " per creare un nuovo evento click lanciare il modulo VB . Fare clic sul menu "Progetto" , fai clic su " Aggiungi riferimento ", e fare clic sulla scheda "COM" . Fare doppio clic su "Microsoft ADO Ext. . 6.0 for DDL and Security "per aggiungerlo come riferimento al progetto

4 Copiare e incollare le seguenti righe di codice come le prime righe di codice nel modulo : .
< P > Importazioni ADOXImports System.Data.OleDb
5

Copia e incolla il seguente codice all'interno del pulsante , fare clic evento per dichiarare le variabili , definire i limiti barra di avanzamento e di impostare il primo valore :
< p > Dim ADOXCat As New ADOX.CatalogDim strSQL Come StringDim objCmd As New OleDbCommandMe.ProgressBar1.Minimum = 0Me.ProgressBar1.Maximum = 50Me.ProgressBar1.Value = 10Application.DoEvents ( ) economici 6

Copia e incolla il seguente codice per creare un database di Access :

ADOXCat.Create ( "Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = c : \\ Temp \\ newdata.mdb " ) ADOXCat = NothingMe.ProgressBar1 . value = 20Application.DoEvents ( ) economici 7

Fai una connessione al database creato nel passaggio precedente :

Dim Con = New OleDbConnection ( "Provider = Microsoft.ACE.OLEDB .12.0 ; Data Source = c : \\ Temp \\ newdata.mdb " ) Me.ProgressBar1.Value = 30Application.DoEvents ( ) Con.Open ( ) economici 8

Aggiungere il seguente codice per creare un nuovo tabella nel database :

strSQL = " CREATE TABLE nuovatabella ( ID INTEGER , TESTO PRODUCT) " objCmd = New OleDbCommand ( strSQL , Con) objCmd.ExecuteNonQuery ( ) Me.ProgressBar1.Value = 40Application.DoEvents ( ) economici 9

Aggiungere il seguente codice per inserire un nuovo record alla tabella creata nel passaggio precedente :

strSQL = "INSERT INTO nuovatabella ( ID , PRODUCT) ( 0 , ' tavoletta ') " objCmd = New OleDbCommand ( strSQL , Con) objCmd.ExecuteNonQuery ( ) Me.ProgressBar1.Value = 50Application.DoEvents ( ) con.close ( )