溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
今天就跟大家聊聊有關type使用方法以及薩姆森異常捕獲，可能很多人都不太了解，為了讓大家更加了解，小編給大家總結了以下內容，希望大家根據這篇文章可以有所收獲。
自定義數據類型
為了使得我們自定義的數據類型在各個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使用方法以及薩姆森異常捕獲有進一步的了解嗎？如果還想了解更多知識或者相關內容，請關注億速云行業資訊頻道，感謝大家的支持。
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
