VB程序设计基础试题（含详细答案解析）

VB程序设计基础试题（含详细答案解析）考试时长：90分钟满分：100分一、单项选择题（每题2分，共30分）1.在VB中，合法的变量名是（）A.123abcB.abc_123C.abc-123D.dim2.VB中，用来定义整型变量的关键字是（）A.SingleB.IntegerC.StringD.Boolean3.表达式5Mod2的运算结果是（）A.0B.1C.2D.34.下列不属于VB标准控件的是（）A.文本框B.命令按钮C.图片框D.树形控件5.赋值语句的正确格式是（）A.x+1=5B.5=xC.x=5+1D.x==56.VB中，字符串常量的定界符是（）A.单引号B.双引号C.括号D.书名号7.条件语句If...Then...EndIf中，EndIf的作用是（）A.结束程序B.结束当前条件结构C.结束循环D.无作用8.表达式Len("VB考试")的值是（）A.2B.3C.4D.59.在VB循环结构中，For...Next语句的循环变量（）A.自动递增B.手动递增C.自动递减D.固定不变10.命令按钮的单击事件过程名是（）A.Command1_LoadB.Command1_ClickC.Form_ClickD.Text1_Change11.能实现将数值转换为字符串的函数是（）A.Val()B.Str()C.Len()D.Mid()12.下列逻辑表达式中，结果为True的是（）A.3>5B.2<=1C.4>2And3<5D.5=313.VB窗体的标题文字由哪个属性控制（）A.NameB.CaptionC.TextD.Value14.Do...Loop循环语句中，ExitDo的作用是（）A.结束整个程序B.退出当前循环C.暂停循环D.重新循环15.定义数组Dima(1To5)，该数组包含的元素个数是（）A.3B.4C.5D.6二、填空题（每空2分，共20分）1.VB中，布尔型数据的取值只有_________和_________两种。2.表达式Int(3.8)的结果是_________，Int(-2.3)的结果是_________。3.分支结构主要分为单分支、_________和多分支三种类型。4.文本框控件中，用于显示和接收文本内容的属性是_________。5.循环语句中，_________语句可以直接结束本次循环，进入下一次循环。6.定义静态变量需要使用_________关键字。7.表达式Right("abcdef",3)的返回值是_________。三、程序阅读题（每题5分，共20分）写出下列程序段的运行结果1.PlainText

DimxAsInteger

x=10

x=x+5

Printx2.PlainText

DimaAsInteger,bAsInteger

a=6

b=4

Ifa>bThen

Print"a大于b"

Else

Print"b大于a"

EndIf3.PlainText

DimsAsInteger,iAsInteger

s=0

Fori=1To3

s=s+i

Nexti

Prints4.PlainText

DimstrAsString

str="VB编程"

PrintMid(str,2,2)四、编程应用题（每题15分，共30分）1.编写VB程序，实现输入一个整数，判断该数是奇数还是偶数，并在窗体上输出判断结果。2.编写VB程序，利用For循环计算1~100之间所有偶数的和，并输出最终结果。参考答案及详细解析一、单项选择题答案及解析1.B解析：VB变量名命名规则：不能以数字开头、不能包含特殊符号（-、*等）、不能使用系统关键字。A以数字开头，C含连字符，D是系统关键字，均不合法。2.B解析：Integer为整型；Single为单精度浮点型；String为字符串型；Boolean为布尔型。3.B解析：Mod是取余运算，5除以2商2余1，运算结果为1。4.D解析：文本框、命令按钮、图片框均为VB自带标准控件，树形控件属于扩展控件，需要额外添加。5.C解析：VB赋值语句规则：左侧必须是变量，右侧是表达式或常量，不能使用==赋值。6.B解析：VB中所有字符串常量必须用双引号作为定界符。7.B解析：EndIf是条件语句的结束标识，用于闭合If条件结构，区分代码层级。8.A解析：Len函数统计字符串字符个数，中文、英文均算1个字符，“VB考试”共2个字符。9.A解析：For...Next循环默认循环变量自动递增，步长默认为1，可通过Step修改步长。10.B解析：控件事件命名规则：控件名_事件名，单击事件为Click，加载事件为Load。11.B解析：Str()数值转字符串；Val()字符串转数值；Len()统计字符长度；Mid()截取字符串。12.C解析：And为逻辑与运算，两边表达式均为真结果才为真，4>2和3<5均成立，结果为True。13.B解析：窗体和命令按钮的显示标题由Caption属性控制；文本框内容由Text属性控制。14.B解析：ExitDo专门用于退出Do循环，结束当前循环结构，继续执行循环后的代码。15.C解析：数组定义范围为1到5，包含1、2、3、4、5共5个元素。二、填空题答案及解析1.True、False解析：布尔型数据仅有真、假两个取值，是逻辑运算的基础数据类型。2.3、-3解析：Int函数为向下取整，无论正负，均取不大于原数的最大整数。3.双分支解析：VB分支结构包含单分支（If...Then）、双分支（If...Then...Else）、多分支（SelectCase）。4.Text解析：文本框的Text属性是核心属性，用于输入、显示文本内容。5.Continue（部分版本为ContinueFor）解析：该语句作用为终止本次循环，跳过后续代码，直接进入下一次循环迭代。6.Static解析：Dim定义动态变量，过程结束变量释放；Static定义静态变量，过程结束值保留。7.def解析：Right(字符串,n)函数从字符串右侧截取n个字符，"abcdef"右侧3个字符为def。三、程序阅读题答案及解析1.运行结果：15解析：先定义整型变量x并赋值10，执行赋值语句x=x+5，即x=10+5=15，最后打印x的值。2.运行结果：a大于b解析：变量a=6、b=4，判断条件a>b成立，执行Then后的输出语句。3.运行结果：6解析：初始s=0，循环执行3次：i=1时s=1；i=2时s=3；i=3时s=6，循环结束输出结果。4.运行结果：B编解析：Mid(字符串,起始位置,长度)，从第2位开始截取2个字符，"VB编程"第2位为B，截取两位为“B编”。四、编程应用题参考答案（完整代码+解析）1.判断奇偶数程序【解题思路】通过InputBox接收用户输入整数，利用Mod取余运算判断，能被2整除为偶数，否则为奇数。PlainText

PrivateSubForm_Click()

DimnAsInteger

'接收用户输入数据

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

'判断奇偶数

IfnMod2=0Then

Printn&"是偶数"

Else

Printn&"是奇数"

EndIf

EndSub【代码解析】定义整型变量存储数值，InputBox获取的是字符串，需用Val转换为数值；通过对2取余结果判断奇偶，最终窗体打印结果。2.1~100偶数求和程序【解题思路】定义累加变量，遍历1到100所有整数，筛选出偶数并累加，最后输出总和。PlainText

PrivateSubForm_Click()

DimiAsInteger,sumAsInteger

sum=0'初始化累加和为0

'循环遍历1-100所有数字

Fori=1To100

'筛选偶数