Public Sub definirCb()
Dim a As Integer
Dim nom_ord As New String[]
Dim articulo_ord As New String[]
FMain.CbVCliente.Clear()
FMain.CbVArticulo.Clear()
nom_ord = Var.ordenar(Var.nombre)
For a = 0 To nom_ord.Count - 1
FMain.CbVCliente.Add(nom_ord[a])
Next
articulo_ord = Var.ordenar(Var.producto)
For a = 0 To articulo_ord.Count - 1
FMain.CbVArticulo.Add(articulo_ord[a])
Next
End
Negocio-0.0.2.tar.gz | ||
Descripción: | Descargar |
|
Nombre del archivo: | Negocio-0.0.2.tar.gz | |
Tamaño: | 19.72 KB | |
Descargado: | 60 veces |
Negocio-0.0.2.tar.gz | ||
Descripción: | Descargar |
|
Nombre del archivo: | Negocio-0.0.2.tar.gz | |
Tamaño: | 19.72 KB | |
Descargado: | 60 veces |
Negocio-0.0.2.tar.gz | ||
Descripción: | Descargar |
|
Nombre del archivo: | Negocio-0.0.2.tar.gz | |
Tamaño: | 19.72 KB | |
Descargado: | 60 veces |