vb里面有没有结构体都概念
答案:2 悬赏:80 手机版
解决时间 2021-04-08 07:20
- 提问者网友:你独家记忆
- 2021-04-08 03:21
vb里面有没有结构体都概念
最佳答案
- 五星知识达人网友:怙棘
- 2021-04-08 04:02
VB下不叫结构体,C下才叫结构体,VB下叫用户定义数据类型,用法上基本上一样。
Type 语句示例
该示例使用 Type 语句,定义用户自定义的数据类型。Type 语句只能在模块级使用。如果要在类模块中使用,则必须在 Type 语句前冠以关键字 Private。
Type EmployeeRecord '创建用户自定义的类型。
ID As Integer '定义元素的数据类型。
Name As String * 20
Address As String * 30
Phone As Long
HireDate As Date
End Type
Sub CreateRecord()
Dim MyRecord As EmployeeRecord '声明变量。
'对 EmployeeRecord 变量的赋值必须在过程内进行。
MyRecord.ID = 12003 '给一个元素赋值。
End Sub
------------------------------------------------------------
Type MyType
MyName As String '定义字符串变量存储一个名字。
MyBirthDate As Date '定义日期变量存储一个生日。
MySex As Integer '定义整型变量存储性别
End Type '(0 为女,1 为男)
Type 语句示例
该示例使用 Type 语句,定义用户自定义的数据类型。Type 语句只能在模块级使用。如果要在类模块中使用,则必须在 Type 语句前冠以关键字 Private。
Type EmployeeRecord '创建用户自定义的类型。
ID As Integer '定义元素的数据类型。
Name As String * 20
Address As String * 30
Phone As Long
HireDate As Date
End Type
Sub CreateRecord()
Dim MyRecord As EmployeeRecord '声明变量。
'对 EmployeeRecord 变量的赋值必须在过程内进行。
MyRecord.ID = 12003 '给一个元素赋值。
End Sub
------------------------------------------------------------
Type MyType
MyName As String '定义字符串变量存储一个名字。
MyBirthDate As Date '定义日期变量存储一个生日。
MySex As Integer '定义整型变量存储性别
End Type '(0 为女,1 为男)
全部回答
- 1楼网友:天凉才是好个秋
- 2021-04-08 05:18
像这样定义:
private type pointapi
x as long
y as long
end type
private polypoints(2) as pointapi
polypoints(0).x = 50
polypoints(0).y = 100
polypoints(1).x = 80
....
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯