0

非常基本的问题。

我有一个单一的表单，想要创建一个对象（我认为）并为其分配一个值。

Dim Devs as Object

    For i = 0 To 3
        If (Devices And 2 ^ i) Then
            Devs(i) = True ' breaks here
        Else
            Devs(i) = False 'or here (depends on the if obviously)
        End If
    Next i

有了这个我得到一个错误：对象变量或未设置块变量

我以为我可以只创建一个数组或对象并分配一个值，但我想我错了。

这样做的正确方法是什么？

4

2 回答 2

3

看起来你想要一个布尔数组

Dim Devs(0 To 3) As Boolean

您当前的代码有一个未指向任何对象的 Object 变量。

于 2013-10-02T21:04:12.133 回答
2

您的Devs变量似乎是布尔类型的数组。正确的？

Dim Devs(0 To 3) As Boolean()

或者

Dim Devs() As Boolean()

此外， 的目的是2 ^ i什么？您是否打算验证其值以输入第一个代码括号。

Dim myCondition As Integer
myCondition = 2

If (Devices = True And 2 ^ i = myCondition)
  ...
于 2013-10-02T20:06:29.013 回答