国产高潮人妖99视频_国产精品九九九国产盗摄蜜臀_国产一区二区天天看片_国产精品无码AV无码_不卡的av帝国在线一区二区

您當前位置: 唯學網(wǎng) » 計算機等級考試培訓 » 二級專題

2014年全國計算機二級VB上機考試試題及答案(2)

來源:唯學網(wǎng)•教育培訓(www.printpiter.com)  【唯學網(wǎng) • 中國教育電子商務平臺】 加入收藏

在即將到來的全國計算機等級考試之時,小編為廣大計算機等級考試的考生匯總整理了計算機二級VB考試試題,在計算機培訓欄目中還有一級和三級的考試輔導資料,想獲得更多的資料,請點擊唯學網(wǎng)計算機培訓欄目,?忌茼樌ㄟ^考試。

試題答案及詳解

一、基本操作題

第 1 小題

【審題分析】本題需在命令按鈕的單擊事件過程中,通過修改文本框的 FontName 屬性值為"楷體_GB2312"來改變文本框中文本的字體。

【操作步驟】

步驟 1:新建一個"標準 EXE"工程,按表 50-1 在窗體中畫出控件并設置其相關屬性。

表 50-1

步驟 2:打開代碼編輯窗口,編寫命令按鈕的單擊事件過程。

參考代碼:

Private Sub Cmd1_Click()

Txt1.FontName = "楷體_GB2312"

End Sub

步驟 3:按要求將文件保存至考生文件夾中。

第 2 小題

【審題分析】要使命令按鈕位于窗體左上角需將其 Top 屬性值和 Left 屬性值設置為 0; 要在單擊一次窗體后,命令按鈕同時向右、向下移動 100,需在窗體的單擊事件過程中, 設置命令按鈕的 Top 屬性值和 Left 屬性值各增加 100。

【操作步驟】

步驟 1:新建一個"標準 EXE"工程,按表 50-2 在窗體中畫出控件并設置其相關屬性。

表 50-2

步驟 2:打開代碼編輯窗口,編寫命令按鈕的 Click 事件過程。

參考代碼:

PrivateSub Cmd1_Click()

Cmd1.Left=Cmd1.left+100

Cmd1.Top=Cmd1.Top+100

End Sub

步驟 3:按要求將文件保存至考生文件夾中。

二、簡單應用題

第 1 小題

【審題分析】根據(jù)題目要求,要在程序運行時能每隔 1 秒,標簽中的數(shù)字加 1,需將計時器的 Interval 屬性值設置為 1000 毫秒,Enabled 屬性值設置為 True,在計時器的 Timer 事件過程中將標簽中的數(shù)值加 1。

【操作步驟】

步驟 1:新建一個"標準 EXE"工程,按表 50-3 在窗體中畫出控件并設置其相關屬

表 50-3

步驟 2:雙擊窗體上的計時器控件,在其 Timer 事件過程中加入以下代碼:

參考代碼:

Private Sub Tmr1_Timer()

Lab1.Caption = Lab1.Caption + 1

End Sub

步驟 3:按要求將文件保存至考生文件夾中。

第 2 小題

【審題分析】本題源程序在命令按鈕的單擊事件過程中,首先利用 For 循環(huán)語句(循 環(huán)變 k 的初值為 0,終值為 3)逐一檢查單選按鈕數(shù)組中的每個元素是否被選中,若選 中則用變 n 記錄下選中單選按鈕的索引號,即 n=k。循環(huán)結束后,取消對當前選中單選按鈕的選擇,且變 n 增 1;接著判斷 n 的值是否為 4,若是則將 n 的值置為 0,重新從 單選按鈕數(shù)組的第 1 個元素開始;最后設置索引號為 n 的單選按鈕被選中。

【操作步驟】

步驟 1:打開考生文件中的本題工程文件 vbsj4.vbp,按表 50-4 在窗體中用"復制" 和"粘貼"命令畫出包含 4 個元素的單選數(shù)組和 1 個命令按鈕并設置屬性。

表 50-4

步驟 2:打開代碼編輯窗口,去掉程序中的注釋符"’",將問號"?"改為正確的內容。

參考代碼:

Private Sub Cmd1_Click()

For k = 0 To 3

If Opt1(k).Value Then

106

n

= k

End If

Next k

Opt1(n).Value = False

n = n + 1

If n = 4 Then

n = 0

End If

Opt1(n).Value = True

End Sub

步驟 3:按要求將文件保存至考生文件夾中。

三、綜合應用題

【審題分析】本題其實就是設計一個簡單的乘法運算,為避免不必要的錯誤,可在執(zhí)行運算前用 Val 函數(shù)將文本框中數(shù)字字符串轉換為數(shù)值數(shù)據(jù)。

【操作步驟】

步驟 1:新建一個"標準 EXE"工程,按表 50-5 在窗體中畫出控件并設置其相關屬性。

表 50-5

步驟 2:打開代碼編輯窗口,編寫"總價"命令按鈕的單擊事件過程。

參考代碼:

Private Sub Cmd1_Click()

Dim num As Integer

Dim rmb As Currency

num = Val(Txt1.Text)

rmb = Val(Txt2.Text)

Pic1.Cls

Pic1.Print num * rmb

End Sub

步驟 3:按要求將文件保存至考生文件夾中。

請參加2014年計算機等級考試的考生能仔細閱讀,如若獲知更多關于 計算機等級考試培訓的資訊,請隨時關注唯學網(wǎng)計算機培訓欄目,小編會為您在第一時間做出相關報道。

0% (0)
0% (10)
已有條評論
新聞瀏覽排行