Visual Basic.NET - asignar a una variable resultado BindingSource

Saludos cordiales:

tengo una aplicacion en vb 2005 en donde consulto a una base (cod. resumido)

Private Const cs As String = "Data Source=(local);" & _
"Integrated Security=True;" & _
"Initial Catalog=dbcomercial"
Private BindingSource1 As Windows.Forms.BindingSource = New BindingSource

Using cn As SqlConnection = New SqlConnection(cs)
cn.Open()
Dim da As New SqlDataAdapter("SELECT * FROM USUARIO", cn)
Dim dt As New DataTable

Dim sql As String = " Select estatus From usuarios " & _
" Where password = '" & Me.PasswordTextBox.Text & "' " & _
" And usuario = '" & Me.UsernameTextBox.Text & "'"
da.Fill(dt)
BindingSource1.DataSource = dt

el problema es que quiero primero que quiero es saber si hay registros y luego recuperar los datos del BindingSource1 en variables.

en vb6 lo hacia con el rs.recordcount > 0 y rs!Campo para asignar ala variable.

les agradeceria su ayuda.

Hi! lo puedes hacer asi

if dt.Rows.Count>0 'Tiene renglones
if me.BindingSource1.Count>0 'tiene renglones

para guardar en variables igual puedes hacer esto :

dim UsuarioLogueado as DataRow
UsuarioLogueado = CType(BindingSource1.Current, DataRowView).Row
dim sPassword as string= UsuarioLogueado.password_vc 'password_vc es el campo

o esto:
dim sPassword as string=dt.Rows(0).Item(1) 'En rows es el renglon que quieres, en item la columna puede ser el numero o el nombre del campo

al menos es lo que yo hago, no se si sea la forma mas eficaz pero es lo que yo hago.