Consultar Bases de Dados no VB

[HoudinY]

Boa Noite, estou agora a aprender a mexer em bases de dados através do VB e tenho uma duvida. É possível pegar num campo da base de dados e colocá-lo num objecto do tipo(labels / listboxes / textboxes / etc..)? É que até agora só consigo visualizar resultados em datagridviewers.

Desde já obrigado pela atenção. 😕

[acao]

boas

se consegues ver os campos no dgv

é so fazeres assim

Private Sub DataGridView1_CellMouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles DataGridView1.CellMouseClick
txtbox.Text = DataGridView1.Rows(e.RowIndex).Cells(1).Value.ToString()

Cells(1) é o numero da coluna

cumps

acao

[HoudinY]

esta me a dar um erro:

 Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Dim ConnectionString As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Application.StartupPath & "\baseteste.mdb")
        Dim query As String = "SELECT * FROM Login WHERE User = @User"

        Dim command As New OleDbCommand(query, ConnectionString)
        command.Parameters.Add("@User", OleDbType.VarChar).Value = TextBox1.Text

        Dim DataAdapter As New OleDbDataAdapter(command)
        Dim MyData As New DataSet
        DataAdapter.Fill(MyData, "Login")

        Me.DataGridView1.DataSource = MyData.Tables("Login")

        TextBox3.Text = DataGridView1.Rows(e.RowIndex).Cells(1).Value.ToString()
        TextBox4.Text = DataGridView1.Rows(e.RowIndex).Cells(2).Value.ToString()
    End Sub

esse é o codigo que tenho, e nesta parte:

        TextBox3.Text = DataGridView1.Rows(e.RowIndex).Cells(1).Value.ToString()
        TextBox4.Text = DataGridView1.Rows(e.RowIndex).Cells(2).Value.ToString()

as palavras e.rowindex dao erro.

o meu objectivo é quando o utilizador carregar num botão ele fazer uma pesquisa na base de dados pelo username e devolver a password.

[acao]

aquele codigo era para clicares no dgv

troca por este

textbox = MyData.Tables(0).Rows(0).Item(0).ToString

e so alterares o item()

cumps

acao

[HoudinY]

obrigado, já funciona.