Visual Basic 期末考试试题（含详细答案）

VisualBasic期末考试试题（含详细答案）考试说明：本试卷满分100分，考试时间90分钟，闭卷考试。试题涵盖VB基础语法、控件使用、流程控制、数组、过程函数等核心知识点，题型规范，适配日常期末考核、等级测试练习。一、单项选择题（每题2分，共30分）1.VisualBasic的编程机制是（）A.面向过程B.面向对象、事件驱动C.机器指令驱动D.结构化流程驱动2.下列选项中，属于VB合法变量名的是（）A.123abcB.abc_123C.abc-123D.Dim3.VB中，用来定义整型变量的关键字是（）A.SingleB.IntegerC.StringD.Boolean4.表达式5Mod2的运算结果是（）A.0B.1C.2D.35.若要让文本框控件禁止用户输入内容，应设置的属性是（）A.VisibleB.EnabledC.LockedD.ReadOnly6.VB中循环语句Fori=1To10Step2的循环次数是（）A.5次B.9次C.10次D.11次7.下列运算符中，优先级最高的是（）A.+B.ModC.*D.>8.用来结束当前For循环，直接跳出循环结构的语句是（）A.ExitSubB.ExitForC.EndForD.Stop9.字符串表达式"123"+"456"的结果是（）A.579B."123456"C.123456D.报错10.标签控件中，用来设置显示文本内容的属性是（）A.TextB.CaptionC.ValueD.Name11.VB中自定义函数的结束语句是（）A.EndSubB.EndFunctionC.ExitFunctionD.StopFunction12.能够产生0~100之间（包含0和100）随机整数的表达式是（）A.Int(Rnd*100)B.Int(Rnd*101)C.Rnd*100D.Int(Rnd+100)13.下列不属于VB流程控制结构的是（）A.顺序结构B.选择结构C.跳转结构D.循环结构14.定义数组Dima(5)后，该数组包含的元素个数是（）A.5B.6C.4D.不确定15.单击窗体触发的事件是（）A.Form_LoadB.Form_ClickC.Form_DblClickD.Form_KeyPress二、填空题（每空2分，共20分）1.VB中布尔型数据的两个取值是_________和_________。2.赋值语句的基本格式是：_________。3.选择结构中，多分支判断使用的语句是_________。4.清空文本框所有内容的语句是Text1._________=""。5.表达式Len("VisualBasic")的结果是_________。6.子程序过程以_________开头，自定义函数以_________开头。7.强制退出子程序过程的语句是_________。8.双击窗体打开的是_________窗口，用于编写程序代码。三、程序阅读题（每题5分，共20分）写出下列程序段的运行结果1.PlainText

PrivateSubCommand1_Click()

DimaAsInteger,bAsInteger

a=10

b=20

Ifa>bThen

Printa

Else

Printb

EndIf

EndSub运行结果：_________2.PlainText

PrivateSubCommand1_Click()

DimsAsInteger,iAsInteger

s=0

Fori=1To5

s=s+i

Nexti

Prints

EndSub运行结果：_________3.PlainText

PrivateSubCommand1_Click()

DimstrAsString

str="考试加油"

PrintRight(str,2)

EndSub运行结果：_________4.PlainText

PrivateSubCommand1_Click()

Dima(3)AsInteger

a(0)=1

a(1)=3

a(2)=5

a(3)=7

Printa(2)+a(3)

EndSub运行结果：_________四、编程应用题（每题15分，共30分）1.编写VB程序，实现功能：单击命令按钮，输入一个正整数，判断该数是否为偶数，在窗体上输出判断结果。2.编写VB程序，利用循环语句计算1~100所有偶数的累加和，并在窗体上输出最终结果。参考答案及详细解析一、单项选择题答案及解析1.B解析：VB是典型的面向对象、事件驱动的可视化编程语言，依靠鼠标点击、按键等事件触发代码执行。2.B解析：VB变量名必须以字母开头，不能以数字开头、不能包含特殊符号（-）、不能使用系统关键字，Dim是关键字，不可作为变量名。3.B解析：Integer为整型，Single为单精度浮点型，String为字符串型，Boolean为布尔型。4.B解析：Mod是取余运算，5除以2商2余1，结果为1。5.C解析：Locked属性设为True时，文本框锁定，无法手动输入修改，仅可展示内容；Enabled为False是控件禁用、变灰。6.A解析：初始i=1，依次为1、3、5、7、9，共循环5次。7.C解析：算术运算符优先级：乘除（*、/）>取余（Mod）>加减（+、-），关系运算符优先级最低。8.B解析：ExitFor强制跳出For循环；ExitSub退出子程序；Stop为暂停程序。9.B解析：双引号连接为字符串拼接，"123"+"456"拼接为新字符串"123456"。10.B解析：标签（Label）显示文本用Caption属性，文本框（TextBox）用Text属性。11.B解析：自定义函数以Function开头，EndFunction结尾；子程序以Sub开头，EndSub结尾。12.B解析：Rnd生成[0,1)随机小数，Int(Rnd*101)可生成0~100的整数。13.C解析：VB标准程序结构为顺序、选择、循环三种，无跳转结构分类。14.B解析：默认数组下标从0开始，Dima(5)包含a(0)~a(5)共6个元素。15.B解析：Form_Click为窗体单击事件，Form_Load为窗体加载事件，Form_DblClick为双击事件。二、填空题答案1.True、False2.变量=表达式（或常量/变量）3.SelectCase4.Text5.106.Sub、Function7.ExitSub8.代码三、程序阅读题答案及解析1.20解析：a=10，b=20，条件a>b不成立，执行Else语句，输出b的值20。2.15解析：循环累加1+2+3+4+5，总和为15。3.加油解析：Right函数截取字符串右侧2个字符，原字符串后两位为“加油”。4.12解析：a(2)=5，a(3)=7，两者相加结果为12。四、编程应用题参考答案（完整可运行代码）1.判断偶数程序PlainText

PrivateSubCommand1_Click()

DimnAsInteger

'输入正整数

n=Val(InputBox("请输入一个正整数"))

'判断是否为偶数

IfnMod2=0Then

Printn&"是偶数"

Else

Printn&"不是偶数"

EndIf

EndSub代码解析：通过InputBox获取用户输入，Val函数转换为数值，利用Mod取余运算，余数为0即为偶数，窗体打印输出结果。2.1~100偶数累加和程序PlainText

PrivateSubCommand1_Click()

DimiAsInteger,sumAsLong

sum=0

'遍历1到100所有数字

Fori=1To100