Cita:
Iniciado por erbuson 
Hola:
Pegaré aqui va función que es muy simple pero aqui la dejo para otros, a ti te la había adjuntado en el archivo que te mandé.
Código vb:
Ver originalPublic Sub ComboAdd(Combo As ComboBox, Item As String)
' Añade Item al combo indicado si no está en el
Dim Indice As Single
For Indice = 0 To Combo.ListCount - 1
' Si lo encuentra simplemente salimos
If Combo.List(Indice) = Item Then Exit Sub
Next
' Si no hemos salido, debemos añadirlo
Combo.AddItem Item
End Sub
Lo que hace esta función es añadir elementos a un combo controlando que no esté ya en él, en tu caso está aplicada para permitirte seleccionar un día de la semana del grid o sea, que aunque tengas 4 veces Martes en la columna x y 3 veces Jueves y 5 Lunes, en el combo sólo lo tendrás una vez.
Respecto a tu pregunta de lo que significa las variables que se definen, le estamos diciendo que cuando llamemos a ComboAdd le pasaremos como primer parámetro un objeto que es un ComboBox y como segundo una variable de Cadena a la que le pongo el nombre de Item para verlo mas claro.
Por ejemplo lo que no puedes hacer es llamar a la función de la siguiente manera:
Call ComboAdd(CajaTexto, 1215)
en primer lugar porque el primer parámetro es un TextBox y la rutina espera un ComboBox y el Segundo es un Numero y la rutina espera una cadena, por ejemplo la llamada correcta seria:
Call ComboAdd(MiCombo, "Lunes")
Saludos
hola erbuson!
Entonces si he entendido bien lo que realmente estas diciendo en esa funcion es que en un combobox como puede ser textbox u otro comando le añadas si es asi :
Public Sub TextAdd(Text As TextBox, Item As String) ?Aqui un texto en un Textbox
y aqui un
Public Sub ComboAdd(Combo As ComboBox, Item As String) 'Y aqui en un combo
o lo que definamos y le introducimos ese nuevo item igual que hicistes con el Msflexgrid, no que estemos haciendo un combobox especial.
O resumiendo estas llamando a un combo, text, label X( de los 1000 que puedas tener) y le insertamos el item que queremos, asi controlamos en cualquier momento cualquier combo, textbox, etc.
Es asi, no???
Un saludo