02/05/2009, 16:02
|
| | | Fecha de Ingreso: agosto-2008
Mensajes: 13
Antigüedad: 16 años, 8 meses Puntos: 0 | |
| Respuesta: grabar los items de un listbox con el contenido de un textbox
Dim i as Integer
Dim sQuery as String
Dim nr as Integer
For i = 1 To Listbox1.ListCount -1
sQuery = "Insert Into tblCliente(Clave,Cliente) Values(" & _
Listbox1.Text & "," & TextBox1.Text & ")"
bd.Execute sQuery, nr
Next i |