為大家收集整理了《2014全國計算機二級VB上機考試試題》供大家參考，希望對大家有所幫助?。?！
一、基本操作題
(1)在名為Form1的窗體上繪制一個名為Lab1的標簽，其標題為空白，BorderStyle 屬性為1，Visible屬性為False;一個名為Txt1的文本框，其Text屬性為空白;一個名為Cmd1 的命令按鈕，其標題為“顯示”。編寫命令按鈕Click事件過程，使得程序運行后，在文本 框中輸入“計算機VB等級考試”，然后單擊命令按鈕，則文本框消失，并在標簽內(nèi)顯示文 本框中的內(nèi)容。運行后的窗體如圖57-1所示。
圖 57-1
注意：程序中不得使用任何變量;文件必須存放在考生文件夾中，工程文件名為vbsj1.vbp，窗體文件名為vbsj1.frm。
(2)在名為Form1的窗體上建立一個名為Opt1的單選按鈕數(shù)組，含3個單選按鈕，它們的標題依次為“A選項”、“B選項”和“C選項”，其下標分別為0、1、2。初始狀態(tài)下，“C選項”為選中狀態(tài);再繪制一個文本框，名稱為Txt1，內(nèi)容為空白。編寫適當?shù)氖录^程，使程序運行后，選中相應的單選按鈕。則在文本框Txt1中顯示該單選按鈕的標題。
運行后的窗體如圖57-2所示。
圖 57-2
注意：文件必須存放在考生文件夾中，工程文件名為 vbsj2.vbp ，窗體文件名為vbsj2.frm。
二、簡單應用題
(1)在考生文件夾中有一個工程文件 vbsj3.vbp 及其窗體文件 vbsj3.frm。在名為 Form1的窗體中有一個名為 Txt1 的文本框;請在窗體上繪制兩個名稱分別為 Fra1 和 Fra2 的框架， 其標題分別為“性別”和“身份”;在 Fra1 中繪制兩個名稱分別為 Opt1 和 Opt2 的單選按 鈕，其標題分別為“男”和“女”;在 Fra2 中繪制兩個名稱分別為 Opt3 和 Opt4 的單選按 鈕，其標題分別為“學生”和“老師”;再繪制一個名為 Cmd1 的命令按鈕，其標題為“確 定”。程序界面如圖 57-3 所示。
圖 57-3
請編寫適當?shù)氖录^程，使得在運行時，在 Fra1、Fra2 中選一個單選按鈕，然后單 擊“確定”按鈕，就可以按照下表把結果顯示在文本框中。
注意：不得修改窗體文件中已經(jīng)存在的程序和 Txt1 的屬性，在結束程序運行之前， 必須進行能夠產(chǎn)生上表中一個結果的操作;必須用窗體右上角的關閉按鈕結束程序，否則 無成績。最后保存修改后的文件。
(2)在名為Form1的窗體上建立一個名為Txt1的文本框;建立一個名為Cmd1的命令按鈕，其標題為“計算”。要求程序運行后，如果單擊“計算”按鈕，則求出1~30之間所有可以被7整除的數(shù)的乘積并在文本框中顯示出來，如圖57-4所示，結果存入考生文件夾中的dw2.dat文件中。
圖 57-4
在考生的文件夾中有一個 model.bas 標 準 模 塊 ，該模 塊 中 提供 了保存文件的過程writedata，考生可以直接調(diào)用。
注意：文件必須存放在考生文件夾中，窗體文件名為 vbsj4.frm ，工程文件名為vbsj4.vbp。
三、綜合應用題
在窗體 Form1 上建立 3 個名稱分別為 mnuRead、mnuCalc 和 mnuSave 的主菜單，它 們的標題分別為“讀數(shù)”、“計算”和“保存”，然后繪制一個名稱為 Txt1 的文本框，其 MultiLine 屬性設置為 True，ScrollBars 屬性設置為 2。
程序運行后，如果執(zhí)行“讀數(shù)”命令，則讀入 dr1.dat 文件中的 100 個整數(shù)，放入一 個數(shù)組中，數(shù)組的下界為 1;如果執(zhí)行“計算”命令，則把該數(shù)組中小于 50 的元素在文 本框中顯示出來，求出它們的和，并把所求得的和在窗體上顯示出來，如圖 57-5 所示; 如果執(zhí)行“保存”命令，則把所求得的和存入考生文件夾下的 dw2.dat 文件中。
在考生文件夾下有一個工程文件 vbsj5.vbp，考生可以裝入該文件。窗體文件 vbsj5 中 的 ReadData 過程可以把 dr1.dat 文件中的 100 個整數(shù)讀入 Arr 數(shù)組中;而 WriteData 過程 可以把指定的整數(shù)值寫到考生文件夾指定的文件中(整數(shù)值通過計算求得，文件名為 dw2.dat)。
圖 57-5
注意：考生不得修改窗體文件中已經(jīng)存在的程序。保存時，工程文件名仍為 vbsj5.vbp， 窗體文件名仍為 vbsj5.frm。
一、基本操作題
第 1 小題
【審題分析】要在程序運行時實現(xiàn)題目所要求的功能，只需在命令按鈕 Click 事件過程中用代碼設置文本框的 Visible 屬性值為 False，將文本中的內(nèi)容賦值給標簽的Caption屬性，設置標簽的 Visible 屬性值為 True。
【操作步驟】
步驟 1：新建一個"標準 EXE"工程，按表 57-1 在窗體中畫出控件并設置其相關屬性。
步驟 2：打開代碼編輯窗口，編寫命令按鈕的 Click 事件過程。
參考代碼：
Private Sub Cmd1_Click()
Txt1.Visible = False
Lab1.Caption = Txt1.Text
Lab1.Visible = True
End Sub
步驟 3：按要求將文件保存至考生文件夾中。
第 2 小題
【審題分析】要在程序運行時實現(xiàn)題目所要求的功能，需在單選按鈕數(shù)組的 Click 事件過程中，將當前選中單選按鈕(索引號為參數(shù) Index)的標題顯示在文本框中。
【操作步驟】
步驟 1：新建一個"標準 EXE"工程，在窗體中畫出一個文本框，并用"復制"和"粘貼"方法畫出一個包含 3 個元素的單選按鈕數(shù)組，按表 57-2 設置其相關屬性。
步驟 2：打開代碼編輯窗口，編寫命令按鈕的 Click 事件過程。
參考代碼：
Private Sub Opt1_Click(Index As Integer)
Txt1.Text = Opt1(Index).Caption
End Sub
步驟 3：按要求將文件保存至考生文件夾中。
二、簡單應用題
第 1 小題
【知識點播】①某容器(如窗體和框架)中的單選按鈕(OptionButton)組常用于提供多個選項間的選擇，其 Value 屬性用于設置或返回每個單選按鈕的選中狀態(tài)：值為False 時表示未被選中，值為 True 時表示被選中，其 Caption 屬性來設置或返回單選按鈕的標題內(nèi)容。
②分支控制結構是結構化程序設計的基本結構之一，它所要解決的是根據(jù)條件判斷的結果決定程序執(zhí)行的流向。選擇控制結構就是其中一種，它是由 2 分支構成的，就是說，條件要么是真，要么是假，沒有其他的選擇。在執(zhí)行結構時按照所指定的條件進行判斷并選擇其中一組語句來執(zhí)行。If 語句就是一種選擇控制結構，其一般語法為：
If 條件 Then語句塊A Else
語句塊B End If
功能：判斷條件，如果條件為"真"，則執(zhí)行語句塊 A 部分，反之則執(zhí)行語句塊 B 部分。
【審題分析】根據(jù)題目要求，在本題的程序設計上，以 Fra1 中的 Opt1 是否選中作為If?Then?Else 語句的條件，由此分出兩種情況，Opt1 被選中或 Opt2 被選中。在條件為真(即 Opt1 被選中)時，再使用一個嵌套的 If?Then?Else 語句對 Fra2 中 Opt3 和 Opt4的選中情況進行分類，當 Opt3 被選中時，文本框中顯示"我是男學生"，否則顯示"我是女學生";同理在條件為假(即 Opt2 被選中)時，也用類似方法處理。這樣一共就有四種可能：Opt1 和 Opt3 被選中、Opt1 和 Opt4 被選中、Opt2 和 Opt3 被選中或 Opt2 和 Opt4被選中，對于可能出現(xiàn)的不同選擇對照題目中表的規(guī)定，修改 Txt1 的 Text 屬性值，以顯示不同內(nèi)容。以上判斷和顯示操作均在 Cmd1 的 Click 事件中完成。
【操作步驟】
步驟 1：打開考生文件夾下的本題工程文件 vbsj3.vbp。
步驟 2：在窗體 Form1 中加入兩個框架和一個命令按鈕，然后在每個框架中各加入兩個單選按鈕，分別設置它們的相關屬性，屬性及其值見表 57-3。
步驟 3：打開代碼編輯窗口輸入如下代碼：
參考代碼：
Private Sub Cmd1_Click()
If Opt1.Value = True Then
If Opt3.Value = True Then
Txt1.Text = Opt1.Caption + Opt3.Caption
Else
Txt1.Text = Opt1.Caption + Opt4.Caption
End If
Else
If Opt3.Value = True Then
Txt1.Text = Opt2.Caption + Opt3.Caption
Else
Txt1.Text = Opt2.Caption + Opt4.Caption
End If
End If
End Sub
步驟 4：按要求將文件保存至考生文件夾中。
【考試誤區(qū)】在一個容器中的多個單選按鈕只能有一個被選中，由此分出不同分支，理清思路是關鍵。
第 2 小題
【審題分析】本題程序設計思路：在"計算"按鈕的單擊事件過程中，將 For 循環(huán)語 句的循環(huán)變(如變I 的值為 1~30 間的所有整數(shù))的取值逐一除以 7，并將能被 7 整除 的整數(shù)累積入一個變(如 temp)，判斷整數(shù) A 能被整數(shù) B 整除的條件表達式為 A Mod B=0。然后將循環(huán)結束時變temp 的值顯示在文本框中，并調(diào)用本題源程序所提供標準模塊 model.bas 中的 writedata 過程，將變temp 的值存入文件 dw2.dat。
【操作步驟】
步驟 1：新建一個"標準 EXE"工程，按表 57-4 在窗體 Form1 中畫出控件并設置其屬性。
步驟 2：選擇【工程】?【添加模塊】命令，打開添加模塊對話框，將考生文件夾下的model.bas 添加到當前工程中。
步驟 3：打開代碼編輯窗口，編寫"計算"按鈕的單擊事件過程。
步驟 4：按要求將文件保存至考生文件夾中。
【考試誤區(qū)】在調(diào)用過程保存數(shù)據(jù)時，一定要根據(jù)過程的定義正確傳遞參數(shù)。
三、綜合應用題
【審題分析】本題源程序已提供 ReadData 和 WriteData 兩個自定義過程，只需編寫"讀數(shù)"、"計算"和"保存"命令的單擊事件過程，并在事件過程中調(diào)用 ReadData 和 WriteData自定義過程。程序設計思路：在"讀數(shù)"菜單項的 Click 事件過程中，通過調(diào)用 ReadData過程將數(shù)據(jù)從 dr1.dat 文件讀入到數(shù)組 Arr(窗體變)中;在"計算"菜單項的 Click 事 件過程中，利用 For 循環(huán)語句(循環(huán)變i 的初值為 1，終值為 100)依次將數(shù)組 Arr 中小于 50 的元素的值顯示在文本框中(條件表達式為 Arr(i)<50)，并將其值累加到變 Sum，循環(huán)結束后將結果顯示在窗體上。在"保存"菜單項的 Click 事件過程中，通過調(diào)用WriteData 過程將 Sum 的值寫入數(shù)據(jù)文件 dw3.dat。
注意：調(diào)用 WriteData 過程時需傳遞參數(shù) dw3.dat 和 Sum，變Sum 應聲明為窗體變
【操作步驟】
步驟 1：打開考生文件下的本題工程文件 vbsj5.vbp，利用菜單設計器，按表 57-5 中的設置建立菜單項。
步驟 2：在窗體 Form1 中畫一個文本框，其相關屬性及其值見表 57-6。
步驟 3：在代碼編輯窗口，分別編寫"讀數(shù)"、"計算"和"保存"按鈕的 Click 事件過程。
參考代碼：
Dim sum As Integer
Private Sub mnuCalc_Click()
For i = 1 To 100
If Arr(i) < 50 Then
Txt1.Text = Txt1.Text & Arr(i) & Space(5)
sum = sum + Arr(i)
End If
Next
Print sum
End Sub
Private Sub mnuRead_Click()
ReadData
End Sub
Private Sub mnuSave_Click()
WriteData "dw3.dat", sum
End Sub
步驟 4：按要求將文件保存至考生文件夾中。
一、基本操作題
(1)在名為Form1的窗體上繪制一個名為Lab1的標簽，其標題為空白，BorderStyle 屬性為1，Visible屬性為False;一個名為Txt1的文本框，其Text屬性為空白;一個名為Cmd1 的命令按鈕，其標題為“顯示”。編寫命令按鈕Click事件過程，使得程序運行后，在文本 框中輸入“計算機VB等級考試”，然后單擊命令按鈕，則文本框消失，并在標簽內(nèi)顯示文 本框中的內(nèi)容。運行后的窗體如圖57-1所示。
圖 57-1
注意：程序中不得使用任何變量;文件必須存放在考生文件夾中，工程文件名為vbsj1.vbp，窗體文件名為vbsj1.frm。
(2)在名為Form1的窗體上建立一個名為Opt1的單選按鈕數(shù)組，含3個單選按鈕，它們的標題依次為“A選項”、“B選項”和“C選項”，其下標分別為0、1、2。初始狀態(tài)下，“C選項”為選中狀態(tài);再繪制一個文本框，名稱為Txt1，內(nèi)容為空白。編寫適當?shù)氖录^程，使程序運行后，選中相應的單選按鈕。則在文本框Txt1中顯示該單選按鈕的標題。
運行后的窗體如圖57-2所示。
圖 57-2
注意：文件必須存放在考生文件夾中，工程文件名為 vbsj2.vbp ，窗體文件名為vbsj2.frm。
二、簡單應用題
(1)在考生文件夾中有一個工程文件 vbsj3.vbp 及其窗體文件 vbsj3.frm。在名為 Form1的窗體中有一個名為 Txt1 的文本框;請在窗體上繪制兩個名稱分別為 Fra1 和 Fra2 的框架， 其標題分別為“性別”和“身份”;在 Fra1 中繪制兩個名稱分別為 Opt1 和 Opt2 的單選按 鈕，其標題分別為“男”和“女”;在 Fra2 中繪制兩個名稱分別為 Opt3 和 Opt4 的單選按 鈕，其標題分別為“學生”和“老師”;再繪制一個名為 Cmd1 的命令按鈕，其標題為“確 定”。程序界面如圖 57-3 所示。
圖 57-3
請編寫適當?shù)氖录^程，使得在運行時，在 Fra1、Fra2 中選一個單選按鈕，然后單 擊“確定”按鈕，就可以按照下表把結果顯示在文本框中。
注意：不得修改窗體文件中已經(jīng)存在的程序和 Txt1 的屬性，在結束程序運行之前， 必須進行能夠產(chǎn)生上表中一個結果的操作;必須用窗體右上角的關閉按鈕結束程序，否則 無成績。最后保存修改后的文件。
(2)在名為Form1的窗體上建立一個名為Txt1的文本框;建立一個名為Cmd1的命令按鈕，其標題為“計算”。要求程序運行后，如果單擊“計算”按鈕，則求出1~30之間所有可以被7整除的數(shù)的乘積并在文本框中顯示出來，如圖57-4所示，結果存入考生文件夾中的dw2.dat文件中。
圖 57-4
在考生的文件夾中有一個 model.bas 標 準 模 塊 ，該模 塊 中 提供 了保存文件的過程writedata，考生可以直接調(diào)用。
注意：文件必須存放在考生文件夾中，窗體文件名為 vbsj4.frm ，工程文件名為vbsj4.vbp。
三、綜合應用題
在窗體 Form1 上建立 3 個名稱分別為 mnuRead、mnuCalc 和 mnuSave 的主菜單，它 們的標題分別為“讀數(shù)”、“計算”和“保存”，然后繪制一個名稱為 Txt1 的文本框，其 MultiLine 屬性設置為 True，ScrollBars 屬性設置為 2。
程序運行后，如果執(zhí)行“讀數(shù)”命令，則讀入 dr1.dat 文件中的 100 個整數(shù)，放入一 個數(shù)組中，數(shù)組的下界為 1;如果執(zhí)行“計算”命令，則把該數(shù)組中小于 50 的元素在文 本框中顯示出來，求出它們的和，并把所求得的和在窗體上顯示出來，如圖 57-5 所示; 如果執(zhí)行“保存”命令，則把所求得的和存入考生文件夾下的 dw2.dat 文件中。
在考生文件夾下有一個工程文件 vbsj5.vbp，考生可以裝入該文件。窗體文件 vbsj5 中 的 ReadData 過程可以把 dr1.dat 文件中的 100 個整數(shù)讀入 Arr 數(shù)組中;而 WriteData 過程 可以把指定的整數(shù)值寫到考生文件夾指定的文件中(整數(shù)值通過計算求得，文件名為 dw2.dat)。
圖 57-5
注意：考生不得修改窗體文件中已經(jīng)存在的程序。保存時，工程文件名仍為 vbsj5.vbp， 窗體文件名仍為 vbsj5.frm。
一、基本操作題
第 1 小題
【審題分析】要在程序運行時實現(xiàn)題目所要求的功能，只需在命令按鈕 Click 事件過程中用代碼設置文本框的 Visible 屬性值為 False，將文本中的內(nèi)容賦值給標簽的Caption屬性，設置標簽的 Visible 屬性值為 True。
【操作步驟】
步驟 1：新建一個"標準 EXE"工程，按表 57-1 在窗體中畫出控件并設置其相關屬性。
步驟 2：打開代碼編輯窗口，編寫命令按鈕的 Click 事件過程。
參考代碼：
Private Sub Cmd1_Click()
Txt1.Visible = False
Lab1.Caption = Txt1.Text
Lab1.Visible = True
End Sub
步驟 3：按要求將文件保存至考生文件夾中。
第 2 小題
【審題分析】要在程序運行時實現(xiàn)題目所要求的功能，需在單選按鈕數(shù)組的 Click 事件過程中，將當前選中單選按鈕(索引號為參數(shù) Index)的標題顯示在文本框中。
【操作步驟】
步驟 1：新建一個"標準 EXE"工程，在窗體中畫出一個文本框，并用"復制"和"粘貼"方法畫出一個包含 3 個元素的單選按鈕數(shù)組，按表 57-2 設置其相關屬性。
步驟 2：打開代碼編輯窗口，編寫命令按鈕的 Click 事件過程。
參考代碼：
Private Sub Opt1_Click(Index As Integer)
Txt1.Text = Opt1(Index).Caption
End Sub
步驟 3：按要求將文件保存至考生文件夾中。
二、簡單應用題
第 1 小題
【知識點播】①某容器(如窗體和框架)中的單選按鈕(OptionButton)組常用于提供多個選項間的選擇，其 Value 屬性用于設置或返回每個單選按鈕的選中狀態(tài)：值為False 時表示未被選中，值為 True 時表示被選中，其 Caption 屬性來設置或返回單選按鈕的標題內(nèi)容。
②分支控制結構是結構化程序設計的基本結構之一，它所要解決的是根據(jù)條件判斷的結果決定程序執(zhí)行的流向。選擇控制結構就是其中一種，它是由 2 分支構成的，就是說，條件要么是真，要么是假，沒有其他的選擇。在執(zhí)行結構時按照所指定的條件進行判斷并選擇其中一組語句來執(zhí)行。If 語句就是一種選擇控制結構，其一般語法為：
If 條件 Then語句塊A Else
語句塊B End If
功能：判斷條件，如果條件為"真"，則執(zhí)行語句塊 A 部分，反之則執(zhí)行語句塊 B 部分。
【審題分析】根據(jù)題目要求，在本題的程序設計上，以 Fra1 中的 Opt1 是否選中作為If?Then?Else 語句的條件，由此分出兩種情況，Opt1 被選中或 Opt2 被選中。在條件為真(即 Opt1 被選中)時，再使用一個嵌套的 If?Then?Else 語句對 Fra2 中 Opt3 和 Opt4的選中情況進行分類，當 Opt3 被選中時，文本框中顯示"我是男學生"，否則顯示"我是女學生";同理在條件為假(即 Opt2 被選中)時，也用類似方法處理。這樣一共就有四種可能：Opt1 和 Opt3 被選中、Opt1 和 Opt4 被選中、Opt2 和 Opt3 被選中或 Opt2 和 Opt4被選中，對于可能出現(xiàn)的不同選擇對照題目中表的規(guī)定，修改 Txt1 的 Text 屬性值，以顯示不同內(nèi)容。以上判斷和顯示操作均在 Cmd1 的 Click 事件中完成。
【操作步驟】
步驟 1：打開考生文件夾下的本題工程文件 vbsj3.vbp。
步驟 2：在窗體 Form1 中加入兩個框架和一個命令按鈕，然后在每個框架中各加入兩個單選按鈕，分別設置它們的相關屬性，屬性及其值見表 57-3。
步驟 3：打開代碼編輯窗口輸入如下代碼：
參考代碼：
Private Sub Cmd1_Click()
If Opt1.Value = True Then
If Opt3.Value = True Then
Txt1.Text = Opt1.Caption + Opt3.Caption
Else
Txt1.Text = Opt1.Caption + Opt4.Caption
End If
Else
If Opt3.Value = True Then
Txt1.Text = Opt2.Caption + Opt3.Caption
Else
Txt1.Text = Opt2.Caption + Opt4.Caption
End If
End If
End Sub
步驟 4：按要求將文件保存至考生文件夾中。
【考試誤區(qū)】在一個容器中的多個單選按鈕只能有一個被選中，由此分出不同分支，理清思路是關鍵。
第 2 小題
【審題分析】本題程序設計思路：在"計算"按鈕的單擊事件過程中，將 For 循環(huán)語 句的循環(huán)變(如變I 的值為 1~30 間的所有整數(shù))的取值逐一除以 7，并將能被 7 整除 的整數(shù)累積入一個變(如 temp)，判斷整數(shù) A 能被整數(shù) B 整除的條件表達式為 A Mod B=0。然后將循環(huán)結束時變temp 的值顯示在文本框中，并調(diào)用本題源程序所提供標準模塊 model.bas 中的 writedata 過程，將變temp 的值存入文件 dw2.dat。
【操作步驟】
步驟 1：新建一個"標準 EXE"工程，按表 57-4 在窗體 Form1 中畫出控件并設置其屬性。
步驟 2：選擇【工程】?【添加模塊】命令，打開添加模塊對話框，將考生文件夾下的model.bas 添加到當前工程中。
步驟 3：打開代碼編輯窗口，編寫"計算"按鈕的單擊事件過程。
步驟 4：按要求將文件保存至考生文件夾中。
【考試誤區(qū)】在調(diào)用過程保存數(shù)據(jù)時，一定要根據(jù)過程的定義正確傳遞參數(shù)。
三、綜合應用題
【審題分析】本題源程序已提供 ReadData 和 WriteData 兩個自定義過程，只需編寫"讀數(shù)"、"計算"和"保存"命令的單擊事件過程，并在事件過程中調(diào)用 ReadData 和 WriteData自定義過程。程序設計思路：在"讀數(shù)"菜單項的 Click 事件過程中，通過調(diào)用 ReadData過程將數(shù)據(jù)從 dr1.dat 文件讀入到數(shù)組 Arr(窗體變)中;在"計算"菜單項的 Click 事 件過程中，利用 For 循環(huán)語句(循環(huán)變i 的初值為 1，終值為 100)依次將數(shù)組 Arr 中小于 50 的元素的值顯示在文本框中(條件表達式為 Arr(i)<50)，并將其值累加到變 Sum，循環(huán)結束后將結果顯示在窗體上。在"保存"菜單項的 Click 事件過程中，通過調(diào)用WriteData 過程將 Sum 的值寫入數(shù)據(jù)文件 dw3.dat。
注意：調(diào)用 WriteData 過程時需傳遞參數(shù) dw3.dat 和 Sum，變Sum 應聲明為窗體變
【操作步驟】
步驟 1：打開考生文件下的本題工程文件 vbsj5.vbp，利用菜單設計器，按表 57-5 中的設置建立菜單項。
步驟 2：在窗體 Form1 中畫一個文本框，其相關屬性及其值見表 57-6。
步驟 3：在代碼編輯窗口，分別編寫"讀數(shù)"、"計算"和"保存"按鈕的 Click 事件過程。
參考代碼：
Dim sum As Integer
Private Sub mnuCalc_Click()
For i = 1 To 100
If Arr(i) < 50 Then
Txt1.Text = Txt1.Text & Arr(i) & Space(5)
sum = sum + Arr(i)
End If
Next
Print sum
End Sub
Private Sub mnuRead_Click()
ReadData
End Sub
Private Sub mnuSave_Click()
WriteData "dw3.dat", sum
End Sub
步驟 4：按要求將文件保存至考生文件夾中。