Apprendre à créer une base de données en utilisant Visual Basic.NET ( VB.NET ) tout en utilisant une barre de progression comme un indicateur de processus peut rendre votre application plus conviviale . En utilisant une base de données Access comme un endroit pour stocker des paramètres par défaut de l'utilisateur ou d'autres informations que votre application a besoin, c'est certainement mieux que d'utiliser de nombreux fichiers texte. Vous pouvez créer des tables dans votre base de données pour stocker les données et les récupérer plus tard à l'aide d' instructions SQL. Utilisez l'objet " ADOX " pour créer la base de données, et utiliser la classe " OleDbConnection " pour établir une connexion et modifier votre base de données. Choses que vous devez
Microsoft Visual Studio
Voir Plus Instructions
1

Lancement de Microsoft Visual Studio, cliquez sur " Nouveau Projet" dans le volet de gauche de votre écran d' ordinateur et d'étendre " Visual Basic " en dessous " Modèles installés . " Click "Windows " et double -cliquez sur "Application Windows Forms " du centre de la fenêtre de dialogue pour créer un nouveau projet.
2

Double -cliquez sur " ProgressBar " pour ajouter un nouveau contrôle de barre de progression pour votre formulaire, puis double- cliquez sur "Button " pour ajouter un nouveau bouton à votre formulaire.
3

Double -cliquez sur " Button1" pour Créer un nouvel événement de clic lancer le module VB . Cliquez sur le menu "Projet" , cliquez sur " Ajouter une référence ", et cliquez sur l'onglet "COM" . Double -cliquez sur « Microsoft ADO Ext . 6.0 for DDL and Security "pour l'ajouter comme une référence à votre projet
4

Copiez-collez les lignes de code suivantes comme les premières lignes de code dans votre module : .
< P > importations ADOXImports System.Data.OLEDB
5

Copiez et collez le code suivant dans le bouton , cliquez sur l'événement pour déclarer des variables , définir les limites de la barre de progression et régler la première valeur :
< p > ADOXCat As New ADOX.CatalogDim strSQL Comme StringDim objCmd As New OleDbCommandMe.ProgressBar1.Minimum = 0Me.ProgressBar1.Maximum = 50Me.ProgressBar1.Value = 10Application.DoEvents ()
6

Copier et coller le code suivant pour créer une base de données Access :

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

Faire une connexion à la base de données créée à l'étape précédente :

Dim Con = new OleDbConnection ( "Provider = Microsoft.ACE.OLEDB .12.0 , source de données = c: \\ Temp \\ newdata.mdb " ) Me.ProgressBar1.Value = 30Application.DoEvents () Con.Open ()
8

Ajoutez le code suivant pour créer un nouveau table dans la base de données :

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

Ajoutez le code suivant pour insérer un nouvel enregistrement à la table créée à l'étape précédente :

strSQL = "INSERT INTO VALUES nEWTABLE (ID, PRODUCT) ( 0, «tablette» ) « objCmd = New OleDbCommand ( strSQL , Con) objCmd.ExecuteNonQuery () Me.ProgressBar1.Value = 50Application.DoEvents () con.close ()