大一vb期末考試試題

時間 2021-10-14 21:23:07

1樓:匿名使用者

單項選擇題 判斷題 填空題 程式設計題

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",應在窗體上執行以下_______操作。

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

lblresult.caption=str(r)

end sub

a) 字串15

b) 整數15

c) 字串5

d) 整數5 答案:a

7) 如下有一段不完整的程式段,如果要求該程式執行3次迴圈,則應在程式中的括號裡輸入______。

x=1do

x=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( )

text2.text=ucase(text1.text)

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) 寫列程式段的執行結果____。

a="abbacddcba"

for i=6 to 2 step -2

x=mid(a,i,i)

y=left(a,i)

z=right(a,i)

z=x & y & z

next i

print ucase(z)

a) aba

b) aabaab

c) bbabba

d) abbaba 答案:c

23) 以下語句輸出結果是(在立即視窗中)_____。

a="beijing"

b="shanghai"

print a;b

a) beijing shanghai

b) abeijing shanghai

c) beijingshanghai

d) abeijing 答案:c

24) 有如下程式:

for i=1 to 3

for j=5 to 1 step-1

print i+j

next j,i

其迴圈執行的次數為______。

a) 12

b) 13

c) 14

d) 15 答案:d

25) 有如下程式段,該程式執行後,變數a的值為______。

for i=1 to 2

for j=i to 2

for k=1 to j

a=a+2

next k

next j

next i

a) 2

b) 8

c) 10

d) 20 答案:c

26) 執行下列程式後,變數a的值為____。

dim i as integer

dim a as integer

a=0for i=0 to 100 step 2

a=a+1

next i

a) 1

b) 10

c) 51

d) 100 答案:c

27) 執行下列程式後,x的值為______。

x=3y=6

do while y<=6

x=x*y

y=y+1

loop

a) 3

b) 6

c) 18

d) 20 答案:c

28) 執行下列程式段後,整型變數c的值為___。

a=24

b=328

select case b\10

case 0

c=a*10+b

case 1 to 9

c=a*100+b

case 10 to 99

c=a*1000+b

end select

a) 537

b) 2427

c) 24328

d) 240328 答案:c

29) 執行完下面的程式段後,迴圈將執行____次。

for i=1.7 to 5.9 step 0.9

a=a+1

print a

next i

a) 3

b) 4

c) 5

d) 6 答案:c

30) 有如下語句,執行後該段語句的迴圈次數是_____。

dim s,i,j as integer

for i =1 to 3

for j=3 to 1 step-1

s=i*j

next j

next i

a) 9

b) 10

c) 3

d) 4 答案:a

31) 有如下程式,該程式將______。

for i=1 to 10 step 0

k=k+2

next i

a) 形成無限迴圈。

b) 迴圈體執行一此後結束迴圈。

c) 語法錯誤。

d) 迴圈體不執行即結束迴圈。 答案:a

32) 有如下程式段,該程式段執行完畢後,共迴圈了________。

for i=1 to 5

for j=1 to i

for k=j to 4

print "a"

next k

next j

next i

a) 4

b) 5

c) 38

d) 40 答案:d

33) 有如下程式,該程式的執行結果為______。

dim k as integer

n=5:m=1:k=1

do while k<=n

m=m*2

k=k+1

loop

print m

a) 1

b) 5

c) 32

d) 40 答案:c

34) 以下程式輸出1到1000之間所有的偶數之和,請補充完該程式。

private sub command_click()

dim x as double

for i=0 to 1000

if ____ then

x=x+i

end if

next i

print x

end sub

a) i mod 2 = 0

b) x mod 2 = 0

c) i mod 2 <> 0

d) x mod 2 <> 0 答案:a

35) 以下是計算10的階乘的程式,請補充該程式。

dim t as single

dim k as integer

k=0:t=1

while_______

k=k+1

t=t*k

wend

print t

a) k<10

b) k>10

c) k=10

d) k>=10 答案:a

36) _____是由visual basic提供的一種專門的子程式,由物件本身所具有,反映該物件功能的內部函式或過程。

a) 檔案

b) 屬性

c) 方法

d) 窗體 答案:c

37) 剛建立一個新的標準exe工程後,不在工具箱**現的控制元件是_____。

a) 單選按鈕

b) **框

c) 通用對話方塊

d) 文字框 答案:c

38) 下列各項不是visual basic的基本資料型別的是_____。

a) char

b) string

c) integer

d) double 答案:a

39) 下列運算結果中,值最大的是 ______。

a) 3\4

b) 3/4

c) 4 mod 3

d) 3 mod 4 答案:d

40) 以下不屬控制元件的一項是_____。

a) 文字框

b) 標籤框

c) 列表框

d) 訊息框 答案:d

41) 用inputbox函式可幫助生成_______。

a) 訊息框

b) “儲存”對話方塊

c) 簡單輸入框

d) “顏色”對話方塊 答案:c

42) ______物件不能響應click事件。

a) 列表框

b) **框

c) 窗體

d) 計時器 答案:d

43) 17 mod 3的運算結果是_____。

a) 0.5

b) 1

c) 1.5

d) 2 答案:d

44) 變數x=32769,則變數宣告時不能將其宣告為_____。

a) intrger

b) variant

c) long

d) single 答案:a

45) 表示式2*3^2+2*8/4+3^2的值為_____。

a) 64

b) 31

c) 49

d) 22 答案:b

46) 複選物件是否被選中,是由其_____屬性決定的。

a) checked

b) value

c) enabled

d) selected 答案:b

47) 沒有caption屬性的控制元件是_____。

a) label

b) optionbutton

c) frame

d) lisbox 答案:d

48) 下列符號是visual basic中合法變數名的是_____。

a) if

b) 7ab

c) a[b]7

d) ab_7 答案:d

49) 使窗體自動向下移動的語句是move_____。

a) left, top+100

b) top+100

c) top+100

d) top=top+100 答案:a

50) rgb函式通過紅、綠、藍三基色混合產生某種顏色,其語法為rgb(紅、綠、藍),括號中紅、綠、藍三基色的成分使用0-255之間的整數。若使用3個滾動條分別輸入3種基色,為保證輸入數值有效,則應設定_____屬性。

a) max和min

b) smallchange和largechange

c) scroll和change

d) value 答案:a

建築材料期末考試試題

一 填空題 每空1分,共30分 1 材料的孔隙狀況有孔隙率 孔隙直徑 孔隙大小三個指標說明。2 當溼潤角a小於等於900的為親水材料,當a大於900 憎水材料.3 水泥熟料的礦物組成有c3s和。c2s c3a c4af 4 凡水泥初凝時間 氧化鎂 三氧化溜 體積安定性中任一項不符合標準規定時均為廢品...

毛概期末考試試題,求毛概期末考試2018版重點複習資料電子檔 謝謝

雲南新華電腦學校 對於毛概的複習,有以下幾點複習方法,希望能幫助到你 一 迴歸課本為主,找準備考方向 學生根據自己的丟分情況,找到適合自己的備考方向。基礎差的學生,最好層層追溯到自己學不好的根源。無論哪個學科,基本上都是按照教材層層關聯的,希望基礎不好的同學以課本為主,配套練習課本後的練習題,以中等...

(急C程式期末考試上機題目,大一c語言考試題(急)

感覺大方 2.void fun char s,char t,char p 3.int fun int m return n 1 4.void fun int x,int n return n 4.int i int temp int min int gmin int index min x 0 fo...