| 第 1 頁：基本操作 |
| 第 2 頁：簡(jiǎn)單應(yīng)用 |
| 第 3 頁：綜合應(yīng)用 |
2. 簡(jiǎn)單應(yīng)用(2小題，每題20分，計(jì)40分)
注意：下面出現(xiàn)的“考生文件夾”均為%USER%
解題思路：
啟動(dòng)Visual Basic系統(tǒng)，打開考生文件夾下需編輯的工程文件sjt3.vbp，相應(yīng)的窗體文件名為sjt3.frm。
由于所提供的窗體程序不完整，需添加事件過程。
單擊“計(jì)算”按鈕(即運(yùn)行Click事件過程)，在該Click事件過程中加入語句：
Private Sub Command2_Click()
'需考生編寫
Max = a(1)
Min = a(1)
For i = 2 To 100
If isnarc(a(i)) = True Then
If a(i) > Max Then Max = a(i)
If a(i) < Min Then Min = a(i)
End If
Next
Text1.Text = Max
Text2.Text = Min
End Sub
參考文件：c:\wexam\26990001\hlpsys\參考答案\sjt3.vbp、sjt3.frm、sjt3.vbw、out3.dat
請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中，然后打開sjt3.vbp文件并運(yùn)行。
(2)在考生文件夾下有一個(gè)工程文件sjt4.vbp。請(qǐng)?jiān)诖绑w上畫一個(gè)組合框，名稱為cb1，并輸入三個(gè)列表項(xiàng)：“3”、“7”、“11”(列表項(xiàng)的順序不限，但必須是這3個(gè)數(shù)字);畫一個(gè)名為Text1的文本框;再畫一個(gè)標(biāo)題為“計(jì)算”、名稱為C1的命令按鈕。如圖所示。請(qǐng)編寫適當(dāng)?shù)氖录^程，使得程序運(yùn)行時(shí)，在組合框中選定一個(gè)數(shù)字后，單擊“計(jì)算”按鈕，則計(jì)算5000以內(nèi)能夠被該數(shù)整除的所有數(shù)之和，并放入 Text1中。最后，按原文件名存盤。
提示：由于計(jì)算結(jié)果較大，應(yīng)使用長(zhǎng)整型變量。
注意：
考生不得修改窗體文件中已經(jīng)存在的程序，在結(jié)束程序運(yùn)行之前，必須至少進(jìn)行一次計(jì)算。必須用窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績(jī)。
解題思路：
啟動(dòng)Visual Basic系統(tǒng)，打開考生文件夾下需編輯的工程文件sjt4.vbp，相應(yīng)的窗體文件名為sjt4.frm。
由于所提供的窗體控件不完整，需在該窗體上畫一個(gè)組合框控件，通過其屬性窗口將名稱設(shè)為cb1，向組合框控件添加列表項(xiàng)(List屬性)，添加的列表項(xiàng)分別為3、7、11，每個(gè)列表項(xiàng)為一行，順序無關(guān)。畫一個(gè)文本框控件，通過其屬性窗口將名稱設(shè)為Text1。畫一個(gè)命令按鈕控件，通過其屬性窗口將名稱設(shè)為C1，標(biāo)題(Caption屬性)設(shè)為“計(jì)算”。
由于所提供的窗體程序不完整，需添加事件過程。
單擊“計(jì)算”按鈕(即運(yùn)行Click事件過程)，在該Click事件過程中加入語句：
Private Sub C1_Click()
Dim n As Integer, k As Integer, s As Long
n = Val(Cb1.Text)
s = 0
For k = n To 5000
If k / n = Int(k / n) Then
s = s + k
End If
Next k
Text1.Text = s
End Sub
參考文件：c:\wexam\26990001\hlpsys\參考答案\sjt4.vbp、sjt4.frm、sjt4.frx、sjt4.vbw、out4.dat
請(qǐng)把這些文件復(fù)制到c:\wexam\26990001中，然后打開sjt4.vbp文件并運(yùn)行。
相關(guān)推薦：
2012年計(jì)算機(jī)等考四級(jí)數(shù)據(jù)庫工程師備考筆記匯總
| 北京 | 天津 | 上海 | 江蘇 | 山東 |
| 安徽 | 浙江 | 江西 | 福建 | 深圳 |
| 廣東 | 河北 | 湖南 | 廣西 | 河南 |
| 海南 | 湖北 | 四川 | 重慶 | 云南 |
| 貴州 | 西藏 | 新疆 | 陜西 | 山西 |
| 寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
| 黑龍江 | 內(nèi)蒙古 |
