使用 ImageCombo 也不错，不过怎么用呢？(再发)

[iamfancy]

我用了一个 ImageList 保存了若干图片，然后把 ImageCombo 的相关属性改为了这个 ImageList，但是，运行时 ImageCombo 没有内容啊？
告诉怎么办啊？

上次发的那个贴子居然会链接上别人的文章？谁知道为什么？告诉我！

[setmenothing]

imagecombo1.additem 1
imagecombo1.comboitems(1).image = 1

[TechnoFantasy]

首先需要添加一个ImageList控件，然后设定ImageCombo 的Custom中设定与ImageList连接
下面是添加项到ImageCombo 的代码：
Private Sub Form_Load()
Dim x As ComboItem
For i = 1 To 3
Set x = ImageCombo1.ComboItems.Add
x.Text = "abcd" + Str(i)
x.Image = i
Next i
End Sub

[iamfancy]

setmenothing() 所说有误，ImageCombo 是没有 addItem 方法的
只能使用 ImageCombo1.ComboItems.Add 方法

TechnoFantasy(www.applevb.com) 的方法我没有试过，但思路正确。只是有点麻烦。
不妨直接使用 ImageCombo1.ComboItems.Add , , "abcd" & i, i