二、基本操作題

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

　　①先在窗體上建立控件，再設置控件屬性。程序中用到的控件及其屬性見下表：

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

　　③單擊窗體觸發Form_Click事件，滾動框跳到最左端，即使其Value屬性為0。

　　④參考代碼如下：

　　Private Sub Form_Click()

　　HS1.Value=0

　　End Sub

　　⑤調試并運行程序

　　⑥按題目要求存盤

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

　　②單擊工具箱中的CommandButton控件圖標，在窗體上拖拉出一個命令按鈕，在屬性窗口設置該命令按鈕名稱為Cmdl，Caption屬性為Display，Visible屬性為False。

　　③打開代碼窗口輸入如下代碼：

　　Private Sub Cmd1_(;lick()

　　Print"VisualBasic" ’在窗體顯示VisualBasic

　　End Sub

　　Private Sub Form_Click()

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

　　End Sub

　　④按要求保存文件即完成本題。

　　三、簡單應用題

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

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

　　①在窗體上先按要求建立控件，設置控件屬性，程序中用到的控件及屬性如下表所示：

　　②打開工程資源管理器，右擊窗體，選擇查看代碼項，在彈出的代碼窗口輸入代碼如下：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

　　③調試并運行程序

　　④按題目要求存盤。

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

　　②將注釋浯句改為：

　　Form1.MousePointer=0

　　Select Cave Index

　　③按要求深存文件即完成本題。

　　相關推薦：

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

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

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