vb6中向函数传递对象

该函数定义如下：

Dim xyzWkB As Excel.workbook
Set xyzWkB = setGetxyzObj(reportFile.Text)
populateListCombo (xyzWkB)

Public Function populateListCombo(activeWkB As Excel.workbook)
......
......
End Function

但在调用

populateListCombo

时执行时，我收到错误“对象不支持此属性”

此处

setGetxyzObj

定义如下：

Dim xyzWkB As Excel.workbook
Set xyzWkB = setGetxyzObj(reportFile.Text)
populateListCombo (xyzWkB)

Public Function populateListCombo(activeWkB As Excel.workbook)
......
......
End Function

---

我也尝试过使用

populateListCombo（setGetxyzObj（））

，但仍然得到相同的错误。

可能重复您是否尝试使用括号调用

populateListCombo

？在Vb6中，当调用方法（与函数相反）时，通常不应使用它们。在没有括号的情况下调用populateListCombo也不起作用。