2014計算機等級《二級VB》上機考試預測題及答案3

　　二、基本操作題

　　(1)本題主要考查窗體上控件的基本操作。

　�、傧仍诖绑w上建立控件，再設置控件屬性。程序中用到的控件及其屬性見下表：

　　②滾動條的最大刻度用Max屬性來表示，最小刻度用Min屬性來表示，滾動條上的位置通過Value屬性來表示。

　�、蹎螕舸绑w觸發(fā)Form_Click事件，滾動框跳到最左端，即使其Value屬性為0。

　�、軈⒖即a如下：

　　Private Sub Form_Click()

　　HS1.Value=0

　　End Sub

　　⑤調(diào)試并運行程序

　�、薨搭}目要求存盤

　　(2)①新建一個名為Form1的窗體。

　�、趩螕艄ぞ呦渲械腃ommandButton控件圖標，在窗體上拖拉出一個命令按鈕，在屬性窗口設置該命令按鈕名稱為Cmdl，Caption屬性為Display，Visible屬性為False。

　�、鄞蜷_代碼窗口輸入如下代碼：

　　Private Sub Cmd1_(;lick()

　　Print"VisualBasic" ’在窗體顯示VisualBasic

　　End Sub

　　Private Sub Form_Click()

　　Cmd1.Visible=True’使命令按鈕可見

　　End Sub

　�、馨匆蟊４嫖募赐瓿杀绢}。

　　三、簡單應用題

　　(1)本題主要考查復選框的使用。單擊命令按鈕觸發(fā)Click事件，程序中需要檢測復選按鈕的狀態(tài)，可

　　以通過Value屬性來實現(xiàn)。如果復選按鈕被選中，則Value值為1，否則Value值為0。

　�、僭诖绑w上先按要求建立控件，設置控件屬性，程序中用到的控件及屬性如下表所示：

　　②打開工程資源管理器，右擊窗體，選擇查看代碼項，在彈出的代碼窗口輸入代碼如下：Option Explicit

　　Private Sub c1_lick()

　　Dim s As String

　　s="我的愛好是"

　　If Ch1.Value=1 Then

　　s=s&Ch1.Caption

　　End If

　　If Ch2.Value=1 Then

　　s=s&Ch2.Caption

　　End If

　　IfCh3.Value=1 Then

　　s=s&Ch3.Caption

　　End If

　　Print s

　　End Sub

　�、壅{(diào)試并運行程序

　�、馨搭}目要求存盤。

　　(2)①打開題目所給工程文件。

　　②將注釋浯句改為：

　　Form1.MousePointer=0

　　Select Cave Index

　�、郯匆笊畲嫖募赐瓿杀绢}。

　　相關推薦：

　　2014年全國計算機二級VB上機考試試題匯總

　　考試吧考后首發(fā)2014年3月計算機等考真題及答案通知

　　考試吧推薦：2014年3月計算機二級考前沖刺備考專題