首页 > 代码库 > 【VBA编程】04.使用自定义数据类型

【VBA编程】04.使用自定义数据类型

使用自定义数据类型存储输入数据,并通过弹出窗口展示

【代码区域】

Type lianxiren ‘
name As String
Sex As String
End Type
Sub aa()
 Dim record As lianxiren ‘声明一个lianxiren类型的变量
 record.name = InputBox("请输入名称", "记录联系人信息")
 record.Sex = InputBox("请输入性别", "记录联系人信息")
 MsgBox "姓名:" & record.name & vbLf & "性别:" & record.Sex, vbOKOnly, "联系人基本信息"
End Sub

【代码解释】

第1~4定义一个变量,第6行声明了一个自定义数据类型的变量,第7~8行用于输入所定义的变量值,第9行用于输出所定义的变量的值。

按F5执行,依次输入结果姓名,性别,查看结果

【效果图】

技术分享

技术分享

技术分享

 

【VBA编程】04.使用自定义数据类型