Visual Basic.NET - Como Hago esto VB.NET

Saludos a todos, Mi duda es la siguiente:
en visual basic 6.0 yo hacia esto:

Código:
consu="select * from mitabla where micampo='midato'"
Set RsCons = New ADODB.Recordset
RsCons.CursorType = adOpenDynamic
RsCons.LockType = adLockReadOnly
RsCons.Open Consu, miconex, , , adCmdText
If Not RsCons.EOF Then
Label1.Caption = RsCons!campo1
Label2.Caption = RsCons!campo2
Label3.Caption = RsCons!campo3
endif
RsCons.Close
set RsCons=Nothing

Como hago esto en Visual Basic.Net
para que en Label ó un TextBox me muestre el campo que yo quiera, haciéndolo todo desde codigo no usado controles.

De antemano, muchas Gracias.

Hola..

Lo puedes hacer asi

Dim adapter AS new System.Data.SqlClient.SqlDataAdapter(consu, connection_string)

Dim ds As new System.Data.DataSet

adapter.Fill(ds)

Label1.Caption = ds.Tables("mitabla").Rows(0).Item("campo1")
...

Es algo parecido a lo que te coloque arriba... si tu base de datos es de access en vez de usar System.Data.SqlClient.SqlDataAdapter, debes usar System.Data.OleDb.OleDbDataAdapter, y si usas una conexion ODBC debes usar System.Data.Odbc.OdbcDataAdapter

Saludos

Gracias Edgar voy a probarlo y te cuento.

Gracias por tu ayuda.

Si te vas a traer un solo campo y un solo registro lo mejor es que uses el metodo ExecuteScalar