Fill ComboBox using VBA

[cynicon]

Hi, every one

I have a combobox called "Me.Cuadro_comb inado17" in ACCESS 2003

How can I add a list via VBA

I need to fill it with the next list

"Cat"
"Dog"
"Fish"

How can I do it?

[mshmyob]

Basically set your RowSource property for the combo box:

Simplified version like so

[code=vb]
Dim strRowSource as String

strRowSource = "Cat;Dog;Fi sh"
Me.Cuadro_combi nado17.RowSourc e = strRowSource
Me.Cuadro_combi nado17.Requery

[/code]

cheers,

[cynicon]

Thank you so much it works perfect

[mshmyob]

You're welcome.

cheers

[beacon]

Personally, I would prefer to use a table for values like you listed cynicon and then write a SQL statement that populates the combobox using mshmyob's method.

This prevents you from having to hard code the values, which I've always been taught to avoid if at all possible.