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

1、Visual Basic 顺序结构程序选择题Visual Basic 第三章顺序结构试题（1）执行以下程序段 a$=“Visual Basic Programming” b$=“C+” c$=UCase(Left$(a$,7)& b$ & Right$(a$,12) 后，变量c$的值为 （A）Visual BASIC Programming （B）VISUAL C+ Programming （C）Visual C+ Programming（D）VISUAL BASICProgramming 参考答案：B（2）下列叙述中正确的是 （A）MsgBox语句的返回值是一个整数 （B）执行MsgBox语

2、句并出现信息框后，不用关闭信息框即可执行其他操作 （C）MsgBox语句的第一个参数不能省略 （D）如果省略MsgBox语句的第二个参数（Title），则信息框的标题为空 参考答案：C（3）设有以下程序： Private Sub Form Click（） x=50 For i=1 To 4 y=InputBox(“请输入一个整数”) y=Val(y) If y Mod 5=0 Then a=a+y x=y Else a=a+x End If Next i Print a End Sub 程序运行后，单击窗体，在输入对话框中依次输入15、24、35、46，输出结果为 (A）100 (B）50 (

3、C）120(D）70 参考答案：A(4) 表达式Left(how are you,3)的值是()A)howB)areC)youD)how are you参考答案：A(5) 下列正确的Visual Basic注释语句是( )A)Dim a(10)As Integer Rem 这是一个VB程序B)这是一个VB程序Private Sub Command1_Click() C)a=1:b=2:_Rem 这是一个VB程序 ：c=3D)If Shift=6 And Button=2 ThenPrintBBBBRem这是一个VB程序End If参考答案：B(6) 在窗体上画一个命令按钮，然后编写如下代码：P

4、rivate Sub Command1_Click()a&=InputBox(请输入第一个数)b&=InputBox(请输入第二个数)Print b&+a&End Sub程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是( )A)66666B)5432112345C)1234554321D)出错参考答案：A(7) 下列叙述不正确的是( )A)注释语句是非执行语句，仅对程序的有关内容起注释作用，它不被解释和编译B)注释语句可以放在代码中的任何位置C)注释语句不能放在续行符的后面D)代码中加入注释语句的目的是提高程序的可读性参考答案:B(8) 设a=2,b

5、=3,c=4,d=5，则表达式Not a=c Or 4*c=b2 And ba+c的值是( )A)-1B)1C)TrueD)False参考答案：D(9) 假定程序中有如下语句：answer=MsgBox(第一个字符串，vbAbortRetryIgnore_Or vbCritical_Or vbDefaultButton3,_第二个字符串)执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为( )A)“第二个字符串”B)5C)3D)7参考答案：B(10) 结构化程序设计三种基本逻辑结构是（ ）A.选择结构、循环结构和嵌套结构 B.顺序结构、选择结构和循环结构C.选择结构、循环结

6、构和模块结构 D.顺序结构、递归结构和循环结构 参考答案：B（11）有如下过程代码：Sub var_dim()Static numa As IntegerDim numb As Integernuma=numa+2numb=numb+1print numa;numbEnd Sub连续3次调用var_dim过程，第3次调用时的输出是A）2 1B）2 3C）6 1D）6 3 参考答案：C（12）设a、b都是自然数，为求a除以b的余数，某人编写了以下函数：Function fun(a As Integer,b As Integer)While aba=a-bWendfun=aEnd Function

7、在调试时发现函数是错误的。为使函数能产生正确的返回值，应做的修改是A）把a=a-b改为a=b-aB）把a=a-b改为a=abC）把While ab改为While ab改为While a=b 参考答案：D（13）为计算1+2+22+23+24+210的值，并把结果显示在文本框Text1中，若编写如下事件过程：Private Sub Command1_Click()Dim a%,s%,k%s=1a=2For k=2 To 10a=a*2s=s+aNext kText1.Text=sEnd Sub执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是A）把s=1改为s=0B）把For k

8、=2 To 10改为For k=1 To 10C）交换语句s=s+a和a=a*2的顺序D）同时进行B）、C）两种修改 参考答案：D（14）设x是整型变量，与函数f(x0,-x,x)有相同结果的代数式是A）|x|B）-|x|C）xD）-x 参考答案：B（15）下面不能在信息框中输出“VB”的是A）MsgBox VBB）x=MsgBox（VB）C）MsgBox（VB）D）Call MsgBox VB 参考答案：D（16）下面是求最大公约数的函数的首部Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer若要输出8、12、16这

9、3个数的最大公约数，下面正确的语句是A）Print gcd(8,12)，gcd(12,16)，gcd(16,8)B）Print gcd(8,12,16)C）Print gcd(8)，gcd(12)，gcd(16)D）Print gcd(8,gcd(12,16) 参考答案：D（17）下面程序计算并输出的是Private Sub Comand1_Click（）a=10s=0Dos=s+a*a*aa=a-1Loop Until a=0 ThenCount（n）=Count（n）+ 1End IfNext km=count（0）For k=1 To 25If mcount（k） Thenm=count

10、（k）End IfNext kPrint mEnd SubA）0B）1C）2D）3 参考答案：D(21) 设a=2,b=3,c=4,d=5，则表达式Not a=c Or 4*c=b2 And ba+c的值是()A)-1B)1C)TrueD)False参考答案：D（22）假定程序中有如下语句：answer=MsgBox(第一个字符串，vbAbortRetryIgnore_Or vbCritical_Or vbDefaultButton3,_第二个字符串)执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为()A)“第二个字符串”B)5C)3D)7参考答案：B（23）与传统的程序

11、设计语言相比，Visual Basic 最突出的特点是()A)结构化程序设计B)程序开发环境C)事件驱动编程机制D)程序调试技术参考答案：C（24）表达式Left(how are you,3)的值是()A)howB)areC)youD)how are you参考答案：A（25）以下说法不正确的是()A)Visual Basic是一种可视化编程工具B)Visual Basic是面向过程的编程语言C)Visual Basic是结构化程序设计语言D)Visual Basic采用事件驱动编程机制参考答案:B（26） 可以实现从键盘输入一个作为双精度变量a的值的语句是 A) a=InputBox() B) a=InputBox(请输入一个值) C) a=Val(Inp