VB中使用String$ 提示我“找不到工程或库”

Question

怎么办？大虾请指教。

Answer 1

打开引用菜单,里面会有一些你引用的dll或者是ocx丢失了,重新引用就可以了

Answer 2

把引用去掉重新引用就是了，vba太麻烦

Answer 3

刚才的那个地方的问题解决了，现在下面这个函数还是提示“找不到工程或库”
Private Sub ListRefresh()
CtgList.ClearItems
Dim MyItem As New HBIM_Market.Province
MyItemList = MyItem.GetInfoX()
If IsNumeric(MyItemList) = False Then
    For i = 0 To UBound(MyItemList)
        nIndex = CtgList.AddItem(CStr(MyItemList(i).id) + Chr(10) + MyItemList(i).Name + Chr(10) + MyItemList(i).Code + Chr(10) + CStr(MyItemList(i).Order))
    Next
Else
    MsgBox ("没有省份信息")
End If
Set MyItemList = Nothing
DelList = "*"
EditList = "*"
End Sub
请大虾继续解答。
解决问题后加分。

Answer 4

是不是没有引用“HBIM_Market”？