vb循环结构选择题共24页.docx

vb循环结构选择题共24页.docx

《vb循环结构选择题共24页.docx》由会员分享，可在线阅读，更多相关《vb循环结构选择题共24页.docx（35页珍藏版）》请在冰豆网上搜索。

vb循环结构选择题共24页

一、选择题

其实,任何一门学科都离不开死记硬背,关键是记忆有技巧,“死记”之后会“活用”。

不记住那些基础知识,怎么会向高层次进军?

尤其是语文学科涉猎的范围很广,要真正提高学生的写作水平,单靠分析文章的写作技巧是远远不够的,必须从基础知识抓起,每天挤一点时间让学生“死记”名篇佳句、名言警句,以及丰富的词语、新颖的材料等。

这样,就会在有限的时间、空间里给学生的脑海里注入无限的内容。

日积月累,积少成多,从而收到水滴石穿,绳锯木断的功效。

1、无条件转移GoTo语句后面是（A）

课本、报刊杂志中的成语、名言警句等俯首皆是,但学生写作文运用到文章中的甚少,即使运用也很难做到恰如其分。

为什么?

还是没有彻底“记死”的缘故。

要解决这个问题,方法很简单,每天花3-5分钟左右的时间记一条成语、一则名言警句即可。

可以写在后黑板的“积累专栏”上每日一换,可以在每天课前的3分钟让学生轮流讲解,也可让学生个人搜集,每天往笔记本上抄写,教师定期检查等等。

这样,一年就可记300多条成语、300多则名言警句,日积月累,终究会成为一笔不小的财富。

这些成语典故“贮藏”在学生脑中,自然会出口成章,写作时便会随心所欲地“提取”出来,使文章增色添辉。

A、标号或行号

教师范读的是阅读教学中不可缺少的部分，我常采用范读，让幼儿学习、模仿。

如领读，我读一句，让幼儿读一句，边读边记；第二通读，我大声读，我大声读，幼儿小声读，边学边仿；第三赏读，我借用录好配朗读磁带，一边放录音，一边幼儿反复倾听，在反复倾听中体验、品味。

B、输出语句

C、输入语句

D、子过程

2、无条件转移GoTo语句后面的行号或标号以字母开头，后跟（A）

A、冒号

B、分号

C、逗号

D、空格

3、无条件转移GoTo语句后面的行号或标号在同一过程中（A）

A、必须唯一

B、可以重复

C、以数字开头

D、以汉字开头

4、while循环结构中的条件表达式取值为（A）

A、True

B、False

C、True或False

D、0

5、while循环结构中的条件表达式取值为（A）时执行语句组

A、True

B、False

C、True或False

D、0

6、while循环结构中与（A）匹配使用，不能单独出现

A、Wend

B、end

C、loop

D、next

7、Do…、、loop循环结构中的循环体执行的最少次数为（A）

A、0

B、1

C、2

D、3

8、前测型Do…、、loop循环结构中的循环体执行的最少次数为（A）

A、0

B、1

C、2

D、3

9、后测型Do…、、loop循环结构中的循环体执行的最少次数为（B）

A、0

B、1

C、2

D、3

10、Do…loop循环结构中的ExitDo语句的功能是（B）

A、退出整个程序

B、退出当层循环

C、退出最外层循环

D、退出所在子程序

11、Do…loop中使用while关键字时，条件为（B）执行循环体

A、False

B、True

C、0

D、假或真

12、Do…loop中使用until关键字时，条件为（A）执行循环体

A、False

B、True

C、0

D、假或真

13、Do…loop中使用while关键字时，条件为（A）终止循环

A、False

B、True

C、0

D、假或真

14、Do…loop中使用until关键字时，条件为（B）终止循环

A、False

B、True

C、0

D、假或真

15、For…Next循环结构中（C）用来控制循环变量

A、for

B、step

C、next

D、to

16、For…Next循环结构中step用来控制（D）

A、循环变量

B、循环变量初值

C、循环变量终值

D、循环变量增量

17、For…Next循环结构中循环变量初值大于终值时,步长为（A）

A、负数

B、非负数

C、正整数

D、正数

18、For…Next循环结构中循环变量初值小于终值时,步长为（A）

A、负数

B、负整数

C、正整数

D、正数

19、For…Next循环结构中next后的循环变量（A）

A、可以省略

B、不可以省略

C、与for后的变量名可以不同

D、与for后的变量不是同一变量

20、For…Next中循环变量初值与终值间使用的关键字是（A）

A、To

B、In

C、goto

D、private

21、For…Next中循环变量初值与终值间使用的关键字是（A）

A、To

B、In

C、goto

D、private

22、执行下面的程序段后，s的值为（C）

PrivateSubForm_Click（）

StaticsAsInteger

s=5

Fori=1.4To2.1Step0.6

s=s+1

Nexti

Prints

EndSub

A、5

B、6

C、7

D、1

23、下面程序的作用是利用随机函数产生10个100~200之间（包含100、200）的随机数，打印其中为5的倍数的数将程序补充完整（Ａ）

PrivateSubCommand1_Click（）

Form=1To10

x=Int（Rnd*101+100）

If（）Then

Printx;

EndIf

Nextm

EndSub

A、xmod5=0

B、xmod5==0

C、x/5=0

D、x\5=0

24、设有如下程序：

OptionBase1

PrivateSubForm_Click（）

Dima（10）,P（3）AsInteger

k=5

Fori=1To10

a（i）=i

Nexti

Fori=1To3

P（i）=a（i*i）

Nexti

Fori=1To3

k=k+P（i）*2

Nexti

Printk

EndSub

程序运行后，单击窗体，则在窗体上显示的是（A）

A、33

B、35

C、37

D、38

25、在窗体上画一个命令按纽Command1，然后编写如下事件过程：

PrivateSubCommand1__Click（）

X=0

N=val（inputbox（“n=?

”））

Fori=1ton

Forj=1toi

X=x+1

Nextj

Nexti

Printx

Endsub

程序运行后、单击命令按钮,输入3,在窗体上显示的内容是（D）

A、9B、44C、5D、6

26、以下能够正确计算n！

的程序是（C）

A、privatesubcommand1__click（）

N=5:

x=1

Do

X=x*1

I=i+1

Loopwhilei

Printx

Endsub

B、privatesubcommand1__click（）

N=5:

x=1:

i=1

Do

X=x*i

I=i+1

Loopwhilei

Printx

Endsub

C、privatesubcommand1__click（）

N=5:

x=1:

i=1

Do

X=x*i

I=i+1

Loopwhilei<=n

Printx

Endsub

D、privatesubcommand1__click（）

N=5:

x=1:

i=1

Do

X=x*i

I=i+1

Loopwhilei>n

Printx

Endsub

27、在窗体上画一个命令按纽Command1，标签Label1然后编写如下事件过程：

Privatesubcommand1_click（）

Fori=1to15

X=2*i-1

Ifxmod3=0thens=s+1

Nexti

Label1、caption=s

Endsub

程序运行后,单击命令按钮,标签中显示的内容是（B）

A、1B、5C、27D、45

28、在窗体上画一个命令按纽Command1，然后编写如下事件过程：

Privatesubcommand1_click（）

Fori=1to4

Forj=0toi

Printchr$（65+i）

Nexti

Print

Endsub

程序运行后,单击命令按钮,窗体中显示的内容是（A）

A、BB

CCC

DDDD

EEEEE

B、A

BB

CCC

DDDD

C、B

CC

DDD

EEEE

D、AA

BBB

CCCC

DDDDD

28、在窗体上画两个名称分别为text1，text2的文本框和一个名称为command1的命令按钮，然后编写如下事件过程：

Privatesubcommand1_click（）

Dimxasinteger，nasinteger

X=1：

n=0

Dowhilex<20

X=x*3

N=n+1

Loop

Text1、text=str（x）

Text2、text=str（n）

Endsub

程序运行后,单击命令按钮,在两个文本框中显示的值分别是（B）

A、15和1

B、27和3

C、195和3

D、600和4

29、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：

PrivateSubCommand1_Click（）

Dima（5）,b（5）

Forj=1to4

A（j）=3*j

B（j）=a（j）*3

Nextj

Text1、text=b（j\2）

EndSub

程序运行后，单击命令按钮，在文本框中显示（B）

A、25

B、18

C、36

D、35

30、下面程序运行时，内层循环的循环总次数是（A）

Form=1To3

Forn=0Tom-1

Nextn

Nextm

A、6

B、3

C、0

D、9

31、定义语句DimA（-3to3）asInteger，定义数组的元素个数是（D）

A、6

B、3

C、0

D、7

32、执行下面的程序段后，X的值为（C）

X=5

ForI=1to10Step2

X=X+I\5

NextI

A、7

B、10

C、8

D、5

33、如果整型变量a、b的值分别为3和1，则下列语句中循环体的执行次数是（D）

ForI=atob

PrintI

NextI

A、0

B、1

C、2

D、3

34、下列关于dowhile…loop和do…loopuntil循环执行循环体次数的描述正确的是（D）

A、dowhile…loop循环和do…loopuntil循环至少都执行一次

B、dowhile…loop循环和do…loopuntil循环可能都不执行

C、dowhile…loop循环至少执行一次，do…loopuntil循环可能不执行

D、dowhile…loop循环可能不执行，do…loopuntil循环至少执行一次

35、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：

PrivateSubCommand1_Click（）

Fori=1To4

a=1

Forj=1To3

a=2

Fork=1To2

a=a+6

Nextk

Nextj

Nexti

Printa

EndSub

程序运行后，单击命令按钮，则在窗体上显示的内容是（A）

A、14

B、15

C、16

D、17

36、设有如下程序：

PrivateSubForm_Click（）

a=1

Fori=1To3

SelectCasei

Case1,3

a=a+1

Case2,4

a=a+2

EndSelect

Nexti

Printa

EndSub

程序运行后，单击窗体，则在窗体上显示的内容是（B）

A、6

B、5

C、4

D、3

37、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：

subss（b（）asInteger）

Fori=1To4

b（i）=2*i

Nexti

EndSub

PrivateSubCommand1_Click（）

Dima（1To4）AsInteger

a

（1）=5:

a

（2）=6

a（3）=7:

a（4）=8

ssa（）

Fori=1To4

Printa（i）

Nexti

EndSub

运行上面的程序，单击命令按钮，则在窗体上显示的内容是（B）

A、5678

B、2468

C、1234

D、5768

38、在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：

Functionfun（xAsInteger）

Staticz

y=y+1:

z=z+1

fun=x+y+z

EndFunction

PrivateSubCommand1_Click（）

DimxAsInteger

x=1

Fori=1To2

Printfun（x）

Nexti

EndSub

程序运行后，如果单击命令按钮，窗体中显示的内容是（B）

A、33

B、34

C、35

D、36

39、若I、n均为整型变量，下列程序段的输出结果为（C）

PrivateSubForm_Click（）

n=0

Fori=1To10

IfiMod2=1Thenn=n+1

Nexti

Printn

EndSub

A、0

B、4

C、5

D、3

40、在窗体中添加一个文本框（其中Name属性为Text1）,然后编写如下代码：

PrivateSubForm_click（）

Text1、Text=""

Text1、SetFocus

Fori=1To10

Sum=Sum+i

Nexti

Text1、Text=Sum

EndSub

上述程序运行后，单击窗体，则运行的结果（A）

A、在文本框Text1中输出55

B、在文本框Text1中输出0

C、出错

D、在文本框Text1中输出不定值

41、在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码：

PrivateSubCommand1_Click（）

x=0

DoUntilx=-1

a=InputBox（"请输入A的值"）

a=Val（a）

b=InputBox（"请输入B的值"）

b=Val（b）

x=InputBox（"请输入X的值"）

x=Val（x）

a=a+b+x

Loop

Printa

EndSub

程序运行后，单击命令按钮，依次在输入对话框中输入

12345-1，则输出结果为（A）

A、8

B、9

C、14

D、15

42、设有如下程序：

OptionBase1

PrivateSubForm_Click（）

Dima（10）,P（3）AsInteger

k=5

Fori=1To10

a（i）=i

Nexti

Fori=1To3

P（i）=a（i*i）

Nexti

Fori=1To3

k=k+P（i）*2

Nexti

Printk

EndSub

程序运行后，单击窗体，则在窗体上显示的是（A）

A、33

B、35

C、37

D、38

43、在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码：

FunctionF（aAsInteger）

b=0

Staticc

b=b+1

c=c+1

F=a+b+c

EndFunction

PrivateSubCommand1_Click（）

DimaAsInteger

DimbAsInteger

a=2

Fori=1To3

b=F（a）

Printb

Nexti

EndSub

程序运行后，如果单击命令按钮，则窗体上显示的内容是（A）

A、456

B、123

C、0123

D、234

44、在窗体上画一个命令按钮，名称为Command1。

然后编写如下程序：

PrivateSubCommand1_Click（）

Fora=1To4

　　Forb=0Toa

　　　PrintChr（65+a）

　　Nextb

　　Print

Nexta

EndSub

程序运行后，如果单击命令按钮，则在窗体上显示的内容是（B）

A、A

BB

CCC

DDDD

B、BB

CCC

DDDD

EEEEE

C、B

CC

DDD

EEEE

D、B

C

D

E

45、循环是一组重复执行的指令，重复次数由（B）决定

A、int（终值-初值）+1

B、int（（终值-初值）/步长）+1

C、int（（终值-初值）/步长）

D、（终值-初值）/步长

46、假定有以下程序段：

Fori=1To3

Forj=5To1Step-1

Printi*j

Nextj,i

则语句Printi*j的执行次数是（A）

A、15

B、16

C、17

D、18

47、以下程序段的输出结果是（C）

num=0

Whilenum<=2

num=num+1

Printnum

Wend

A、135

B、234

C、123

D、012

48、、在窗体中添加一个命令按钮（其Name属性为Command1），然后编写如下代码：

PrivateSubCommand1_Click（）

Dimn（）AsInteger

Dima,bAsInteger

a=InputBox（"Enterthefirstnumber"）

b=InputBox（"Enterthesecondnumber"）

ReDimn（aTob）

Fork=LBound（n,1）ToUBound（n,1）

n（k）=k

Printn（k）

Nextk

EndSub

程序运行后，单击命令按钮，在输入对话框中分别输入2和3，输出结果为（D）

A、01

B、13

C、12

D、23

49、在窗体中添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：

PrivateSubCommand1_Click（）

x=0

DoWhilex<10

x=（x-2）*（x+3）

n=n+1

Loop

Text1、Text=Str（n）

Text2、Text=Str（x）

EndSub

程序运行后，单击命令按钮，在两个文本框中显示的值分别为（B）

A、1和0

B、2和24

C、3和50

D、4和68

50、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

PrivateSubCommand1_Click（）

StaticxAsInteger

Cls

Fori=1To2

y=y+x

x=x+2

Next

Printx,y

EndSub

程序运行后，连续三次单击Command1按钮后，窗体上显示的是（B）

A、42

B、1218

C、1230

D、46

51、设有如下程序段：

x=2

Fori=1To10Step2

x=x+i

Next

运行以上程序后，x的值是（B）

A、26

B、27

C、38

D、57

52、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：

OptionBase1

PrivateSubCommand1_Click（）

Dima

a=Array（1,2,3,4,5）

Fori=1ToUBound（a）

a（i）=a（i）+i-1

Next

Printa（3）

EndSub

程序运行后，单击命令按钮，则在窗体上显示的内容是（B）

A、4

B、5

C、6

D、7

53、阅读程序

OptionBase1

PrivateSubForm_Click（）

Dimarr,Sum

Sum=0

arr=Array（1,3,5,7,9,11,13,15,17,19）

Fori=1To10

Ifarr（i）/3=arr（i）\3Then

Sum=Sum+arr（i）

EndIf

Nexti

PrintSum

EndSub

程序运行后，单击窗体，输入结果为（C）

A、13

B、14

C、27

D、15

54、执行以下程序段

a$="abbacddcba"

Fori=6To2Step-2

X=Mid（a,i,i）

Y=Left（a,i）

z=Right（a,i）

z=UCase（X&Y&z）

Nexti

Printz

输出结果为（B）

A、ABA

B、BBABBA

C、ABBABA

D、AABAAB

55、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：

OptionBase1

PrivateSubCommand1_Click（）

DimaAsVariant

a=Array（1,2,3,4,5）

Sum=0

Fori=1To5

Sum=sum+a（i）

Nexti

x=Sum/5

Fori=1To5

Ifa（i）>xThenPrinta（i）;

Nexti

EndSub

程序运行后，单击命令按钮，在窗体上显示的内容是（D）

A、12

B、12