二、基本操作題

　　(1)計時器的Interval屬性用于設置每次觸發(fā)計時器的Timer事件的時間間隔，單位為毫秒。Enabled 屬性控制計時器是否開始啟用，True表示啟用，False表示不啟用。

　　根據題意，新建“標準EXE”工程，將一個標簽和一個計時器控件添加到窗體中，標簽的名稱為Label1、Caption屬性為“0”，Timer的名稱為Timer1、Interval屬性為“1 000”。設置完成后雙擊Command1進入代碼窗口，編寫如下代碼：

　　Private Sub Timer1_Timer()

　　Label1.Caption=Val(Label1.Caption)+2 ’每過一個間隔計數加2

　　End Sub

　　單擊 按鈕運行程序.并按要求保存。

　　(2)根據題意，新建“標準EXE”工程，將一個文本框控件和一個命令按鈕添加到窗體中，文本框的名稱為Text1、Text屬性為空，命令按鈕的名稱為Command1、Caption屬性為“當前時間/日期切換”。雙擊Command1進入代碼窗口，編寫如下代碼：

　　Dim i As Integer

　　Private Sub Command1Click()

　　If i=0 Then

　　Text1.Text=Date

　　i=1 ’顯示標識，1表示顯示的是日期

　　Else

　　Text1.Text=Time

　　i=0 ’0表示顯示的是時間

　　End If

　　End Sub

　　Private Sub Form_Load()

　　Text1 Text=Time

　　i=0

　　End Sub

　　單擊 按鈕運行程序，并按要求保存。

　　相關推薦：

　　2014年計算機等級考試時間調整通知

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

　　2014計算機等級《二級VB》上機預測題及答案匯總

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