试试
Set itemtag = Combo2.AddItem("王平", 234)

解决方案 »

  1.   

    ComboItem是你自己定义的类型吧?先检查你定义的类型对不对,然后再执行wts的代码!
      

  2.   

    你可以改成这样:
    combo2.additem "王平",234
    是可以成功的,参考如下:
    AddItem 方法的语法包含下列部分::部分     描述 
    object   必需的。一个对象表达式,其值为“应用于”列表中的一个对象。 
    Item     必需的。字符串表达式,它用来指定添加到该对象的项目。这仅仅对于 MS Flex Grid     控件,才能使用 tab字符(字符代码 09)分隔将要插入到新添加行中每列的多重字符串。 
    Index    可选的。是整数,它用来指定新项目或行在该对象中的位置。对于 ListBox 或 ComboBox 控件的首项,或者对于 MS Flex Grid 控件的首行,index 为 0。 
    说明如果所给出的 index 值有效,则 item 将放置在 object 中相应的位置。如果省略 index,当 Sorted 属性设置为 True 时,item 将添加到恰当的排序位置,当 Sorted 属性设置为 False 时, item 将添加到列表的结尾。绑定到 Data 控件的 ListBox 或 ComboBox 控件不支持 AddItem 方法。
      

  3.   


    ComboBox的Tag属性是对它本身控件而言的,不能对它的各个Item值,这点你注意了。还有,VB中没有ComboItem类型。