Question

vb 调试时候弹出编译错误,要求对象:

把以下代码屏蔽就好了
'陈磊
Dim pm(0 To 2) As Double
Dim pm1(0 To 2) As Double
Set pm(0) = 0
Set pm(1) = 0
Set pm1(0) = 0
Set pm1(1) = 0
哥哥,怎样才能驴唇对上马嘴?光牢骚解决不了问题

Answer 1

set 语句 将对象引用赋给变量或属性
你定义 pm为变量 却用set 当然是牛头不对马嘴。。
Dim pm(0 To 2) As Double
Dim pm1(0 To 2) As Double
pm(0) = 0
pm(1) = 0
pm1(0) = 0
pm1(1) = 0

这样就好

Answer 2

变量的赋值不能使用set 直接用等号就可以了