一、單項選擇題
1.以下敘述中錯誤的是（ ）。
a）標準模組檔案的副檔名是.bas
b）標準模組檔案是純**檔案
c）在標準模組中宣告的全域性變數可以在整個工程中使用
d）在標準模組中不能定義過程
2.在visual basic中，表示式3*2\5 mod 3的值是（ ）。
a）1 b）0 c）3 d）出現錯誤提示
3.以下選項中，不合法的visual basic的變數名是（ ）。
a）a56 b）_xyz c）a_b d）andif
5.現有語句：y=iif(x>0, x mod 3, 0)，設x=10，則y的值是（ ）。
a）0 b）1 c）3 d）語句有錯
6.為了使文字框同時具有垂直和水平滾動條，應先把multiline屬性設定為true，然後再把scrollbars屬性設定為（ ）。
a）0 b）1 c）2 d）3
8. 窗體上有乙個名稱為hsscroll1的滾動條，程式執行後，單擊滾動條箭頭時，立即在窗體上顯示棍動條的位置（即刻度值）。下面能夠實現上述操作的事件過程是（ ）。
10. 要使兩個單選按鈕屬於同乙個框架，正確的操作是（ ）。
a）先畫乙個框架，再在框架中畫兩個單選按鈕
b）先畫乙個框架，再在框架外畫兩個單選按鈕，然後把單選按鈕拖到框架中
c）先畫兩個單選按鈕，再用框架將單選按鈕框起來
d）以上三種方法都正確
11.能夠存放組合框的所有專案內容的屬性是（ ）。
a）caption b）text c）list d）selected
12.設窗體上有乙個標籤label1和乙個計時器timer1， interval屬性被設定為1000要求程式執行時每秒在標籤中顯示一次系統當前時間。以下可以實現上述要求的事件過程是（ ）。
a）private sub timer1_timer()
end sub
b）private sub timer1_timer()
end sub
c）private sub timer1_timer()
end sub
d）private sub timer1_timer()
for k=1 to
y = 5
end sub
13.設有窗體和以下程式：
private sub command1_click()
= "visual basic"
end sub
private sub text1_lostfocus()
if <> "basic" then
= ""
end if
end sub
程式執行時，在text1文字框中輸入"basic"，然後單擊command1按鈕，則產生的結果是（ ）。
a）文字框中無內容，焦點在文字框中 b）文字框中為"basic"，焦點在文字框中
c）文字框中為"basic"，焦點在按鈕上 d）文字框中為"visual basic"，焦點在按鈕上
14.窗體上有乙個名稱為command1的命令按鈕，其事件過程如下：
private sub command1_click()
x = "visualbasicprogramming"
a = right(x, 11)
b = mid(x, 7, 5)
c = msgbox(a, , b)
end sub
執行程式後單擊命令按鈕，以下敘述中錯誤的是（ ）。
a）資訊框的標題是basic b）資訊框中的提示資訊是programming
c）c的值是函式的返回值 d）msgbox的使用格式有錯
二、判斷題
三、填空題（）
1.下列程式段的執行結果為
num=2
while num <=3
num=num + 1
print num;
wend
2.下列程式段的執行結果為
t= 0
for i = 1 to 4
for j = 6 to 1 step -2
t = t + 1
next j
next i
print t
一、選擇題（單選題）
1、在visual basic語言中，物件能夠執行的動作是
a）事件 b）方法 c）屬性 d）事件過程
2、要求窗體檔案執行後, 將焦點設定到name=text1的控制項上, 命令是:__
a．c． =trued． =true
3、將數學表示式寫成visual basic的表示式，其正確的形式是:
a) 5*exp(2) + sin(a+b)^2b) 5*exp(2) +sin^2(a+b)
c) 5*ln(2) + sin(a+b)^2d) 5*ln(2) +sin^2(a+b)
4、將變數va的值輸出到標籤控制項上顯示，使用的語句是：＿＿＿
a． vab． =va
c． vad． va
5、設定按鈕command1用滑鼠單擊不發生click事件，設定屬性語句是:_____
a．c． trued． false
6、在文字框text1中輸入資料，當焦點一旦離開，就能引發物件事件過程的執行的事件是：_______
ａ．clickchange ｃ．lostfocus ｄ．gotfocus
7、物件．print 方法是vb程式中用於輸出資料的方法，物件1是指：____
a． form, picturebox, printer, label1
b． form, picture1, printer, debug
c． form, picture1, label1, text1
d． form, picture1, label1 , printer
8、下面程式的執行結果是：
private sub form_click()
dim money!, tax!
money = val(inputbox("money=", "input", "3500"))
select case money
case is <= 1000
print "money="; money, "tax="; 0
case 1000 to 3000
print "money="; money, "tax="; (money - 1000) * 0.1
case 3000 to 6000
print "money="; money, "tax="; (money - 3000) * 0.15 + 200
case else
print "money="; money, "tax="; (money - 6000) * 0.2 + 650
end select
end sub
a．money=1000 tax=0money=3500 tax=275
ｃ．money=4500 tax=425money=6500 tax=750
9、下面程式的執行結果是
private sub form_click()
dim y%, leap!
化工學院實驗大賽策劃
首屆 諾貝爾之路 化學實驗大賽 活動策劃 一 活動名稱 首屆 諾貝爾之路 化學實驗技能大賽 二 活動目的 為了激發學生對科學實驗的興趣，培養學生獨立思考和動手操作能力，營造良好的學習及實踐氛圍，鍛鍊同學們的實踐操作能力，增強專業技能，培養實驗興趣，豐富課餘生活，是同學們認識到實驗對日後考研，特舉辦青...
化工學院爭先創優系列活動
生化與環境工程系黨團共建，爭先創優系列活動 一 指導思想 為全面開展 爭先創優 的活動，緊密圍繞學院的中心工作，努力貫徹系教學大綱，穩定教學秩序，創文明班風學風，經系黨政研究決定，在本學年開展黨團共建，爭先創優的系列活動。二 活動目的 1 通過以下各項活動的開展，希望化工系全體師生在成賢學院發展的關...
化學化工學院特色活動目錄
校園文化活動是大學生德育工作的重要組成部分，是大學生自我教育的主要載體，在營造學術氛圍，倡導先進文化方面具有重要的作用。加強校園文化活動對加強和改進大學生思想政治教育 促進校園文化建設 全面提高大學生綜合素質具有十分重要的意義。教育學院響應時代的號召，積極組織和參加了一系列校園文化活動，並形成了一些...