溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

type使用方法以及薩姆森異常捕獲

發(fā)布時(shí)間:2021-11-09 18:13:20 來(lái)源:億速云 閱讀:130 作者:柒染 欄目:大數(shù)據(jù)

今天就跟大家聊聊有關(guān)type使用方法以及薩姆森異常捕獲,可能很多人都不太了解,為了讓大家更加了解,小編給大家總結(jié)了以下內(nèi)容,希望大家根據(jù)這篇文章可以有所收獲。

自定義數(shù)據(jù)類型

為了使得我們自定義的數(shù)據(jù)類型在各個(gè)sub中使用,就把它定義在通用中,即作為全局變量。

案例:

定義一個(gè)學(xué)生的數(shù)據(jù)類型

學(xué)生屬性:學(xué)號(hào)、姓名、性別、年齡

建議將自定的 名稱的首字母大寫(xiě),并且不要用中文,自定義的名稱的規(guī)范就按照變量命名規(guī)范

自定義數(shù)據(jù)類型往往比較喜歡跟數(shù)組一起連用

自定義數(shù)據(jù)類型,其實(shí)往往都是定義的是類似于一個(gè)對(duì)象

注:自定義數(shù)據(jù)類型,要求私有Private

補(bǔ)充異常捕獲的異常描述

使用Err關(guān)鍵字

Err.Description表示錯(cuò)誤描述

課堂總結(jié)

1、學(xué)會(huì)自定義數(shù)據(jù)類型type

2、掌握數(shù)據(jù)類型的注意點(diǎn)

3、學(xué)會(huì)排錯(cuò),異常捕獲

4、異常信息的輸出

本期界面:

type使用方法以及薩姆森異常捕獲

本期源代碼:

Private Type Student
   sno As Long '學(xué)號(hào)    sname As String '姓名    ssex As String '性別    sage As Integer '年齡
End Type
Dim stu() As Student
Private Sub Command1_Click()
ReDim stu(2) As Student
stu(0).sno = 1stu(0).sname = "丁丁"stu(0).ssex = "男"stu(0).sage = 10
stu(1).sno = 2stu(1).sname = "冬冬"stu(1).ssex = "女"stu(1).sage = 11
stu(2).sno = 3stu(2).sname = "小剛"stu(2).ssex = "男"stu(2).sage = 10MsgBox "學(xué)生載入成功", vbApplicationModal, "通知"End Sub
Private Sub Command2_Click()On Error GoTo catchtry:Dim i%For i = 0 To UBound(stu) Step 1
   Print "學(xué)號(hào):" & stu(i).sno _        & " 姓名:" & stu(i).sname _        & " 性別:" & stu(i).ssex _        & " 年齡:" & stu(i).sage
Next iGoTo finallycatch:MsgBox "請(qǐng)先載入學(xué)生!", vbCritical, "消息"finally:
End Sub

看完上述內(nèi)容,你們對(duì)type使用方法以及薩姆森異常捕獲有進(jìn)一步的了解嗎?如果還想了解更多知識(shí)或者相關(guān)內(nèi)容,請(qǐng)關(guān)注億速云行業(yè)資訊頻道,感謝大家的支持。

向AI問(wèn)一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI