Visual Basic测试题及其答案

VisualBasic测试题及其答案

1.当VB执行下面语句后，A的值为（）

A=1

IfA=0ThenA=A+1

IfA>1ThenA=0

［单选题］*

A、0

B、1

C、2

D、3

2.运行下列程序段后，显示的结果为（）

al=35

a2=53

Ifal<a2ThenPrintalElsePrinta2［单选题］*

A、35（正确答案）

B、53

C、88

D、3553

3.以下Case语句中错误的是（）

［单选题］*

A、CaseIs>5andIs<101答案）

B、Case1to10

C、CaseIs>10

D、Case2,3Js>8

4.在SelectCaseX结构中，描述判断条件3<=X<=7的测试项应该写成（）

［单选题］*

A、Case3to7

B、Case3<=x<=7

C、Case3<=x,x<=7

D、CaseIs<=7,Is>=3

5.VB提供的结构化程序设计的3种基本结构是（）［单选题］*

A、递归结构、选择结构、循环结构

B、输入/输出结构、选择结构、循环结构

C、顺序结构、过程结构、循环结构

D、顺序结构、选择结构、循环结构

6.语句IfX=lThenY=l,下列说法正确的是（）［单选题］*

A、X=l,Y=1均为赋值语句

B、X=1为关系表达式，Y=1为赋值语句啕答案）

C、X=1和Y=1均为关系表达式

D、X=1为赋值语句，Y=I为关系表达式

7.下列程序运行后，输出的结果是（）

PrivateSubCommandl_Click（）

k=3

Ifk>=1Thena=3

Ifk>=2Thena=2

Ifk>=3Thena=1

Printa

EndSub

［单选题］*

A、1

B、2

C、3

D、出错

8.下列程序段的执行结果是（）

x=3:y=5:z=9

x=x+y

y=x-y

Ifx-y>z-xThenz=x+y

Ifx+y>z-yThenx=z+y

Printx；y；z

［单选题］*

A、359

B、14311

C、8311

D、859

9.下面程序运行后，变量Y的值为（）

a=5:b=55:b=a-b

Ifa>bTheny=a+bElsey=a-b

Printy［单选题］*

A、-45（正确答案）

B、-50

C、50

D、60

10.下面程序段运行后，Y的值为（）

x=5

IfxA2=16Theny=x

IfxA2<15Theny=1/x

IfxA2>15Theny=xA2+1

Printy［单选题］*

A、16

B、26（正确答案）

C、17

D、4

11.下面的程序运行时，若从键盘输入3和4,则程序输出结果为（）

a=InputBox（"请输入a"）

b=InputBox（"请输入b"）

c=a

Ifb>cThenc=b

c=c*c

Printc［单选题］*

A、14

B、16三确答案）

C、18

D、20

12.下列程序段的输出结果是（）

x=3:y=0:z=0

Ifx=y+zThen

Print"****”

Else

Print"####"

EndIf

［单选题］*

A、输出*****

B、输出####

C、语法错误，不能运行

D、输出###

13.以下程序段的执行结果为（）

a=50:b=100

Ifa>bThen

a=a-b

Else

b=b+a

EndIf

Printa［单选题］*

A、50三确答案）

B、100

C、-50

D、150

14.语句：If表达式Then中的表达式不可以是（）表达式。［单选题］*

A、字符（正确答案）

B、算术

C、逻辑

D、关系

15.执行下面程序段，输出结果（）

Dimm

IfmThenPrintmElsePrintm+1

［单选题］*

A、1（正确答案）

B、0

C、False

D、

16.下列语句中循环体的执行次数是（

for1=3to1

PrintI

NextI

［单选题］*

A、0（正确答案）

B、1

C、2

D、3

17.设有如下程序段：

x=3

Fori=1To10Step3

x=x+i

Nexti

Printx［单选题］*

A、25（正确答案）

B、26

C、27

D、28

18.下列关于DoWhile...Loop循环和Do...LoopUntil循环执行循环题次数的描述正

确的是（）［单选题］*

A、DoWhile...Loop循环和Do...LoopUntil循环至少都执行一次

B、DoWhile...Loop循环和Do...LoopUntil循环可能都不执行

C、DoWhile...Loop循环至少执行一次，Do...LoopUntil循环可能不执行

D、DoWhile…Loop循环可能不执行，Do...LoopUntil循环至少执行一次

19.下面“赋值号”和“等号”的意义叙述正确的是（）［单选题］*

A、赋值号不具有方向性

B、等号具有方向性

C、”赋值号“和”等号”的意义相同

D、赋值号具有方向性，只能把赋值号右边的表达式的值赋给左边的变量

案）

20.下面关于赋值语句的说法正确的是（”单选题］*

A、赋值语句以关键字Let开头，也称为Let语句隹至i

B、一个赋值语句中，可以同时给多个变量赋值

C、整型和浮点型数值之间不可以相互转换

D、赋值号与等号意义相同

21.下面给变量x,y,z赋值都为2,正确的表示方式是（）［单选题］*

A、x=2:y=2:z=2

B、x=y=z=2

C、x=2;y=2;z=2

D、x=2:y=2,z=2

22.赋值语句中数值型与逻辑型之间的转换叙述正确的是（）

［单选题］*

A、数值型转换为逻辑型时，。转换为False,非（）转换为True

B、逻辑型转换为数值型时，False转换为0,True转换为1

C、数值型转换为逻辑型时，1转换为False,非0转换为True

D、逻辑型转换为数值型时，False转换为1,True转换为0

23.下面顺序结构程序中，赋值语句转换结果正确的是（）

PrivateSubCommandl_Click（）

a%="22.51"

b%="22.5"

c%="22.49"

Printa;b;c

EndSub［单选题］*

A、232222卷票）

B、222223

C、222322

D、232322

24.关于Print输出语句的叙述不正确的是（）［单选题］*

A、Print语句末尾若无逗号和分号，输出后自动换行

B、Print语句中以逗号分开的输出项按紧凑格式输出

C、Print语句中以分号分开的输出项按紧凑格式输出

D、Print语句中以逗号分开的输出项按标准格式输出

25.以下不正确的单行结构条件语句是（）f单选题］*

A、Ifx>ythenPrint"x>y"

B、ifxthent=t*x

C、ifxmod3=2thenPrintx

D、ifx<0theny=2*x-l:printx:Endif正确答案）

26.下面关于条件函数Hf的叙述正确的是（）［单选题］*

A、在VB中，HF函数与If...then....else语句功能相同确答案）

B、Uf函数,当条件为假时,函数返回“表达式1”的值，否则，返回“表达式2”的

值

C、在VB中，申F函数和If...then语句的功能相同

D、在VB中，IIF函数与If...then....elseif语句功能相同

27.关于SelectCase语句的叙述错误的是（）［单选题］*

A、测试表达式可以是算术表达式、字符串表达式、逻辑表达式

B、Case表达式与测试表达式的数据类型必须相同

C、如果有多个Case后面的取值与测试表达式相匹配，只执行第一个与之匹配的

Case后面的语句块

D、当Case表达式为一个关系条件时，不能包含逻辑运算符

28.关于For...Next语句的叙述错误的是（）

［单选题］*

A、For循环中的循环变量是一个数值型变量

B、初值、终值、步长均为数值表达式

C、步长缺省时，默认为1

D、Next语句后面的“循环变量”与For语句中的“循环变量”可以不同

29.关于Do.…Loop循环的叙述错误的是（）

［单选题］*

A、D。While....Loop为先判断后执行，循环体有可能一次也不执行

B、Do…LoopWhile为执行后判断，循环体有可能一次也不执行

C、关键字While用于指明条件为真时就执行循环体中的语句

D、ExitDo语句表示当遇到该语句时，退出循环，执行Loop的下一句

30.关于循环嵌套的注意事项叙述正确的是（）［单选题］*

A、嵌套中每个结构必须完整

B、外层结构和内层结构可以交叉

C、内循环变量与外循环变量可以同名

D、循环嵌套中使用Exit语句，则退出所有循环

31.关于无条件转向语句的叙述正确的是（）［单选题］*

A、GoTo语句就是无条件地转移到标号或行号指定的语句

B、标号是一个数字序列

C、行号是一个字符序列

D、标号命名规则和变量一样，只是标号后要加上";"分号

32.以下哪一种结构不是VB语言的循环控制结构（）［单选题］*

A、For结构

B、SelectCase结构

C、WHILe结构

D、D。结构

33.下列程序运行后,输出的结果为（）

B=1

Dowhileb<40

b=b*（b+l）

loop

Printb

［单选题】*

A、42

B、39

C、6

D、1

34.当执行以下程序时，在窗体上将显示（）

Privatesubcmdit_click（）

DimI,R

R=0

For1=1to5step1

R=R+1

Nexti

Printstr（R）

Endsub

［单选题］*

A、5，确答案）

B、6

C、7

D、8

35.有如下程序段，该程序的运行结果为（）

Dimkasinteger

N=5:m=l:k=l

Dowhilek<=n

M=M*2

K=k+1

Loop

PrintM

［单选题］*

A、1

B、5

C、32(正确答案)

D、40

36.有如下程序段，该程序将()

Fori=lto10step0

K=k+2

Nexti

［单选题］*

A、形成无限循环(正确答案)

B、循环体执行一次后结束循环

C、语法错误

D、循环体不执行即结束循环

37.执行下列程序段后，变量Z的值是()

A="abbacddcba”

Fori=6to2step-2

X=mid(a,i,i)

Y=left(a,i)

Z=right(a,i)

Z=x&y&z

Nexti

［单选题］*

A、aba

B、aabaab

C、bbabba

D、abbaba

38.语句Fori=20.2to5step-4.7的执行次数为()［单选题］*

A、4

B、0

C、3

D、不确定

39.下列程序的执行结果是（）

K=0

Fori=lto3

A=IAIAk

Printa;

Nexti

［单选题］*

A、111.

B、123

C、000

D、149

40.当变量x=2,y=5时，以下程序的输出结果为（）

Dountily>5

X=x*y

Y=y+1

Loop

Printx

［单选题］*

A、2

B、5

C、10（正确答案）

D、20

41.下列程序执行后，变量s的值为（）

Dimsaslong,xasinteger

S=O:x=l

Dowhilex<10

S=s+x

X=x+2

Loop

Prints

［单选题］*

A、10

B、25（正确答案）

C、5（）

D、100

42.下列程序的执行结果是（）

k=0

Forj=1To2

Fori=1To3

k=i+1

Nexti

Fori=1To7

k=k+1

Nexti

Nextj

Printk

［单选题］*

A、10

B、6

C、11（正确答案）

D、16

43.下面程序运行的结果是()

m=0

DoUntil0

m=m+1

Ifm>10ThenExitDo

Loop

Printm

［单选题］*

A、0

B、10

C、11

D、出错

44.下面程序运行时语句Printm被执行的次数()

DimmAsInteger,nAsInteger

m=0

Forn=10To1Step-3

m=m+n

Printm

Nextn

［单选题］*

A、4(正确答案)

B、8

C、12

D、16

45.下面程序段的运行结果是（）

n=5:x=2:i=1

Do

x=x*i

i=i+1

LoopWhilei>n

Printx［单选题］*

A、2（正确答案）

B、1

C、3

D、4

46.执行以下程序段后，X的值为（）

DimxAsInteger,iAsInteger

x=0

Fori=20To1Step-2

x=x+i\5

Nexti

Printx［单选题