Microsoft Visual Basic
Microsoft Office Access
Ver Más instrucciones
1
Abra Microsoft Visual Basic Express y haga clic en "Nuevo proyecto ... " en el panel izquierdo de la pantalla. Haga doble clic en " Aplicación de consola. "
2
Escriba lo siguiente en la primera línea de " Module1.vb ":
Imports System.Data.OleDb
Página 3
Escriba el siguiente abajo " Sub Main ()" para declarar las variables :
conec As OleDbConnection
strSQL Dim As String Dim
Como DataSet ds
tmpStr dévil como secuencia
4
Escriba lo siguiente para crear una nueva consulta de selección para consultar la tabla " clientes ":
strSQL = "SELECT Clientes * FROM Clientes ; "
conn = new OleDbConnection _
( " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = C : \\. DemandStudios \\ Archive \\ Northwind 2007.accdb ; ")
5
Escriba el siguiente para crear una nueva conexión a la base de datos :
myConnection As OleDbConnection = New OleDbConnection
Dim da como OleDbDataAdapter
da = New OleDbDataAdapter ( strSQL , conn)
ds = New DataSet
6
Escriba lo siguiente para recorrer todos los registros devueltos por la consulta y guardarlos en una variable de cadena : .
da.Fill (ds , "Clientes" )
For Each rowCust En ds.Tables ( " Clientes") Filas
tmpStr = tmpStr y . rowCust ( "Compañía" ) ToString () y "