Cuestión : Agregar los datos para tener acceso a Listbox

Estoy en el acceso 2007 y tengo una forma con una caja de lista. Tengo una pregunta que pueble el listbox inicialmente, pero quiero agregar valores a él en VBA también. He intentado .additem pero no está trabajando. Guarda el decir de que la discusión no es opcional. Debajo está mi code.

lstcount = Me.LstGrants.ListCount
For i = (Me.LstGrants.ListCount + 1) ((Me.LstGrants.ListCount + 1) + año de 4)
= año + el grantdesc
de 1
' Me.LstGrants.AddItem con Me.LstGrants
Do
.AddItem
. Lista (i, 0) = grantdesc
. Lista (i, 1) = extremo With
Next
 del year
class= del

Respuesta : Agregar los datos para tener acceso a Listbox

Quizás esto
1:
2:
3:
4:
5:
6:

Para i = (Me.LstRHFGrants.ListCount + 1) a ((Me.LstRHFGrants.ListCount + 1) + 4)
    año = año + 1
    Con Me.LstRHFGrants
      .AddItem (grantdesc y “; ” y año)
    Extremo con
Después
Otras soluciones  
 
programming4us programming4us