VBA教程:包含数组的用户定义类型

2015-05-31 21:42 阅读 161 次 评论关闭

用户定义类型可以包含一个普通数组(固定大小的数组)。例如:

Type SystemInfo
   CPU As Variant
   Memory As Long
   DiskDrives(25) As String   '固定大小的数组。
   VideoColors As Integer
   Cost As Currency
   PurchaseDate As Variant
End Type

用户类型中也可以包含动态数组。

Type SystemInfo
   CPU As Variant
   Memory As Long
   DiskDrives() As String      '动态数组。
   VideoColors As Integer
   Cost As Currency
   PurchaseDate As Variant
End Type

可以采用访问对象中的属性的方法来访问用户定义类型中数组的值。

Dim MySystem As SystemInfo
ReDim MySystem.DiskDrives(3)
MySystem.DiskDrives(0) = "1.44 MB"

也可以声明属于用户定义类型的数组:

Dim AllSystems(100) As SystemInfo

可以采用同样的规则访问这一数据结构中的元素。

AllSystems(5).CPU = "386SX"
AllSystems(5).DiskDrives(2) = "100M SCSI"
版权声明:本文著作权归原作者所有,欢迎分享本文,谢谢支持!
转载请注明:VBA教程:包含数组的用户定义类型 | 猎微网

评论已关闭!