Bcbo为Form 2.0 的Combobox,如何定义其过程？

Question

我所引用的Combobox的控件为form2.0的控件（其参数较好），不是VB本身的，想定义其过程，老是出错，如何是好
form1表单上有 f2cbo为form2.0的combobox控件
call aa(f2cbo)
sub aa(cbo as combobox)
 msgbox cbo.text
ens sub-------------
提示出错,cbo参数不对

Answer 1

这样就可以了，将combobox 改为 control类型
Private Sub Command1_Click()
    aa ComboBox1
End SubPrivate Sub Form_Load()
    ComboBox1.AddItem "呵呵"
End Sub
Sub aa(cbo As Control)
    MsgBox ComboBox1.Text
End Sub

Answer 2

解决办法：
定义为object型，避免类型检查
sub aa(cbo as object)
 msgbox cbo.text
ens sub

Answer 3

昨天就告你了，这样用：
Sub AA(ByVal ctl As MSForms.ComboBox)
MsgBox ctl.ListCount, 64, ctl.Text
End SubPrivate Sub Command1_Click()
AA ComboBox1
End SubPrivate Sub Form_Load()
For I = 1 To 10
ComboBox1.AddItem I
Next
ComboBox1.Text = "呵呵"
End Sub