扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
今天就跟大家聊聊有关type使用方法以及萨姆森异常捕获，可能很多人都不太了解，为了让大家更加了解，小编给大家总结了以下内容，希望大家根据这篇文章可以有所收获。
双辽网站制作公司哪家好，找成都创新互联！从网页设计、网站建设、微信开发、APP开发、响应式网站等网站项目制作，到程序开发，运营维护。成都创新互联于2013年创立到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选成都创新互联。
自定义数据类型
为了使得我们自定义的数据类型在各个sub中使用，就把它定义在通用中，即作为全局变量。
案例：
定义一个学生的数据类型
学生属性：学号、姓名、性别、年龄
建议将自定的 名称的首字母大写，并且不要用中文，自定义的名称的规范就按照变量命名规范
自定义数据类型往往比较喜欢跟数组一起连用
自定义数据类型，其实往往都是定义的是类似于一个对象
注：自定义数据类型，要求私有Private
补充异常捕获的异常描述
使用Err关键字
Err.Description表示错误描述
课堂总结
1、学会自定义数据类型type
2、掌握数据类型的注意点
3、学会排错，异常捕获
4、异常信息的输出
本期界面：
本期源代码：
Private Type Studentsno 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 1Print "学号：" & stu(i).sno _& " 姓名：" & stu(i).sname _& " 性别：" & stu(i).ssex _& " 年龄：" & stu(i).sageNext iGoTo finallycatch:MsgBox "请先载入学生！", vbCritical, "消息"finally:End Sub
看完上述内容，你们对type使用方法以及萨姆森异常捕获有进一步的了解吗？如果还想了解更多知识或者相关内容，请关注创新互联行业资讯频道，感谢大家的支持。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网