VB中定义结构体,窗体中可以定义,只能定义成Private,在本窗体中使用。
PrivateTypeMyType
aAsInteger
bAsInteger
EndType
模块中,可以定义成Private,在本模块中使用
PrivateTypeMyType
aAsInteger
bAsInteger
EndType
可以定义成Public,在任何地方都可以使用
PublicTypeMyType
aAsInteger
bAsInteger
EndType
结构体定义以后就成为一种数据类型,和Long等数据类型使用方法类似
PrivateSubForm_Load()
DimxAsMyType
DimyAsMyType
x.a=1
x.b=2
y=x'VB允许结构体像这样整体赋值
ReDimMyArray(1To10)AsMyType
EndSub