UDT problems

[TerryRitchie]

Neither of these 2 functions work:

Code: (Select All)

Type BitStruct
  xbit As _Bit
End Type

Dim BitStructure As BitStruct
BitStructure.xbit = 0
Print BitStructure.xbit

Code: (Select All)

type StructType
  Array(10) As Integer
End Type

Dim Structure As StructType
Structure.Array(10) = 10

Bit length variables and arrays are not allowed inside UDTs.