Microsoft Visual Studio
Mostrar más instrucciones
1
 lanzamiento Microsoft Visual Studio y haga clic en "Nuevo proyecto " en el panel izquierdo de la pantalla del ordenador . Ampliar " Visual Basic ", ubicado debajo de " Plantillas instaladas ". Haga clic en "Windows ", haga doble clic en " Aplicación de Windows Forms " en el centro de la ventana de diálogo para crear un nuevo proyecto. 
 2 
 doble clic en " ListBox " para añadir un nuevo control de cuadro de lista al formulario. Haga doble clic en " botón " para añadir un nuevo botón al formulario. 
 
 3 Haga doble clic en el formulario para crear un evento de carga del formulario y agregue el código siguiente para agregar cinco elementos a la " ListBox : " 
 
 Me.ListBox1.Items.Add ( "DB artículo 1 " ) 
 
 Me.ListBox1.Items.Add ( "DB artículo 2 " ) 
 
 Me.ListBox1.Items.Add ( "DB artículo 3 " ) 
 
 Me.ListBox1.Items.Add ( "DB artículo 4 " ) 
 
 Me.ListBox1.Items.Add ( "DB artículo 5 ") 
 4 
 volver a la vista Diseño y haga doble clic en " Button1 "para crear un evento de clic en este botón. Agregue la siguiente línea de código para definir la ruta de la base de datos : 
 
 dbConString As String = " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C: \\ Northwind 2007.accdb ; " 
 Página 5 
 Sustituir " C: \\ Northwind 2007.accdb ." en el paso anterior con el nombre y la ruta de la base de datos Access 
 6 
 Cree la variable " dbCon ", que se utiliza para establecer la conexión de base de datos, y la variable " insertItems " string , que se utiliza para crear la instrucción SQL para insertar los elementos : 
 
 dbCon As System.Data.IDbConnection = New System.Data.OleDb . OleDbConnection ( dbConString ) 
 
 insertItems dévil como secuencia 
 7 
 Crear y ejecutar un comando para crear una nueva tabla en la base de datos donde se va a insertar los elementos " ListBox " : 
 
 qryStr As String = "CREATE TABLE tmpItemsTable ( elementos de texto )," 
 
 dbcmd As System.Data.IDbCommand = New System.Data.OleDb.OleDbCommand 
 
 dbcmd . CommandText = qryStr 
 
 dbCmd.Connection = dbCon 
 
 dbCon.Open () 
 
 dbCmd.ExecuteNonQuery () 
 8 
 Press "F5 " para ejecutar el programa y haga clic en " Button1 ". 
 
 
          
