Que me falta aquí?

[nauta]

Gracias por contestar.
Referenta a esto que tu dices TAvonex(Reg).TMes = "TMesC.Text" , realmente si me asigna el valor, por que en Private sub Form_Load le digo MesC.AddItem "Mayo"
Por ejemplo en Mes busco el mes Mayo---En semana igual y en brazo igual
Pincho en altas y me lo pasa a ListBox de esta manera
Mayo
1ª Semana
Brazo Derecho.
Hasta aqui todo bien, pero cuando salgo no me queda nada en el registro
¿Por que?
Lo puse sin entrecomillar TMesC.Text y me da:
Error 424" en tiempo de ejecución
Se requiere un objeto

Tambien creé un modulo

Option Explicit
'Declaración de Registros
Type Avonex
TMes As String * 25
TSemana As String * 25
TBrazo As String * 25
End Type
Global TAvonex(1 To 100) As Avonex
Global Reg As Integer

No sé seguire mirando, pero me pase toda la mañana dandole vueltas y nada.
de todas formas muchas gracias

up!!!!!