2026年普通高中信息技术学业水平考试VB程序设计试题（含详细答案）

2026年普通高中信息技术学业水平考试VB程序设计试题（含详细答案）考试说明：1.本试卷满分100分，考试时间60分钟；2.试题基于VB6.0环境命题，适配高中信息技术课标要求；3.所有程序代码均经过环境验证，答案标准规范。一、单项选择题（共20小题，每小题2分，共40分）每小题只有一个正确答案，请将正确选项填在对应答题卡位置1.下列选项中，属于VB合法变量名的是（）A.3sumB.sum_1C.sum-1D.sum@12.VB中，用于定义整型变量的关键字是（）A.SingleB.IntegerC.StringD.Boolean3.表达式5Mod2+5\2的运算结果是（）A.3B.4C.5D.24.下列VB运算符中，优先级最高的是（）A.+B.ModC.*D.=5.若a=3，b=5，执行语句a=b:b=a后，a、b的值分别为（）A.3、5B.5、3C.5、5D.3、36.VB中，能够弹出输入对话框的函数是（）A.MsgBoxB.InputBoxC.PrintD.Show7.字符串表达式"abc"+"123"的结果是（）A.abc123B.abc123C.报错D.123abc8.下列属于VB逻辑表达式的是（）A.a+5B.a>bC."123"D.3*69.循环语句Fori=1To10Step2的循环执行次数是（）A.10次B.5次C.6次D.9次10.VB中，结束当前过程运行的语句是（）A.EndB.ExitSubC.StopD.Break11.若x=10，执行语句Ifx>5Theny=1Elsey=2后，y的值为（）A.1B.2C.5D.1012.函数Len("高中VB考试")的返回值是（）A.4B.5C.6D.713.VB中，数组定义语句Dima(1To5)AsInteger定义的数组元素个数是（）A.1B.5C.4D.614.下列语句中，能够在窗体上输出内容的是（）A.Text1.Text=""B.Print"测试"C.Label1.Caption=""D.Command1.Click15.表达式Int(3.8)+Round(2.3)的结果是（）A.5B.6C.7D.416.VB中，布尔型变量的取值范围是（）A.0和1B.True和FalseC.任意整数D.任意字符串17.执行语句s=0:Fori=1To3:s=s+i:Nexti后，s的值为（）A.3B.6C.9D.118.下列关于VB选择结构的说法正确的是（）A.If语句必须搭配Else使用B.选择结构可以嵌套使用C.选择结构只能判断数值大小D.选择结构不能嵌套循环结构19.函数Val("123abc")的返回值是（）A.123B.0C.123abcD.报错20.VB程序的基本结构不包括（）A.顺序结构B.选择结构C.循环结构D.跳转结构二、填空题（共5小题，每小题3分，共15分）请将正确答案填写在横线处，严格按照VB语法规范书写21.VB中，定义字符串类型变量的关键字是________。22.表达式10/4的结果是________，表达式10\4的结果是________。23.执行For循环时，若步长为负数，循环初值必须________终值才能执行循环。24.判断变量a是否为偶数的VB表达式是________。25.数组Dimb(3To7)中，最大下标是________，最小下标是________。三、程序阅读题（共3小题，第26题7分，27、28题各8分，共23分）阅读完整程序代码，写出程序运行的最终输出结果26.阅读程序，写出输出结果vb

PrivateSubForm_Click()

DimaAsInteger,bAsInteger,cAsInteger

a=6

b=4

c=aModb+a\b

Printc

EndSub27.阅读程序，写出输出结果vb

PrivateSubForm_Click()

DimsAsInteger,iAsInteger

s=0

Fori=1To5

IfiMod2=1Then

s=s+i

EndIf

Nexti

Prints

EndSub28.阅读程序，写出输出结果vb

PrivateSubForm_Click()

DimxAsInteger,yAsInteger

x=8

Ifx>10Then

y=x*2

ElseIfx>5Then

y=x+2

Else

y=x-2

EndIf

Print"y=";y

EndSub四、程序编程题（共2小题，第29题10分，第30题12分，共22分）根据题目要求，编写完整可运行的VB事件过程代码29.基础编程题（10分）编写窗体单击事件程序，实现功能：输入一个整数，判断该数是否为正数，若是则输出“正数”，否则输出“非正数”。30.进阶编程题（12分）编写窗体单击事件程序，实现功能：计算1~20之间所有能被3整除的整数的累加和，并在窗体上输出最终结果。2026年VB程序设计试题详细参考答案及解析一、单项选择题答案及解析1.B解析：VB变量名命名规则：以字母开头，由字母、数字、下划线组成，不能以数字开头，不能包含特殊符号（-、@等）。A以数字开头，C、D含非法符号，均不合法。2.B解析：Integer为整型；Single为单精度浮点型；String为字符串型；Boolean为布尔型。3.A解析：Mod为取余运算，5Mod2=1；\为整数除法，5\2=2；两者相加1+2=3。4.C解析：VB运算符优先级：算术运算符（*、/）>整除\>取余Mod>加减+、->关系运算符=>逻辑运算符。5.C解析：程序顺序执行，先执行a=b，此时a=5、b=5；再执行b=a，b仍为5，最终两者均为5。6.B解析：InputBox为输入对话框函数；MsgBox为弹出提示框；Print为输出语句；Show为窗体显示方法。7.A解析：字符串连接符“+”可拼接两个字符串，结果为连续的新字符串，即abc123。8.B解析：逻辑表达式的运算结果为True或False，a>b为关系逻辑表达式；其余选项均为算术表达式或常量。9.B解析：初值1，终值10，步长2，取值为1、3、5、7、9，共5次循环。10.B解析：ExitSub用于结束当前子过程；End结束整个程序；Stop为暂停程序。11.A解析：x=10满足x>5的条件，执行y=1，不执行Else分支。12.C解析：Len函数统计字符串字符个数，中文、英文均计为1个字符，“高中VB考试”共6个字符。13.B解析：数组下标范围1-5，包含1、2、3、4、5，共5个元素。14.B解析：Print语句直接在窗体输出文本；其余语句为修改控件属性，不属于窗体直接输出。15.A解析：Int为向下取整，Int(3.8)=3；Round为四舍五入，Round(2.3)=2；相加得5。16.B解析：VB布尔型（Boolean）只有两个取值：True（真）、False（假）。17.B解析：循环累加1+2+3=6，最终s值为6。18.B解析：If语句可单独使用无Else；选择结构可嵌套多层选择、循环结构；可判断数值、字符串等多种条件。19.A解析：Val函数会提取字符串开头的数字部分，自动忽略后续非数字字符，结果为123。20.D解析：VB程序三大基本结构为：顺序结构、选择结构、循环结构，无跳转结构。二、填空题答案及解析21.String解析：String为VB字符串类型定义关键字，用于存储文本字符。22.2.5、2解析：/为普通除法，结果保留小数；\为整数除法，直接舍去小数部分。23.小于解析：步长为负时，变量需要递减，初值小于终值才能完成循环迭代。24.aMod2=0解析：偶数对2取余结果为0，是判断偶数的标准表达式。25.7、3解析：数组定义格式Dim数组名(最小下标To最大下标)，可直接确定上下限值。三、程序阅读题答案及解析26.输出结果：3解析：a=6，b=4；6Mod4=2，6\4=1；c=2+1=3，最终打印输出3。27.输出结果：9解析：循环遍历1-5，筛选奇数（1、3、5）累加，s=1+3+5=9。28.输出结果：y=10解析：x=8，不满足x>10，满足x>5，执行y=8+2=10，输出y=10。四、程序编程题参考答案（标准可运行代码）29.参考答案代码vb

PrivateSubForm_Click()

DimnAsInteger

'输入整数

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

'判断正负

Ifn>0Then

Print"正数"

Else

Print"非正数"

EndIf

EndSub评分标准：定义变量（2分）、输入语句正确（2分）、判断条件正确（3分）、输出结果正确（2分）、语法规范（1分）30.参考答案代码vb

PrivateSubForm_Click()

DimsAsInteger,iAsInteger

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

'遍历1-20所有整数

Fori=1To20

'判断是否能被3整除

IfiMod3=0Then

s=s+i