Comment alimenter un combobox en vb6

Bonjour,

j'ai un petit problème surement simple j'ai un j'ai un label "quel est votre age" puis à coté un combobox son code est :

Public Sub Combo1_change()
Dim X As byte

For X = 1 to 80
Combo1.AddItem X
next X

Combo1.ListIndex = 0
end sub

donc quand j'exécute le petit programme mon combo box est vide et je suis obliger de taper sur un chiffre pour que tout les chiffres s'affiche ce qui est embêtant donc je voudrait savoir comment on fait pour alimenter le combobox en vb6 je voudrait juste metre des chiffre. Merci de vaut réponse :)