Combobox

Hola.

Estoy haciendo un programita de electronica, que ya lo tenia en VB6
funcionando y me acabo de tropezar con que esto no lo acepta evb :

'Establece los valores de los combox
With Combo1 'Tipo de antena TX
.Clear
.AddItem "Tipo de antena TX"
.AddItem "Yagui 400 Mhz."
.AddItem "Yagui 900 Mhz."
.AddItem "Yagui 1600 Mhz."
.AddItem "Helecoidal 900 Mhz."
.AddItem "Helecoidal 1600 Mhz."
.AddItem "Parab. 1,2 m. 1600 Mhz."
.AddItem "Parab. 1,8 m. 1600 Mhz."
.AddItem "Parab. 1,8 m. 2500 Mhz."
.AddItem "Parab. 2,4 m. 2500 Mhz."
.AddItem "Parab. 3,0 m. 2500 Mhz."
.AddItem "Parab. 1,2 m. 7 Ghz."
.AddItem "Parab. 0,6 m. 10 Ghz."
.AddItem "Parab. 1,2 m. 10 Ghz."
.AddItem "Parab. 1,8 m. 10 Ghz."
.AddItem "Parab. 2,4 m. 10 Ghz."
.AddItem "Parab. 60 cm. 15 Ghz."
.AddItem "Parab. 1,8 m. 15 Ghz."
.AddItem "Parab. 60 cm. 18 Ghz."
.AddItem "Parab. 1,2 m. 18 Ghz."
.AddItem "Parab. 30 cm. 23 Ghz."
.AddItem "Parab. 60 cm. 23 Ghz."
.AddItem "Parab. 30 cm. 38 Ghz."
.AddItem "Parab. 60 cm. 38 Ghz."
.ListIndex = 0
End With


Podeis decirme porque, si en custom lo pongo a mano si funciona en el combox
pero por codigo no me sale.

Ayuda
S@ludos...