今天就跟大家聊聊有关type使用方法以及萨姆森异常捕获，可能很多人都不太了解，为了让大家更加了解，小编给大家总结了以下内容，希望大家根据这篇文章可以有所收获。
自定义数据类型
为了使得我们自定义的数据类型在各个sub中使用，就把它定义在通用中，即作为全局变量。
案例：
定义一个学生的数据类型
学生属性：学号、姓名、性别、年龄
建议将自定的 名称的首字母大写，并且不要用中文，自定义的名称的规范就按照变量命名规范
自定义数据类型往往比较喜欢跟数组一起连用
自定义数据类型，其实往往都是定义的是类似于一个对象
注：自定义数据类型，要求私有Private
补充异常捕获的异常描述
使用Err关键字
Err.Description表示错误描述
课堂总结
1、学会自定义数据类型type
2、掌握数据类型的注意点
3、学会排错，异常捕获
4、异常信息的输出
本期界面：
本期源代码：
计算
安全
数据库
网络和加速
企业服务
Private Type Student sno As Long '学号 sname As String '姓名 ssex As String '性别 sage As Integer '年龄End TypeDim stu() As StudentPrivate Sub Command1_Click()ReDim stu(2) As Studentstu(0).sno = 1stu(0).sname = "丁丁"stu(0).ssex = "男"stu(0).sage = 10stu(1).sno = 2stu(1).sname = "冬冬"stu(1).ssex = "女"stu(1).sage = 11stu(2).sno = 3stu(2).sname = "小刚"stu(2).ssex = "男"stu(2).sage = 10MsgBox "学生载入成功", vbApplicationModal, "通知"End SubPrivate Sub Command2_Click()On Error GoTo catchtry:Dim i%For i = 0 To UBound(stu) Step 1 Print "学号：" & stu(i).sno _ & " 姓名：" & stu(i).sname _ & " 性别：" & stu(i).ssex _ & " 年龄：" & stu(i).sageNext iGoTo finallycatch:MsgBox "请先载入学生！", vbCritical, "消息"finally:End Sub看完上述内容，你们对type使用方法以及萨姆森异常捕获有进一步的了解吗？如果还想了解更多知识或者相关内容，请关注亿速云行业资讯频道，感谢大家的支持。
亿速云「云服务器」，即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘，价格低至29元/月。点击查看>>
免责声明：本站发布的内容（图片、视频和文字）以原创、转载和分享为主，文章观点不代表本网站立场，如果涉及侵权请联系站长邮箱：is@yisu.com进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
原文链接：https://my.oschina.net/u/4581662/blog/4374453
