Tengo un listbox y muestro el nombre del producto q viene de una tabla en mi base de datos, el listbox se carga automaticamente por que lo mando a llamar en el load del formulario.
Al momento de hacer click en el boton guardar , como muestro o refresco o actulizo mi listbox con el nuevo codigo q acabo de guardar.
Todo esto lo qiero acer en tiempo de ejecucion.
Sin tener q cerrar mi ventana y volver abrila para q me muestre en el listbox el nuevo campo agregado
Les dejo el codigo de listbox
Public Sub Cargar_Cod_Producto()
Dim query As String
query = "Select cod_producto from producto"
Dim sqdataadapter As New SqlDataAdapter(query, cnx)
Dim datase As New DataSet("ferr2013")
Dim datavi As DataView
Dim databla As DataTable
Dim vdato As String
' Dim a As String
Dim x As Integer
Try
cnx.Open()
If cnx.State = ConnectionState.Open Then
sqdataadapter.Fill(datase, "producto")
databla = datase.Tables("producto")
datavi = databla.DefaultView
For x = 0 To datase.Tables("producto").Rows.Count - 1
vdato = datase.Tables("producto").Rows(x).Item(0).ToString
ListBox1.Items.Add(vdato)
Next
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
cnx.Close()
End Sub
Edito: No es necesario escribir con mayúsculas. Gracias
