Mostrar Datos en TextBox

[ENSAHS]

Sres. quisera que me den una mano con el siguiente codigo
Las gracias de antemano:


Imports System
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic


Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim miconexion As OleDbConnection = New OleDbConnection("Provider=SQLOLEDB;Data Source=ehs_matrix;" & _
"Integrated Security=SSPI;Initial Catalog=seda20007")

Dim micomando As OleDbCommand = miconexion.CreateCommand()
micomando.CommandText = "SELECT * FROM Prueba where registro like '40180964'"

miconexion.Open()
Dim misdatos As OleDbDataReader = micomando.ExecuteReader()

************************************************** ************
Aqui quiero definir que se muestre la informacion capturada en unos TEXTBOX
de mi formulario
************************************************** ************

misdatos.Close()
miconexion.Close()

End Sub
End Class

[omar_cb11]

If misdatos.Read Then
Textbox1.Text = IIf(IsDBNull(misdatos(0)), "", misdatos(0))
Textbox2.Text = IIf(IsDBNull(misdatos(1)), "", misdatos(1))
Textbox3.Text = IIf(IsDBNull(misdatos(2)), "", misdatos(2))
Textbox4.Text = IIf(IsDBNull(misdatos(3)), "", misdatos(3))
Textbox5.Text = IIf(IsDBNull(misdatos(4)), "", misdatos(4))
Textbox6.Text = IIf(IsDBNull(misdatos(5)), "", misdatos(5))
End If

Saludos