Estou tendo dificuldade em adaptar este código-fonte para navegar pelos registros do banco de dados, alguém pode me ajudar?
Dim conn AsNew Data.Odbc.OdbcConnection("DSN=;UID=;PWD=;")Dim ssql AsString
ssql =
"select clientes from minhaTabela'"Dim cmd AsNew Data.Odbc.OdbcCommand(ssql)cmd.Connection = conn
conn.Open()
Dim rs As Data.Odbc.OdbcDataReader = cmd.ExecuteReader()If rs.Read() Then
txtClientes.Text = rs("Clientes")Else
MsgBox(
"Nenhum cliente foi encontrado.", 64)EndIfconn.Close()
