2015年計算機二級vb上機試題
1.基本操作(2小題,每題15分,共計30分)
Private Sub C2_Click()
ocus
End Sub
(2)在名稱為Form1的窗體上畫一個文字框,名稱為Text1,其寬度為1000;再畫一個滾動條,名稱為HS1。其刻度值的範圍是1000-2000。請編寫滾動條的Change事件過程,程式執行後,如果移動滾動框,則可按照滾動條的刻度值改變文字框的寬度。執行時的窗體如圖所示。程式中不能使用任何變數,事件過程只能寫一條語句。
Private Sub HS1_Change()
h = e
End Sub
2.簡單應用(2小題,每題20分,計40分)
(1)在考生資料夾下有一個工程檔案,窗體上有兩個列表框,名稱分別為List1、List2,在List2中己經預設了內容,還有兩個命令按鈕,名稱分別為C1、C2,標題分別為“新增”、“清除”。如圖所示。程式的功能是在執行時,如果選中右邊列標框中的一個列表項,單擊“新增”按鈕,則把該項移到左邊的列表框中;若選中左邊列標框中的一個列表項,單擊“清除”按鈕,則把該項移回右邊的`列表框中。檔案中已經給出了所有控制元件和程式,但程式不完整,請去掉程式中的註釋符,把程式中的?改為正確的內容。但不能修改程式中的其他部分,也不能修改控制元件的屬性。最後把修改後的檔案按原檔名存檔。
Private Sub Form_Load()
tem "性別"
tem "班號"
tem "簡歷"
tem "學號"
tem "姓名"
tem "年齡"
tem "照片"
End Sub
Private Sub C1_Click()
tem
veItem Index
End Sub
Private Sub C2_Click()
Dim k As Integer
k = 0
While (k < Count)
If cted(k) = True Then
tem
veItem k
End If
k = k + 1
Wend
End Sub
(2)在考生資料夾下有一個工程檔案,請在Form1窗體上建立一個名稱為Op1的單選按鈕陣列,含有三個單選按鈕,其標題分別為“10!”“11!”“12!”,Index屬性分別為0、1、2;再畫一個名稱為C1的命令按鈕,標題為“計算”;畫一個名稱為Text1的文字框,如圖所示。程式的功能是在選定一個單選按鈕並單擊“計算”按鈕後,可以計算出相應的階乘值,在Text1中顯示該階乘值。請畫出上述控制元件並編寫程式。
Private Sub C1_Click()
Dim n As Integer, k As Integer
Dim fact As Long
For k = 0 To 2
If 1(k)e Then
n = Val(Left$(1(k)ion, 2))
End If
Next k
fact = 1
k = 1
Do While k < n
fact = fact * k
k = k + 1
Loop
= fact
End Sub
Private Sub Form_Unload(Cancel As Integer)
unload_sub
End Sub
Private Sub unload_sub()
Dim fn As String
fn = & ""
Open fn For Output As #1
Print #1,
Close #1
End Sub
3.綜合應用(1小題,計30分)
在考生資料夾下有一個工程檔案,其窗體上有一個文字框,名稱為Text1,可以多行顯示;有一個名稱為CD1的通用對話方塊;還有三個命令按鈕,名稱分別為C1、C2、C3,標題分別為“開啟檔案”、“轉換”、“存檔”,如圖所示。
命令按鈕的功能是:“開啟檔案”——彈出開啟檔案對話方塊,預設開啟檔案的型別為“文字檔案”。選擇考生資料夾下的檔案後,該檔案中的內容顯示在Text1中;“轉換”——把Text1中的所有小寫英文字母轉換成大寫;“存檔”——把Text1中的內容存入考生資料夾下的檔案中。在窗體中已經給出了部分程式,要求:
1) 請去掉程式中的註釋符,把程式中的?改為正確的內容,但不能修改程式中的其他部分,也不能修改控制元件的屬性。
2) 編寫“轉換”按鈕的Click事件過程。最後把修改後的檔案按原檔名存檔。
Private Sub C1_Click()
Dim a As String
er = "所有檔案?*.*?文字檔案?*檔案?*"
erIndex = 2
on = 1
Open Name For Input As #1
Input #1, a
Close #1
= a
End Sub
Private Sub C2_Click()
= UCase()
End Sub
Private Sub C3_Click()
Name = ""
on = 2
Open Name For Output As #1
Print #1,
Close #1
End Sub
-
2022年計算機二級《VB》命題試卷
在各個領域,只要有考核要求,就會有試卷,試卷是課程考核統計分析工作的重要組成部分,它包括試卷的信度、效度、區分度、難度四個方面。什麼樣的試卷才能有效幫助到我們呢?下面是小編整理的2022年計算機二級《VB》命題試卷,歡迎大家分享。計算機二級《VB》命題試卷1一...
-
計算機二級《MS Office》全真模擬題及答案
一、選擇題1假設某臺計算機的硬碟容量為20GB,記憶體儲器的容量為128MB,那麼,硬碟的容量是記憶體容量的()倍。A.200B.120C.160D.100參考答案:C參考解析:根據換算公式lGB=1024MB,故加GB=20*1024MB,因此,20*1024MB/128MB=160。2下列連結串列中,其邏輯結構屬於非線性結構的是()。A....
-
12月計算機二級MSoffice操作題訓練
從國小、國中、高中到大學乃至工作,我們或多或少都會接觸到試題,藉助試題可以為主辦方提供考生某方面的知識或技能狀況的資訊。還在為找參考試題而苦惱嗎?下面是小編為大家整理的12月計算機二級MSoffice操作題訓練,希望對大家有所幫助。12月計算機二級MSoffice操作...
-
2016年9月二級《MSoffice》備考練習題及答案
選擇題1.下面敘述中錯誤的是().A.軟體測試的目的是發現錯誤並改正錯誤B.對被除錯的程式進行錯誤定位是程式除錯的必要步驟C.程式除錯通常也稱為DebugD.軟體測試應嚴格執行測試計劃,排除測試的隨意性2.資料庫應用系統中的核心問題是().A.資料庫設計B.資料庫系統...