【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執行，依次輸入結果姓名，性別，查看結果

【效果圖】