- 相關(guān)推薦
計算機二級VB上機試題及答案
在平時(shí)的學(xué)習、工作中，許多人都需要跟試題打交道，試題是命題者按照一定的考核目的編寫(xiě)出來(lái)的。你知道什么樣的試題才能切實(shí)地幫助到我們嗎？下面是小編為大家收集的計算機二級VB上機試題及答案，僅供參考，希望能夠幫助到大家。
1. 基本操作(2小題，每小題15分，共計30分)
注意：下面出現的“考生文件夾”均為%USER%
請根據以下各小題的要求設計Visual Basic應用程序(包括界面和代碼)。
(1)在名稱(chēng)為Form1，標題為“框架”的窗體上畫(huà)一個(gè)名稱(chēng)為Frame1，且沒(méi)有標題的框架�？蚣軆群卸䝼�(gè)單選按鈕，名稱(chēng)分別為Opt1 和Opt2、標題分別為“字體”、“大小”。
注意：
存盤(pán)時(shí)必須存放在考生文件夾下，工程文件名為sjt1.vbp，窗體文件名為sjt1.frm。
解題思路：
啟動(dòng)Visual Basic系統，創(chuàng )建一個(gè)Form1窗體。
在該窗體上畫(huà)一個(gè)框架控件，通過(guò)其屬性窗口將名稱(chēng)設為Frame1。在框架內畫(huà)二個(gè)單選按鈕控件，通過(guò)其屬性窗口將名稱(chēng)分別為Opt1和Opt2、標題(Caption屬性)分別設為“字體”和“大小”。激活Form1窗體，通過(guò)其屬性窗口將標題(Caption屬性)設為“框架”。
參考文件：c:wexam26990001hlpsys參考答案sjt1.vbp、sjt1.frm、sjt1.vbw
請把這些文件復制到c:wexam26990001中，然后打開(kāi)sjt1.vbp文件并運行。
(2)考生文件夾下的工程文件sjt2.vbp中有一個(gè)由直線(xiàn)Line1、Line2和Line3組成的三角形，直線(xiàn)Line1、Line2和Line3的坐標值如下所示：
名稱(chēng) X1 Y1 X2 Y2
Line1 600 1200 1600 300
Line2 600 1200 2600 1200
Line3 1600 300 2600 1200
要求畫(huà)一條直線(xiàn)Line4以構成三角形的高，且該直線(xiàn)的初始狀態(tài)為不可見(jiàn)。再畫(huà)二個(gè)命令按鈕，名稱(chēng)分別是Cmd1、Cmd2，標題分別為“顯示高”、“隱藏高”，如圖所示。
請編寫(xiě)適當的事件過(guò)程使得在運行時(shí)，單擊“顯示高”按鈕，則顯示三角形的高;單擊“隱藏高”按鈕，則隱藏三角形的高。
注意：
要求程序中不得使用變量，每個(gè)事件過(guò)程只能寫(xiě)一條語(yǔ)句。不得修改已經(jīng)存在的控件，最后將修改后的文件按原文件名存盤(pán)。
解題思路：
啟動(dòng)Visual Basic系統，打開(kāi)考生文件夾下需編輯的工程文件sjt2.vbp，相應的窗體文件名為sjt2.frm。
由于所提供的窗體控件不完整，需在該窗體上畫(huà)一根直線(xiàn)控件，通過(guò)其屬性窗口將名稱(chēng)設為L(cháng)ine4，點(diǎn)X1屬性設為1600，點(diǎn)X2屬性分別設為1600，點(diǎn)Y1屬性設為300，點(diǎn)Y2屬性設為1200，Visible屬性設為False。畫(huà)二個(gè)命令按鈕控件，通過(guò)其屬性窗口將名稱(chēng)分別設為Cmd1和Cmd2，標題(Caption屬性)分別設為“顯示高”和“隱藏高”。
單擊“顯示高”按鈕(即運行Click事件過(guò)程)，在該Private Sub Cmd1_Click()事件過(guò)程中加入語(yǔ)句：
Private Sub Cmd1_Click()
Line4.Visible = True
End Sub
單擊“隱藏高”按鈕(即運行Click事件過(guò)程)，在該Private Sub Cmd2_Click()事件過(guò)程中加入語(yǔ)句：
Private Sub Cmd2_Click()
Line4.Visible = False
End Sub
參考文件：c:wexam26990001hlpsys參考答案sjt2.vbp、sjt2.frm、sjt2.vbw
請把這些文件復制到c:wexam26990001中，然后打開(kāi)sjt2.vbp文件并運行。
2. 簡(jiǎn)單應用(2小題，每題20分，計40分)
注意：下面出現的“考生文件夾”均為%USER%
(1)在考生文件夾下有一個(gè)工程文件sjt3.vbp，在Form1的窗體中有一個(gè)文本框，二個(gè)命令按鈕和一個(gè)計時(shí)器。程序的功能是在運行時(shí)，單擊“開(kāi)始計數”按鈕，就開(kāi)始計數，每隔1秒，文本框中的數加1;單擊“停止計數”按鈕，則停止計數(如圖所示)。要求：修改適當的控件的屬性，并去掉程序中的注釋符，把程序中的?改為正確的內容，使其實(shí)現上述功能，但不能修改程序中的其他部分。最后把修改后的文件以原來(lái)的文件名存盤(pán)。
解題思路：
啟動(dòng)Visual Basic系統，打開(kāi)考生文件夾下需編輯的工程文件sjt3.vbp，相應的窗體文件名為sjt3.frm。
由于所提供的窗體控件屬性不完整，通過(guò)屬性窗口將計時(shí)器的Enabled屬性設為False，Interval屬性設為1000。
由于所提供的窗體程序不完整，在命令按鈕的Private Sub C1_Click(Index As Integer)事件過(guò)程中，有二處地方需要修改。
1) 將語(yǔ)句
Select Case ?
改為
Select Case Index
2) 將語(yǔ)句
Case ?
改為
Case 0
由于所提供的窗體程序不完整，在計時(shí)器的Private Sub Timer1_Timer()事件過(guò)程中，有一處地方需要修改。
1) 將語(yǔ)句
Text1.Text = Text1.Text ?
改為
Text1.Text = Text1.Text + 1
參考文件：c:wexam26990001hlpsys參考答案sjt3.vbp、sjt3.frm、sjt3.vbw
請把這些文件復制到c:wexam26990001中，然后打開(kāi)sjt3.vbp文件并運行。
(2)已知出租車(chē)行駛不超過(guò)4公里時(shí)一律收費10元。超過(guò)4公里時(shí)分段處理，具體處理方式為：15公里以?xún)让抗锛邮?1.2元，15公里以上每公里收 1.8元。
在考生文件夾下有一個(gè)工程文件sjt4.vbp。程序的功能是：?jiǎn)螕簟拜斎搿卑粹o，將彈出一個(gè)輸入對話(huà)框，接收出租車(chē)行駛的里程數;單擊“計算”按鈕，則可根據輸入的里程數計算應付的出租車(chē)費，并將計算結果顯示在名稱(chēng)為T(mén)ext1的文本框內。
在窗體文件中已經(jīng)給出了全部控件(如圖所示)，但程序不完整，要求去掉程序中的注釋符，把程序中的 ?改為正確的內容。
注意：
不得修改已經(jīng)存在的內容和控件屬性，最后將修改后的文件按原文件名存盤(pán)。
解題思路：
啟動(dòng)Visual Basic系統，打開(kāi)考生文件夾下需編輯的工程文件sjt4.vbp，相應的窗體文件名為sjt4.frm。
由于所提供的窗體程序不完整，在Private Sub Command2_Click()事件過(guò)程中，有五處地方需要修改。
1) 將語(yǔ)句
Select Case ?
改為
Select Case s
2) 將語(yǔ)句
?
改為
f = 10
3) 將語(yǔ)句
f = 10 + ?
改為
f = 10 + (s - 4) * 1.2
4) 將語(yǔ)句
?
改為
Case Else
5) 將語(yǔ)句
f = 10 + ? + (s - 15) * 1.8
改為
f = 10 + (15 - 4) * 1.2 + (s - 15) * 1.8
參考文件：c:wexam26990001hlpsys參考答案sjt4.vbp、sjt4.frm、sjt4.vbw
請把這些文件復制到c:wexam26990001中，然后打開(kāi)sjt4.vbp文件并運行。
3. 綜合應用(1小題，計30分)
注意：下面出現的“考生文件夾”均為%USER%
在考生文件夾下有一個(gè)工程文件sjt5.vbp，窗體上有二個(gè)標題分別是“讀數據”和“統計”的命令按鈕。請畫(huà)二個(gè)標簽，名稱(chēng)分別為L(cháng)abel1和Label2，標題分別為“出現次數最多的字母是”和“它出現的次數為”;再畫(huà)二個(gè)名稱(chēng)分別為T(mén)ext1和Text2，初始值為空的文本框，如圖所示。
程序功能如下：
1)單擊“讀數據”按鈕，則將考生文件夾下in5.dat文件的內容讀到變量s中(此過(guò)程已給出);
2)單擊“統計”按鈕，則自動(dòng)統計in5.dat文件中所含各字母(不區分大小寫(xiě))出現的次數，并將出現次數最多的字母顯示在Text1文本框內，它所出現的次數顯示在Text2文本框內。
“讀數據”按鈕的Click 事件過(guò)程已經(jīng)給出，請為“統計”按鈕編寫(xiě)適當的事件過(guò)程實(shí)現上述功能。
注意：
考生不得修改窗體文件中已經(jīng)存在的控件和程序，在結束程序運行之前，必須進(jìn)行統計，且必須用窗體右上角的關(guān)閉按鈕結束程序，否則無(wú)成績(jì)。最后，程序按原文件名存盤(pán)。
解題思路：
啟動(dòng)Visual Basic系統，打開(kāi)考生文件夾下需編輯的工程文件sjt5.vbp，相應的窗體文件名為sjt5.frm。
由于所提供的窗體控件不完整，需畫(huà)二個(gè)標簽控件，通過(guò)其屬性窗口將名稱(chēng)分別設為L(cháng)abel1和Label2，標題(Caption屬性)分別設為“出現次數最多的字母是”和“它出現的次數為”。畫(huà)二個(gè)文本框控件，通過(guò)其屬性窗口將名稱(chēng)分別設為T(mén)ext1和Text2，初始內容(Text屬性)均設為空。
由于所提供的窗體程序不完整，需在“統計”命令按鈕的Click事件過(guò)程中加入語(yǔ)句：
Private Sub Command2_Click()
考生編寫(xiě)
Dim a(26) As Integer
n = Len(s)
For i = 1 To n
c = UCase(Mid(s, i, 1))
If c >= "A" And c <= "Z" Then
j = Asc(c) - Asc("A") + 1
a(j) = a(j) + 1
End If
Next i
Max = a(1)
t = Chr(Asc("A"))
For i = 2 To 26
If a(i) > Max Then
Max = a(i)
t = Chr(Asc("A") + i - 1)
End If
Next i
Text1.Text = t
Text2.Text = Max
End Sub
參考文件：c:wexam26990001hlpsys參考答案sjt5.vbp、sjt5.frm、sjt5.vbw、out5.dat
請把這些文件復制到c:wexam26990001中，然后打開(kāi)sjt5.vbp文件并運行。
【計算機二級VB上機試題及答案】相關(guān)文章：
計算機二級vb考試試題及答案12-17
2016計算機二級VB上機考試試題題庫03-07
計算機二級vb考試試題（附答案）02-26
2016年計算機二級VB模擬試題及答案03-11
計算機二級C上機考試試題及答案03-05