Insertar datos en datagridview manipulacion del datagrid Visual Basic ejemplo

[DeividDS]

Hola necesito pasar datos de dos labels a un datagrid ¿como puedo hacerlo?
hasta ahora solo se llenar un datagrid con consultas sql sacando los datos de una base da datos.

[Ogramar]

Buenas, para hacer consultas en los foros es importante seguir las indicaciones que se dan en https://www.aprenderaprogramar.com/foros/index.php?topic=1460.0

Intenta siempre incluir código hasta donde hayas podido desarrollarlo, y explicar sobre el código dónde tienes problemas

En este hilo puedes encontrar código de ejemplo sobre datagridview: https://www.aprenderaprogramar.com/foros/index.php?topic=1485.0

Salu2

[DeividDS]

Hola, Gracias por responder, aqui esta el codigo. El error se da en la linea donde le agrego los datos de los textbox a las filas, el error dice (No se pueden agregar filas mediante programación a la colección de filas de DataGridView cuando el control está enlazado a datos.)

Código: [Seleccionar]

Public Sub llenagrid6()

        Dim result As New DataTable()
       
        result.Columns.Add("Candidato")
        result.Columns.Add("Votos")
     
        DataGridView2.DataSource = result

        DataGridView2.Rows.Add(txtNOM.Text.Trim(), txtVOT.Text.Trim())
       
    End Sub


[DeividDS]

Ya solucioné el problema, muchas gracias por la ayuda!

[Ogramar]

Buneas, ¿puedes explicar cómo lo solucionaste? (Con la idea de que sirva de ayuda a otras personas)

Salu2

[DeividDS]

Primero uso el evento click del boton para hacer una consulta sql y los datos que me trae la consulta los mando a dos textbox. y al final llamo la funcion llenagrid6 que me manda los datos de los textbox al datagrid

Código: [Seleccionar]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If Me.txtIdentidad.Text <> "" Then
            resultadov(txtIdentidad.Text)
            If dr1.Read Then
                txtVOT.Text = dr1(0).ToString
            End If
            dr1.Close()
            If dr.Read Then
                txtNOM.Text = dr(0).ToString + " " + dr(1).ToString
            End If
            dr.Close()
        Else

            MsgBox("Ingrese una cedula")

        End If
        llenagrid6()

    End Sub
aqui esta la funcion llenagrid6

Código: [Seleccionar]

Public Sub llenagrid6()
        Dim row(2) As String
        DataGridView2.ColumnCount = 2
        DataGridView2.Columns(0).Name = "Nombre"
        DataGridView2.Columns(1).Name = "Votos"

        row(0) = txtNOM.Text
        row(1) = txtVOT.Text
        Dim rowToSave As String() = New String() {row(1), row(2)}
        DataGridView2.Rows.Add(row)
    End Sub


[Ogramar]

Gracias!