大学Visual Basic程序设计期末试题（含详细答案）

大学VisualBasic程序设计期末试题（含详细答案）考试说明：本试卷满分100分，考试时间90分钟，闭卷考试。适用于大学本科、专科VB程序设计公共基础课程。题型分布：选择题（30分）、填空题（20分）、程序阅读题（24分）、编程应用题（26分）一、单项选择题（共15小题，每小题2分，共30分）每题只有一个正确答案，将正确答案序号填在括号内1.VisualBasic的编程机制是（）A.面向过程B.事件驱动C.结构化程序D.模块化程序2.下列不属于VB标准控件的是（）A.文本框B.命令按钮C.对话框D.标签3.在VB中，合法的变量名是（）A.123abcB.abc_123C.abc-123D.Dim4.VB中，表达式Int(3.8)+Fix(-2.1)的值是（）A.1B.2C.0D.-15.若要让命令按钮控件显示文字，需要设置的属性是（）A.NameB.CaptionC.TextD.Value6.VB中，用来声明整型变量的关键字是（）A.SingleB.StringC.IntegerD.Boolean7.循环语句Fori=1To10Step2的循环次数是（）A.10次B.5次C.4次D.6次8.下列运算符优先级最高的是（）A.算术运算符B.关系运算符C.逻辑运算符D.赋值运算符9.文本框控件中，用来设置输入内容是否可见的属性是（）A.EnabledB.VisibleC.PasswordCharD.Locked10.在VB中，结束当前过程运行的语句是（）A.EndB.ExitSubC.StopD.Break11.数组声明语句Dima(1To5)AsInteger，该数组包含的元素个数是（）A.4B.5C.6D.112.能判断变量x是否为偶数的正确表达式是（）A.x/2=0B.xMod2=0C.x%2=0D.x\2=013.VB中Print方法的作用是（）A.打印文档B.在窗体或控件上输出数据C.保存文件D.刷新窗体14.复选框控件的Value属性取值不包括（）A.0B.1C.2D.315.下列关于VB窗体的说法错误的是（）A.窗体是程序的主要载体B.窗体可以隐藏C.窗体运行时不能调整大小D.窗体可以加载和卸载二、填空题（共10空，每空2分，共20分）1.VB工程文件的后缀是________，窗体文件的后缀是________。2.赋值语句a=b+c的功能是将________的值赋给变量a。3.逻辑表达式Not(3>2)的结果是________。4.在VB中，________函数可以获取字符串的长度。5.双重循环中，外层循环执行3次，内层循环执行4次，循环体总共执行________次。6.单选按钮控件的核心属性是________，用于判断是否被选中。7.语句DimsAsString定义的变量s，默认初始值为________。8.退出For循环的语句是________。三、程序阅读题（共3小题，每小题8分，共24分）写出下列程序段的运行结果，需写明简要推导过程1.分支程序PlainText

PrivateSubCommand1_Click()

DimxAsInteger,yAsInteger

x=6

Ifx>5Then

y=x*2

Else

y=x+2

EndIf

Printy

EndSub2.单层循环程序PlainText

PrivateSubCommand1_Click()

DimiAsInteger,sAsInteger

s=0

Fori=1To5

s=s+i

Nexti

Print"s=";s

EndSub3.数组运算程序PlainText

PrivateSubCommand1_Click()

Dima(1To3)AsInteger

DimiAsInteger,tAsInteger

a(1)=2

a(2)=4

a(3)=6

t=a(1)

a(1)=a(3)

a(3)=t

Printa(1);a(2);a(3)

EndSub四、编程应用题（共2小题，第1题12分，第2题14分，共26分）1.基础编程题（12分）编写VB程序，实现功能：在文本框中输入一个整数，点击命令按钮后，判断该数是正数、负数还是零，并在窗体上输出判断结果。要求：界面包含1个文本框、1个命令按钮，代码简洁规范，逻辑完整。2.进阶编程题（14分）编写VB程序，利用循环语句计算1+3+5+……+99的奇数和，将最终结果输出在窗体上。要求：使用For循环实现，代码注释清晰，结果准确。参考答案及详细解析一、单项选择题答案及解析1.B解析：VB是典型的事件驱动型编程语言，程序运行依靠鼠标点击、按键等事件触发代码执行，区别于面向过程的顺序执行机制。2.C解析：文本框、命令按钮、标签均为VB内置标准控件，对话框属于通用对话框控件，属于ActiveX控件，需要手动添加部件。3.B解析：VB变量名必须以字母开头，不能以数字、符号开头，不能包含连字符，不能使用系统关键字。A以数字开头、C含连字符、D为关键字，均不合法。4.A解析：Int()函数向下取整，Int(3.8)=3；Fix()函数直接舍去小数，Fix(-2.1)=-2；计算3+(-2)=1。5.B解析：命令按钮通过Caption属性设置显示文本，Text属性适用于文本框、标签等控件，Name为控件名称属性。6.C解析：Integer为整型，Single为单精度浮点型，String为字符串型，Boolean为布尔型。7.B解析：初值1、终值10、步长2，循环取值1、3、5、7、9，共计5次。8.A解析：运算符优先级：算术运算符>关系运算符>逻辑运算符>赋值运算符。9.C解析：PasswordChar属性可设置文本框输入掩码，实现密码隐藏效果；Visible控制控件显示隐藏，Enabled控制控件是否可用。10.B解析：ExitSub用于终止当前过程，End用于结束整个程序运行，Stop为暂停程序。11.B解析：数组下标范围1-5，包含a(1)、a(2)、a(3)、a(4)、a(5)共5个元素。12.B解析：Mod为VB取余运算符，偶数对2取余结果为0；VB无%取余符号，/为浮点除法，\为整数除法。13.B解析：Print是VB核心输出方法，用于在窗体、图片框等控件上输出文本或数值数据。14.D解析：复选框Value属性取值：0（未选中）、1（选中）、2（灰色不可用），无3值。15.C解析：窗体可通过BorderStyle、Resize属性设置运行时是否可调整大小，默认状态下可调整。二、填空题答案及解析1..vbp、.frm解析：vbp为工程文件，保存整个项目配置；frm为窗体文件，保存窗体界面和代码。2.b+c运算结果解析：赋值语句先计算右侧表达式，再将结果赋值给左侧变量。3.False解析：3>2结果为True，Not逻辑取反，最终结果为False。4.Len()解析：Len函数专门用于计算字符串的字符个数。5.12解析：循环总次数=外层次数×内层次数=3×4=12。6.Value解析：单选按钮Value为True表示选中，False表示未选中。7.空字符串（""）解析：字符串变量默认初始值为空，数值变量默认初始值为0。8.ExitFor解析：ExitFor语句可强制终止当前For循环，跳出循环体执行后续代码。三、程序阅读题答案及解析1.运行结果：12解析：变量x赋值为6，满足x>5的条件，执行y=x*2=6×2=12，最终输出y的值为12。2.运行结果：s=15解析：初始化s=0，循环累加1-5所有整数，s=0+1+2+3+4+5=15，循环结束后输出结果。3.运行结果：642解析：程序实现数组首尾元素交换，初始数组a(1)=2、a(2)=4、a(3)=6；通过临时变量t交换a(1)和a(3)的值，交换后数组元素为6、4、2，依次输出。四、编程应用题参考答案1.正数负数判断程序（完整代码）界面设置：添加TextBox控件（名称默认Text1）、CommandButton控件（名称默认Command1，Caption属性设为“判断数值”）PlainText

PrivateSubCommand1_Click()

DimnumAsInteger

'获取文本框输入的数值

num=Val(Text1.Text)

'分支判断数值类型

Ifnum>0Then

Print"该数为正数"

ElseIfnum<0Then

Print"该数为负数"

Else

Print"该数为零"

EndIf

EndSub代码说明：Val函数将文本框字符串转为数值，通过多分支If语句完成正负、零的判断，结果直接打印在窗体上。2.1-99奇数求和程序（完整代码）PlainText

PrivateSubCommand1_Click()

DimiAsInteger,sumAsLong

'初始化求和变量

sum=0

'步长为2，遍历1-99所有奇数

Fori=1To99Step2

sum=sum+i