como agregar otra fila listview

[future89]

hola .
es un sistema de ventas de libro y necesito ingresar varios libros en un listview uno por uno mediante un textbox evento keyPress y solo puedo ingresar uno solo y al querer incresar otro nopasa nada ...

este es el codigo

Código vb:

Private Sub TbProducto_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TbProducto.KeyPress
'Valido que se ingrese solo numeros
 
        If Char.IsNumber(e.KeyChar) Then
            e.Handled = False
            'Valido que se presione Backspace,Enter
        ElseIf Char.IsControl(e.KeyChar) Then
            e.Handled = False
            'Las demas teclas quedan bloqueadas
        Else
            e.Handled = True
        End If
 
        'Si mando un ENTER entonces que busque
        If e.KeyChar = Convert.ToChar(Keys.Enter) Then
 
            
            myConn = New SqlConnection("Initial Catalog=libroteka;Data Source=localhost;Integrated Security=SSPI;")
            'Crear un objeto Command.
            myCmd = myConn.CreateCommand
            myCmd.CommandText = "SELECT * FROM libros WHERE cod_libro ='" & TbProducto.Text & "' "
 
           
            adaptor.SelectCommand = myCmd
            adaptor.Fill(dataset, "0")
 
            Dim count = dataset.Tables(0).Rows.Count
            If count > 0 Then
 
                myConn.Open()
                With Ltver.Items.Add(TbProducto.Text, "cod_libro")
                    .SubItems.Add(dataset.Tables(0).Rows(0).Item("nombre_libro"))
                    .SubItems.Add(dataset.Tables(0).Rows(0).Item("precio"))
 
                  
                End With
 
 
            End If
 
 
 
            TbProducto.Clear()
            dataset.Clear()
            myConn.Close()
        End If
 

y es el texbox le digo que al ingresar 13 digitos me lanse un Enter

Código vb:

Private Sub TbProducto_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TbProducto.TextChanged
 
        'Si llega a 13
        If TbProducto.Text.Trim().Length = 1 Then
            'Que envie un enter
            SendKeys.Send("{Enter}")
        End If
 
    End Sub
 

[bieres]

Hola, para añadir una fila a un listview, con los datos de cada columna ("1", "2", "3",..."N")

Código:

ListViewItem item1 = new ListViewItem("1", listView1.Items.Count-1);
item1.SubItems.Add("2");
item1.SubItems.Add("3");

item1.SubItems.Add("N");
listView1.Items.Add(item1);

[future89]

no me sucede los mismo, alomejor es un conflicto con el KeyPress y el dataset?

[bieres]

Me parece que esto lo tienes mal.

Yo lo pondria TbProducto_KeyPress en el evento enter del TbProducto_Enter

Si realmente lo que quieres hacer es validar los datos al tener esa longuitud.
Has comprobado en depuracion la esjecucion de tu codigo?

Tambien puedes llamar al evento TbProducto_Enter(Me, EventArgs.Empty)

Código:

Private Sub TbProducto_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TbProducto.TextChanged
 
        'Si llega a 13
        If TbProducto.Text.Trim().Length = 13 Then
            'Que envie un enter
            SendKeys.Send("{Enter}")
        End If
 
    End Sub