如何声明一系列的用户定义的类型的维生素b6在[封闭]

Question

Type ABFator
    a As Single
    b As Sinlge
End Type

Dim ABFactorArr(8) As ABFactor

'基本上，我想要声明一系列八个ABFactors哪我可以随后的访问

我做这个编译器给人错误用户定义的类型未定义

感谢

Answer 1

拼写错误？失踪c？

• 你定义的类型 ABFator 没有c
• 你已经放阵列 ABFactor 一个c

你也拼写错误 Single 在你这种类型的定义

或者也许你需要做的类型 Public, 你是界定它在一个模块，并用它在另一个？

(请复制和粘贴到你的问题在未来，正如你已经拼ABFactor三个不同的方式，在你的问题!)

Answer 2

在页面的顶部中的代码将这个Form1的后面：

Private Type ABFactor
    a As Single
    b As Single
End Type


Private Sub Form_Load()

Dim ABFactorArr(8) As ABFactor
Dim i As Byte
For i = 0 To UBound(ABFactorArr)
    ABFactorArr(i).a = i
    ABFactorArr(i).b = i + 10
Next i
'quick test
Debug.Print ABFactorArr(6).b

End Sub