2016年計算機二級考試vb試題
2016年9月計算機等級考試,同學們複習好了嗎?下面yjbys小編為大家分享的是計算機等級考試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
-
2016最新全國計算機一級考試試題大綱
計算機一級考試難不難?和yjbys小編一起來看看2016最新計算機一級考試題及答案解析就知道了!1、在計算機內部用來傳送、存儲、加工處理的數據或指令都是以______形式進行的。A、十進制碼B、二進制碼C、八進制碼D、十六進制碼答案:(B、)評析:在計算機內部用來傳送...
-
2017年9月河南牧業經濟學院計算機等級考試報名通知
河南牧業經濟學院英才校區NCRE考點2017年下半年正式報名工作將於2017年6月14日-2016年6月28日進行。以下是小編收集的河南牧業經濟學院計算機等級考試報名通知的具體內容,希望大家認真閲讀!一、報名對象河南牧業經濟學院(英才校區)在校生,參加考試者可根據自己學...
-
四川旅遊學院2017年3月計算機考試公告
根據教育部考試中心的統一部署,全國計算機等級考試(NationalComputerRankExamination,簡稱NCRE)第48次考試,將於2017年3月舉行。我校於本月開始第48次全國計算機等級考試的報名工作。現將有關報名的事宜,通知如下:一、報名範圍已修完計算機基礎課程,但未獲得NCRE證書...
-
重慶市2017年3月計算機等級考試時間安排
計算機可分為超級計算機、工業控制計算機、網絡計算機、個人計算機、嵌入式計算機五類,較先進的計算機有生物計算機、光子計算機、量子計算機等。下面是小編整理的關於計算機等級考試時間安排,歡迎參考!一、考試時間2017年3月25日(以准考證為準)二、報考科目級別...