Título da Dica: Ler registro com VB.NET utilizando OLEDB
Postada em 26/1/2004 por Rochª Le o registro 100 de uma tabela chamada categorias e coloca o conteudo dos campos (codigo e nome) em txt_codigo e txt_nome.
Imports System.Data.OleDb
Sub le() Dim txt_nome As String Dim txt_codigo As Long
Dim conn As New OleDbConnection() Dim cmd As OleDbCommand = conn.CreateCommand
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\banco.mdb" cmd.CommandText = "Select * from categorias where codigo = 100" conn.Open() Dim leitor As OleDbDataReader = cmd.ExecuteReader txt_codigo = leitor("codigo") txt_nome = leitor("nome")