Visual Basic 顺序结构程序选择题.docx

Visual Basic 顺序结构程序选择题.docx

《Visual Basic 顺序结构程序选择题.docx》由会员分享，可在线阅读，更多相关《Visual Basic 顺序结构程序选择题.docx（19页珍藏版）》请在冰豆网上搜索。

VisualBasic顺序结构程序选择题

VisualBasic第三章顺序结构试题

（1）执行以下程序段

a$=“VisualBasicProgramming”

b$=“C++”

c$=UCase（Left$（a$,7））&b$&Right$（a$,12）

后，变量c$的值为

（A）VisualBASICProgramming

（B）VISUALC++Programming

（C）VisualC++Programming

（D）VISUALBASICProgramming

参考答案：

B

（2）下列叙述中正确的是

（A）MsgBox语句的返回值是一个整数

（B）执行MsgBox语句并出现信息框后，不用关闭信息框即可执行其他操作

（C）MsgBox语句的第一个参数不能省略

（D）如果省略MsgBox语句的第二个参数（Title），则信息框的标题为空参考答案：

C

（3）设有以下程序：

PrivateSubFormClick（）

x=50

Fori=1To4

y=InputBox（“请输入一个整数”）

y=Val（y）

IfyMod5=0Then

a=a+y

x=y

Else

a=a+x

EndIf

Nexti

Printa

EndSub

程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为

（A）100

（B）50

（C）120

（D）70

参考答案：

A

（4）表达式Left（"howareyou",3）的值是（）

　　A）how

　　B）are

　　C）you

　　D）howareyou

　　参考答案：

A

（5）下列正确的VisualBasic注释语句是（）

　　A）Dima（10）AsIntegerRem这是一个VB程序

　　B）这是一个VB程序

　　PrivateSubCommand1_Click（）…

　　C）a=1:

b=2:

_Rem这是一个VB程序：

c=3

　　D）IfShift=6AndButton=2Then

　　Print"BBBB"Rem这是一个VB程序

　　EndIf

参考答案：

B

（6）在窗体上画一个命令按钮，然后编写如下代码：

　　PrivateSubCommand1_Click（）

　　a&=InputBox（"请输入第一个数"）

　　b&=InputBox（"请输入第二个数"）

　　Printb&+a&

　　EndSub

　　程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是（）

　　A）66666

　　B）5432112345

　　C）1234554321

　　D）出错

参考答案：

A

（7）下列叙述不正确的是（）

　　A）注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译

　　B）注释语句可以放在代码中的任何位置

　　C）注释语句不能放在续行符的后面

　　D）代码中加入注释语句的目的是提高程序的可读性

　　参考答案:

B

（8）设a=2,b=3,c=4,d=5，则表达式Nota<=cOr4*c=b^2Andb<>a+c的值是（）

　　A）-1

　　B）1

　　C）True

　　D）False

　　参考答案：

D

（9）假定程序中有如下语句：

　　answer=MsgBox（"第一个字符串"，vbAbortRetryIgnore_OrvbCritical_OrvbDefaultButton3,_"第二个字符串"）执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为（）

　　A）“第二个字符串”

　　B）5

　　C）3

D）7

参考答案：

B

（10）结构化程序设计三种基本逻辑结构是（）

A.选择结构、循环结构和嵌套结构

B.顺序结构、选择结构和循环结构

C.选择结构、循环结构和模块结构

D.顺序结构、递归结构和循环结构

　参考答案：

B

（11）有如下过程代码：

　　Subvar_dim（）

　　StaticnumaAsInteger

　　DimnumbAsInteger

　　numa=numa+2

　　numb=numb+1

　　printnuma;numb

　　EndSub

　　连续3次调用var_dim过程，第3次调用时的输出是

　　A）21

　　B）23

　　C）61

D）63

参考答案：

C

（12）设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：

　　Functionfun（aAsInteger,bAsInteger）

　　Whilea>b

　　a=a-b

　　Wend

　　fun=a

　　EndFunction

　　在调试时发现函数是错误的。

为使函数能产生正确的返回值，应做的修改是

　　A）把a=a-b改为a=b-a

　　B）把a=a-b改为a=a\b

　　C）把Whilea>b改为Whilea

D）把Whilea>b改为Whilea>=b

参考答案：

D

（13）为计算1+2+22+23+24+…+210的值，并把结果显示在文本框Text1中，若编写如下事件过程：

　　PrivateSubCommand1_Click（）

　　Dima%,s%,k%

　　s=1

　　a=2

　　Fork=2To10

　　a=a*2

　　s=s+a

　　Nextk

　　Text1.Text=s

　　EndSub

　　执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是

　　A）把s=1改为s=0

　　B）把Fork=2To10改为Fork=1To10

　　C）交换语句s=s+a和a=a*2的顺序

D）同时进行B）、C）两种修改

参考答案：

D

（14）设x是整型变量，与函数Ⅱf（x>0,-x,x）有相同结果的代数式是

　　A）|x|

　　B）-|x|

　　C）x

D）-x

参考答案：

B

（15）下面不能在信息框中输出“VB”的是

　　A）MsgBox"VB"

　　B）x=MsgBox（"VB"）

　　C）MsgBox（"VB"）

D）CallMsgBox"VB"

参考答案：

D

（16）下面是求最大公约数的函数的首部

　　Functiongcd（ByValxAsInteger,ByValyAsInteger）AsInteger

　　若要输出8、12、16这3个数的最大公约数，下面正确的语句是

　　A）Printgcd（8,12），gcd（12,16），gcd（16,8）

　　B）Printgcd（8,12,16）

　　C）Printgcd（8），gcd（12），gcd（16）

D）Printgcd（8,gcd（12,16））

参考答案：

D

（17）下面程序计算并输出的是

　　PrivateSubComand1_Click（）

　　a=10

　　s=0

　　Do

　　s=s+a*a*a

　　a=a-1

　　LoopUntila<=0

　　Prints

　　EndSub

　　A）13+23+33+…+103的值

　　B）10!

+…+3!

+2!

+1!

的值

　　C）（1+2+3+…+10）3的值

D）10个103的和

参考答案：

A

（18）下面程序运行时，若输入395，则输出结果是

　　PrivateSubComand1_Click（）

　　Dimx%

　　x=InputBox（"请输入一个3位整数"）

　　PrintxMod10,x\100,（xMod100）\10

　　EndSub

　　A）395

　　B）539

　　C）593

D）359

参考答案：

B

（19）某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中

　　PrivateSubComand1_Click（）

　　Open"out.txt"ForOutputAs#2

　　Print"Text1"

　　Close#2

　　EndSub

　　调试时发现没有达到目的，为实现上述目的，应做的修改是

　　A）把Print"Text1"改为Print#2,Text1

　　B）把Print"Text1"改为PrintText1

　　C）把Print"Text1"改为Write"Text1"

D）把所有#2改为#1

参考答案：

A

（20）下面程序运行时，若输入“VisualBasicProgramming”，则在窗体上输出的是

　　PrivateSubComand1_Click（）

　　Dimcount（25）AsInteger,chAsString

　　ch=Ucase（InputBox（"请输入字母字符串"））

　　Fork=1ToLen（ch）

　　n=Asc（Mid（ch,k,1））-Asc（"A"）

　　Ifn>=0Then

　　Count（n）=Count（n）+1

　　EndIf

　　Nextk

　　m=count（0）

　　Fork=1To25

　　Ifm

　　m=count（k）

　　EndIf

　　Nextk

　　Printm

　　EndSub

　　A）0

　　B）1

　　C）2

D）3

参考答案：

D

（21）设a=2,b=3,c=4,d=5，则表达式Nota<=cOr4*c=b^2Andb<>a+c的值是（）

　　A）-1

　　B）1

　　C）True

　　D）False

　　参考答案：

D

（22）假定程序中有如下语句：

　　answer=MsgBox（"第一个字符串"，vbAbortRetryIgnore_OrvbCritical_OrvbDefaultButton3,_"第二个字符串"）执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为（）

　　A）“第二个字符串”

　　B）5

　　C）3

　　D）7

　　参考答案：

B

（23）与传统的程序设计语言相比，VisualBasic最突出的特点是（）

A）结构化程序设计

B）程序开发环境

　　C）事件驱动编程机制

　　D）程序调试技术

　　参考答案：

C

（24）表达式Left（"howareyou",3）的值是（）

　　A）how

　　B）are

　　C）you

　　D）howareyou

　　参考答案：

A

（25）以下说法不正确的是（）

　　A）VisualBasic是一种可视化编程工具

　　B）VisualBasic是面向过程的编程语言

　　C）VisualBasic是结构化程序设计语言

　　D）VisualBasic采用事件驱动编程机制

　　参考答案:

B

（26）可以实现从键盘输入一个作为双精度变量a的值的语句是

A）a=InputBox（）

B）a=InputBox（"请输入一个值"）

C）a=Val（Inp