visual basic 期末複習題庫
單項選擇題判斷題填空題程式設計題
1) 下列程式執行後，輸出的結果為______。
b=1do while (b<40)
b=b*(b+1)
loop
print b
a) 42
b) 39
c) 6
d) 1 答案：a
2) 設執行以下程式段時依次輸入1、3、5，執行結果為_____。
dim a(4) as integer
dim b(4) as integer
for k =0 to 2
a(k+1) =val(inputbox(「請輸入資料："))
b(3-k) =a(k+1)
next k
print b(k)
a) 1
b) 3
c) 5
d) 0 答案：a
3) 下列程式執行後，變數s的值為______。
dim s as long ,x as integer
s=0:x=1
do while (x<10)
s=s+x
x=x+2
loop
print s
a) 10
b) 25
c) 50
d) 100 答案：b
4) 編寫如下事件過程：
private sub form_mousedown(button as integer ,shift as integer,x as single,y as single)
if shift=6 and button=2 then
print "hello"
end if
end sub
程式執行後，為了在窗體上輸出"hello"，應在窗體上執行以下___d____操作。
a) 同時按下 shift 鍵和滑鼠左鍵
b) 同時按下 shift 鍵和滑鼠右鍵
c) 同時按下ctrl、alt 鍵和滑鼠左鍵
d) 同時按下 ctrl、alt 鍵和滑鼠右鍵答案：d
5) 當變數x=2,y=5時，以下程式的輸出結果為____。
do until y>5
x=x*y
y=y+1
loop
print x
a) 2
b) 5
c) 10
d) 20 答案：c
6) 當執行以下程式時，在名為lblresult的標籤框內將顯示_____。
private sub cmdlt_click()
dim i,r
r=0for i=1 to 5 step 1
r=r+i
next i
end sub
a) 字串15
b) 整數15
c) 字串5
d) 整數5 答案：a
7) 如下有一段不完整的程式段，如果要求該程式執行3次迴圈，則應在程式中的括號裡輸入______。
x=1dox=x+3
print x
loop until(___)
a) x>=8
b) x<=8
c) x>=7
d) x<=7 答案：a
8) 若整型變數a的值為2、b的值為3，則下列程式段執行後整型變數c的值為______。
if a>5 then
if b<4 then
c=a-b
else
c=b-a
end if
elseif b>3 then c=a*b
else
c=a mod b
end if
a) 2
b) -1
c) 1
d) 6 答案：a
9) 設有如下語句：
str1=inputbox("輸入","","練習")
從鍵盤上輸入字串「示例」後，str1的值是___。
a) 「輸入」
b) 「」
c) 「練習」
d) 「示例」 答案：d
10) 我們在乙個窗體上建立兩個文字框，名稱分別為text1和text2，事件過程如下，
private sub text1_change( )
end sub
則在text1文字框輸入「visual basic」，text2將______。
a) text2中無內容顯示。
b) text2顯示"visual basic"。
c) text2顯示"visual basic"
d) text1顯示"visual basic" 答案：b
11) 下列程式的執行後s的值是_____。
s=0for x=99 to 1 step-2
s=s+x
next x
print s
a) 100
b) 500
c) 2500
d) 5000 答案：c
12) 下列程式的執行結果是____。
k=0for i=1 to 3
a=i^i^k
print a;
next i
a) 1 1 1
b) 1 2 3
c) 0 0 0
d) 1 4 9 答案：a
13) 下列程式的執行結果是_____。
dim a(5) as string
dim b as integer
dim i as integer
for i =0 to 5
a(i)=i+1
print a(i)
next i
a) 123456
b) 6
c) 654321
d) 0 答案：a
14) 下列程式的執行結果為_____。
dim intsum as integer
dim i as integer
intsum=0
for i=20.2 to 5 step -4.7
intsum=intsum +i
next i
print intsum
a) 150
b) 200
c) 50
d) 0 答案：c
15) 下列程式的執行結果為_____。
dim s as integer,n as integer
s=0:n=1
do while n<=100
s=s+n
n=n+1
loop
print s
a) 5050
b) 2500
c) 3000
d) 4000 答案：a
16) 下列程式的執行結果為_____。
a=100:b=50
if a>b then
a=a-b
else
b=b+a
end if
print a
a) 50
b) 100
c) 200
d) 10 答案：a
17) 下列程式的執行結果為________。
dim intsum as integer
dim i as integer
intsum=0
for i=0 to 50 step 10
intsum=intsum+i
next i
print intsum
a) 150
b) 200
c) 50
d) 0 答案：a
18) 下面程式執行後，x的結果為_____。
x=0for i =1 to 5
for j=i to 5
x=x+1
next j
next i
print x
a) 5
b) 10
c) 15
d) 20 答案：c
19) 下面程式執行的結果是____。
private sub form_click()
a$="123":b$="456"
c=val(a$)+val(b$)
print c\100
end sub
a) 123
b) 3
c) 5
d) 579 答案：c
20) 下列迴圈語句將執行______次。
a=100
doprint a
a=a+1
loop until a<=10
a) 1
b) 10
c) 100
d) 死迴圈答案：d
21) 下面程式段的迴圈結構執行後， 的輸出值是_____。
程式段為：
for i=1 to 10 step 2
y=y+i
next i
print i;
a) 25
b) 10
c) 11
d) 因為y的初值不知道，所以不確定答案：c
22) 寫列程式段的執行結果____。
大學VB複習題
課後複習題 一 單項選擇題 1 vb是一種物件導向的視覺化程式語言，採取了的程式設計機制。a 按過程順序執行b 從主程式開始執行 c 按模組順序執行d 事件驅動 2 已知x 8,y 20,執行下面的程式段後，有x 20,y 8。a t x x y y t b x y y x c x t t x y ...
Vb考試複習題
一 填空題 1.設 a 2,b 3，表示式 a b 的值是false 大小於表示判斷 2.在vb中宣告符號常量的關鍵字是 const 變數是用dim a as 3.表示式10 mod 16 4的值是 2 優先順序1 2 取負，3 乘 除 4 整除 5 mod，6 加減 4.設a 5，b 6，c 7，...
語文複習題目
活著 一 名詞解釋 余華 60後大陸先鋒派 的代表作家，山東高唐人，1984年開始發表 其代表作有 兄弟 活著 世事如煙 河邊的錯誤 難逃劫難 許三觀賣血記 長篇 活著 由張藝謀拍成電影。二 論述題 福貴形象簡介 徐福貴經歷了從紈絝子弟到城鎮居民的人生煉獄。難能可貴的是，面對一貧如洗的家，他痛定思痛...