Visual Basic array en ComboBox de Visual Basic 6

Publicado el Mie 3 de Marzo del 2021 a las 15:32

En este tutorial veremos como ingresar un array en un ComboBox de Visual Basic 6.0

Ingresar array en ComboBox de Visual Basic 6

Modulo 1

Option Explicit

Public Function AddCombo(xCombo As ComboBox, xDatos As String)

    Dim xItems() As String
    Dim I As Integer

    xItems  = Split(xDatos, ",")
     For I = 0 To UBound( xItems)
        xCombo.AddItem  xItems(I)
    Next I
End Function

Form1

Ingresar un ComboBox y CommandButton

Option Explicit
 
 Private Sub CommandButton1_Click()
 Dim xDatos As String
   
     xDatos = "Dato1, Dato2, Dato3"
 
     Call  AddCombo (ComboBox1, xDatos)
 End Sub

Yal Publicidad
Yuri Lizama