VB程序设计期末考试试题（四）及详细参考答案

VB程序设计期末考试试题（四）及详细参考答案一、单项选择题（共20题，每题2分，共40分）1.在VB中，合法的变量名是（）A.123abcB.abc_123C.abc-123D.Dim2.VB中，表达式Int(-3.6)的值是（）A.-3B.-4C.3D.43.下列不属于VB基本数据类型的是（）A.IntegerB.StringC.BooleanD.Array4.赋值语句正确的是（）A.x+y=10B.x=10+yC.10=x+yD.x+y=x-y5.在VB中，用来声明整型变量的关键字是（）A.SingleB.IntegerC.StringD.Long6.循环语句中，ExitFor的作用是（）A.结束本次循环B.终止整个For循环C.退出程序D.跳转至循环开头7.表达式"123"+"456"的运算结果是（）A.579B."123456"C.123456D.报错8.若a=5，b=2，表达式aModb的值是（）A.0B.1C.2D.39.VB窗体的标题文字由哪个属性设置（）A.NameB.CaptionC.TextD.Title10.条件语句Ifa>bThenmax=aElsemax=b的作用是（）A.求a、b最小值B.求a、b最大值C.交换a、b值D.无意义11.下列运算符优先级最高的是（）A.算术运算符B.关系运算符C.逻辑运算符D.优先级相同12.能实现延时、暂停程序运行的语句是（）A.StopB.PauseC.SleepD.End13.定义数组Dimarr(1To5)AsInteger，该数组包含元素个数为（）A.4B.5C.6D.114.在VB中，Print10>5的输出结果是（）A.TrueB.FalseC.1D.015.函数Len("VB考试")的返回值是（）A.2B.4C.6D.816.下列关于For循环说法正确的是（）A.循环次数固定B.必须嵌套使用C.不能提前退出D.条件不满足也会执行一次17.清空文本框Text1内容的正确语句是（）A.Text1.ClearB.Text1.Text=""C.Text1.ClsD.Text1=Null18.表达式Sqr(16)的值是（）A.4B.8C.256D.-419.逻辑表达式3>2And5<10的结果是（）A.TrueB.FalseC.0D.120.结束整个VB程序运行的语句是（）A.ExitB.ExitSubC.EndD.Stop二、填空题（共10空，每空2分，共20分）1.VB中，单精度浮点型数据的类型关键字是__________。2.表达式5\2的结果是__________，5/2的结果是__________。3.变量声明语句Dims$中，符号$代表__________类型。4.DoLoop循环中，__________语句可以直接跳出循环。5.取字符串左侧3个字符的函数是__________。6.二维数组Dima(2,3)最多可存储__________个数据元素。7.判断变量x是否为偶数的关系表达式是__________。8.VB中，__________事件是窗体加载时自动触发的事件。9.表达式Abs(-9)+Round(3.8)的值是__________。三、程序阅读题（共2题，每题8分，共16分）1.阅读下列程序，写出运行结果PlainText

PrivateSubCommand1_Click()

DimiAsInteger,sAsInteger

s=0

Fori=1To5

s=s+i

Nexti

Prints

EndSub程序运行输出结果：__________2.阅读下列程序，写出运行结果PlainText

PrivateSubCommand2_Click()

DimaAsInteger,bAsInteger,tAsInteger

a=10

b=20

t=a

a=b

b=t

Print"a=";a,"b=";b

EndSub程序运行输出结果：__________四、程序填空题（共6空，每空2分，共12分）1.下列程序功能：计算1到100的所有偶数和，补充完整代码。PlainText

PrivateSubCommand3_Click()

DimiAsInteger,sumAsInteger

sum=0

Fori=2To100Step_______

sum=_______

Nexti

Print"偶数和为：";sum

EndSub2.下列程序功能：判断输入的数字是否为正数，补充完整代码。PlainText

PrivateSubCommand4_Click()

DimxAsSingle

x=Val(InputBox("请输入一个数字"))

If_______Then

Print"该数是正数"

Else

Print"该数不是正数"

_______

EndSub五、编程题（共1题，12分）编写VB程序：输入一个学生的考试分数（0-100），根据分数判定等级。判定规则：90~100分为优秀，80~89分为良好，60~79分为及格，60分以下为不及格。要求使用InputBox输入分数，Print输出对应等级。详细参考答案一、单项选择题（每题2分，共40分）1.B解析：变量名不能以数字开头、不能含特殊符号、不能使用系统关键字。2.B解析：Int函数为向下取整，-3.6向下取整为-4。3.D解析：Array是数组，属于数据结构，不属于基本数据类型。4.B解析：赋值语句左侧必须为变量，不能是表达式或常量。5.B解析：Integer为整型，Single为单精度，String为字符串，Long为长整型。6.B解析：ExitFor终止当前For循环，ExitDo终止Do循环。7.B解析：双引号连接为字符串拼接，结果为新字符串。8.B解析：Mod为取余运算，5除以2商2余1。9.B解析：窗体和标签的标题属性为Caption，文本框显示内容为Text。10.B解析：比较两个数，将较大值赋值给max，实现取最大值功能。11.A解析：运算优先级：算术运算>关系运算>逻辑运算。12.C解析：Sleep语句可暂停程序运行，实现延时效果。13.B解析：数组下标从1到5，共5个元素。14.A解析：10>5为真，布尔值输出True。15.B解析：VB中一个汉字、一个字母均占1个字符长度，“VB考试”共4个字符。16.A解析：For循环通过初值、终值、步长确定固定循环次数。17.B解析：文本框清空需将Text属性赋值为空字符串。18.A解析：Sqr为开平方函数，√16=4。19.A解析：两个条件均成立，And逻辑运算结果为真。20.C解析：End终止整个程序，ExitSub仅退出当前过程。二、填空题（每空2分，共20分）1.Single2.2；2.5解析：\为整除运算，/为普通除法运算。3.字符串（String）4.ExitDo5.Left6.12解析：下标默认从0开始，2行3列，3*4=12个元素。7.xMod2=08.Form_Load9.13解析：Abs(-9)=9，Round(3.8)=4，求和为13。三、程序阅读题（每题8分，共16分）1.运行结果：15解析：循环执行1-5累加，1+2+3+4+5=15。2.运行结果：a=20b=10解析：通过中间变量t，完成a、b两个变量的值交换。四、程序填空题（每空2分，共12分）1.第一空：2第二空：sum+i2.第一空：x>0第二空：EndIf五、编程题（12分）参考答案代码：PlainText

PrivateSubCommand1_Click()

DimscoreAsSingle

'输入学生分数

score=Val(InputBox("请输入学生考试分数（0-100）"))

'判断分数等级

Ifscore>=90Andscore<=100Then

Print"成绩等级：优秀"

ElseIfscore>=80Then

P