VB6: Extend number of items in combo box

Question

Is there a way to extend the number of items that appear in the VB6 combo instinsic control, when it drops down? I have about 10 items and I'd like to show them all.

Answer 1

This code at Karl Peterson's classic VB website will automatically size the combo box to match the number of elements:

http://vb.mvps.org/samples/FullDrop/

Answer 2

I've used the code here, and can confirm that it works as advertised. If you remove the last SendMessage call, it won't actually dropdown until the user clicks on it.

http://vbnet.mvps.org/index.html?code/comboapi/comboheight.htm