Type （别名）
为类型声明替代名称
typename
symbol 或者Enum声明可以引用包括内部数据类型Sub或Function指针，Type声明，Union声明或Enum声明的任何声明的数据类型。
类型别名可用于允许过程声明中的参数的前向声明，但仅用于通过引用（不包括数组）传递的指针或参数。
类型别名也可用于允许用户定义的类型中的数据字段的前向声明，但仅用于指针。
语法
参数
typename
新的替代名称。
symbol 符号或数据类型声明与typename 关联。
说明
symbol 或者Enum声明可以引用包括内部数据类型Sub或Function指针，Type声明，Union声明或Enum声明的任何声明的数据类型。
类型别名可用于允许过程声明中的参数的前向声明，但仅用于通过引用（不包括数组）传递的指针或参数。
类型别名也可用于允许用户定义的类型中的数据字段的前向声明，但仅用于指针。
例子
Type ParentFwd As Parent
Type Child
Name As ZString * 32
ParentRef As ParentFwd Ptr
''...
End Type
Type Parent
Name As ZString * 32
ChildList(0 To 9) As Child
''...
End Type
Dim p As Parent
p.Name = "富"
With p.ChildList(0)
.Name = "Jr."
.ParentRef = @p
''...
End With
With p.ChildList(0)
Print .Name; "是孩子"; .parentRef->Name
End With
Type Child
Name As ZString * 32
ParentRef As ParentFwd Ptr
''...
End Type
Type Parent
Name As ZString * 32
ChildList(0 To 9) As Child
''...
End Type
Dim p As Parent
p.Name = "富"
With p.ChildList(0)
.Name = "Jr."
.ParentRef = @p
''...
End With
With p.ChildList(0)
Print .Name; "是孩子"; .parentRef->Name
End With
与QB差别
- 新的FreeBASIC
参考