vb25

来源:互联网 发布:读取身份证照片软件 编辑:程序博客网 时间:2024/06/07 04:22
Private Sub Command1_Click()
Type student
name As String
stuno As String
sex As Boolean
age As Byte
prof As String
grade As String
End Type
Dim gaowenjing As student
gaowenjing.name = "高文静"
gaowenjing.stuno = "15050441012"
gaowenjing.sex = female
gaowenjing.age = 19
gaowenjing.prof = "教技"
gaowenjing.grade = 750
End Sub
0 0
原创粉丝点击