asignar estados segun el usuario

[stefy61292]

hola pues hice esto no me sale error pero no me sale nada en el textbox
este es el codigo que tengo:

estadosuser = Session("CESTADOS".ToString)
consulta3 = "select estados from USUARIO where estados = @estados"
dtUsuario = ExecuteQueryDataTable(consulta3)

Using command As New SqlCommand(consulta3, connection)
command.CommandType = CommandType.Text
command.Parameters.AddWithValue("@estados", estadosuser)
connection.Open()

Dim dt As New DataTable()
Dim da As New SqlDataAdapter()
da.SelectCommand = command

If dtUsuario.Rows.Count > 0 Then

txtestado.Text = CStr(dtUsuario.Rows(0)("estados"))

End If

End Using

les agradesco mucho si me pueden ayudar