Visual Basic.NET - visual basic 2008.net + access consulta

Hola a todos tengo un problema con visual basic 2008.net + access ...
Realizo una consulta desde visual hacia una tabla de access (la conexion está bien), mi problema surge cuando quiero hacer una consulta en sql con mas de una respuesta por ejemplo...

Dim rs As ADODB.Recordset
Dim sql1 As String

sql1 = "select NomUser, Pass from Usuarios where NomUser='" & Trim(TextBox1.Text) & "'"
rs = conexion.Execute(sql1)

Bien creo una variable rs (record set) la cual, luego de la consulta sql, va a albergar 2 resultados: NomUser y Pass.
¿Cómo hago para poder separar los resultados de la consulta en variables diferentes?

espero me puedan ayudar!!
desde ya muchas gracias
Matias

sq = ("SELECT * FROM clientes where abreviacion like '%" & t & "%'")
Dim m_cbCommandBuilder As New Npgsql.NpgsqlCommand(sq, ADOCONN)
Call Conex()
dr = m_cbCommandBuilder.ExecuteReader()
While dr.Read
Buscar.ListView1.Items.Add(dr("cvl_cliente"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("abreviacion"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("fecha"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("Rason_social"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("rfc"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("web"))
Buscar.ListView1.Items(CInt(i)).SubItems.Add(dr("dom"))
Buscar.Label3.Text = i
i = i + 1
End While
desconectar()