vb編程技術(shù)用戶定義與枚舉類型-wenkub
2022-11-03 05:13:28 本頁面
【正文】 為 Private Sub Command3_Click() Unload Me End Sub 列表框 List1的 Click事件代碼為 Private Sub List1_Click() n = + 1 第 9章 用戶定義與枚舉類型 Text1(0).Text = stu(n).no Text1(1).Text = stu(n).na Text1(2).Text = stu(n).ch Text1(3).Text = stu(n).en Text1(4).Text = stu(n).ma End Sub 另外編寫文本框組的事件代碼 ， 使之方便輸入 Private Sub Text1_GotFocus(Index As Integer) Text1(Index).SelStart = 0 第 9章 用戶定義與枚舉類型 Text1(Index).SelLength = Len(Text1(Index).Text) End Sub Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer) If KeyAscii = 13 Then i = IIf(Index = 4, 0, Index + 1) Text1(i).SetFocus End If End Sub 程序運(yùn)行結(jié)果如圖 。 _ 第 9章 用戶定義與枚舉類型 Format(.ma, ) amp。 平均成績定義為單精度數(shù) 第 9章 用戶定義與枚舉類型 End Type Dim stu() As studentrec 39。 學(xué)號(hào)變量定義為 5個(gè)字符長度 ch As Single 39。 設(shè)計(jì)方法如下： (1) 選擇新建工程，進(jìn)入窗體設(shè)計(jì)器。 存取記錄數(shù)組元素中某個(gè)字段數(shù)據(jù)的語法為 〈 記錄數(shù)組元素 〉 .〈 字段名 〉 第 9章 用戶定義與枚舉類型 【 例 92】 假設(shè)某班有 40位學(xué)生 ， 每位學(xué)生一個(gè)記錄 ， 定義一個(gè)包含 40個(gè)元素的用戶定義數(shù)組 ， 并給第10位學(xué)生賦值 。 學(xué)分元素為整型 avg As Single 39。 設(shè)計(jì)步驟如下： (1) 建立應(yīng)用程序用戶界面并設(shè)置對象屬性 ， 如圖 。 在 VB中提供了定義記錄結(jié)構(gòu)的語句 ， 稱這種語句為用戶定義數(shù)據(jù)類型 (user defined data type)。第 9章 用戶定義與枚舉類型 第 9章 用戶定義與枚舉類型 用戶定義類型 枚舉類型 滾動(dòng)條控件 習(xí)題九 第 9章 用戶定義與枚舉類型 用戶定義類型 用戶定義數(shù)據(jù)類型的概念 在 VB中，可以用系統(tǒng)提供的標(biāo)準(zhǔn)類型定義變量，它們都是計(jì)算機(jī)處理的基本數(shù)據(jù)項(xiàng)。 第 9章 用戶定義與枚舉類型 用戶可以用 Type語句來定義自己的數(shù)據(jù)類型 ， 其格式為 [Public | Private] Type 〈 用戶類型名 〉 〈 字段名 1〉 As 〈 類型名 1〉 [〈 字段名 2〉 As 〈 類型名 2〉 ] [〈 字段名 n〉 As 〈 類型名 n〉 ] End Type 第 9章 用戶定義與枚舉類型 建立和使用用戶定義類型變量 1. 建立用戶定義類型變量 用戶數(shù)據(jù)類型定義后 ， 可以用 Dim、 Redim、 Static建立一個(gè)具有這種數(shù)據(jù)類型的變量 。 (2) 在窗體模塊的通用段創(chuàng)建用戶定義類型： 第 9章 用戶定義與枚舉類型 Private Type studentrec stunum As
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1