2025年计算机二级考试VB冲刺试题及答案(三)

2025年计算机二级考试VB冲刺试题及答案(三)一、选择题（每小题1分，共20分）1.下列语句中，定义变长字符串变量的是（）A)DimsAsStringB)DimsAsString*10C)DimsAsString(10)D)DimsAsVariant答案：A解析：VisualBasic中字符串类型分为定长字符串和变长字符串，直接声明为String类型的变量是变长字符串，长度可以随存储内容变化；使用String*N格式声明的是长度固定为N的定长字符串；String(10)声明的是包含11个元素的一维字符串数组；Variant是变体类型，可以存储任意类型数据，因此本题选A。2.当一个VB工程启动运行，程序加载主窗体时，首先触发的窗体事件是（）A)Click事件B)Load事件C)Activate事件D)Initialize事件答案：D解析：VB中对象创建的事件触发顺序为：首先触发Initialize事件完成对象初始化，之后触发Load事件将窗体加载到内存，窗体显示后触发Activate事件成为活动窗体，用户点击窗体时触发Click事件，关闭窗体前触发Unload事件，因此最先触发的是Initialize事件，本题选D。3.在VB中，仅能在声明它的过程中被访问的变量类型是（）A)局部变量B)模块级变量C)全局变量D)静态模块变量答案：A解析：变量按作用域划分，局部变量是在过程内部声明的变量，仅能被本过程访问，过程调用结束后局部变量（除静态局部变量）会被释放；模块级变量是在模块的通用声明段使用Dim或Private声明的变量，可以被本模块内所有过程访问；全局变量是在标准模块中使用Public声明的变量，可以被整个工程的所有过程访问，因此本题选A。4.语句Dima(3,-2To2)AsInteger定义的数组中，包含的数组元素总个数是（）A)20B)12C)15D)24答案：A解析：VB数组默认下界为0，数组元素个数计算公式为每一维元素个数的乘积，其中每一维元素个数=（上界-下界+1）。本题中第一维下标范围是0~3，元素个数为3-0+1=4；第二维下标范围是-2~2，元素个数为2-(-2)+1=5，总元素个数为4×5=20，因此本题选A。5.若要将命令按钮设置为不可用状态（显示为灰色，无法点击），需要修改的属性是（）A)VisibleB)EnabledC)CancelD)Default答案：B解析：Visible属性用于控制控件是否可见，设置为False后控件会隐藏不显示；Enabled属性用于控制控件是否可用，设置为False后控件显示为灰色，无法响应用户操作；Cancel属性用于设置按钮是否为窗体的取消按钮，按下Esc键等价于点击该按钮；Default属性用于设置按钮是否为窗体的默认按钮，按下回车键等价于点击该按钮，因此本题选B。6.有如下VB循环语句：Fori=1To3Step0PrintiNexti执行该循环语句后，输出结果是（）A)依次输出123，程序正常结束B)无任何输出，程序正常结束C)死循环，一直输出1D)编译报错，无法运行答案：C解析：For循环的执行逻辑为：每次循环后循环变量增加步长值，然后判断循环变量是否超过终值，若超过则退出循环，否则继续执行。本题中步长为0，循环变量i的值永远为初始值1，永远不会超过终值3，因此循环会一直执行，持续输出1，陷入死循环，因此本题选C。7.VB中过程参数默认的传递方式是（）A)按值传递B)按地址传递C)按名称传递D)按数组传递答案：B解析：VB中参数传递有两种方式：按值传递和按地址传递，使用ByVal关键字声明的参数是按值传递，形参的改变不会影响实参；使用ByRef关键字声明的参数是按地址传递，形参的改变会同步反映到实参。如果声明参数时省略传递方式关键字，默认是按地址传递（ByRef），因此本题选B。8.下列关于VB中随机文件的描述，正确的是（）A)随机文件每个记录的长度必须相同B)随机文件只能按顺序读写C)随机文件不能实现随机访问D)随机文件就是二进制文件，存储方式完全相同答案：A解析：随机文件是按记录存储的文件类型，每个记录有固定的长度，每个记录都有唯一的编号，可以根据记录号直接访问任意位置的记录，支持随机读写；二进制文件没有固定长度要求，不需要按记录存储，可以对文件任意位置的字节数据进行读写，和随机文件存储方式不同，因此本题选A。9.在VB的菜单编辑器中，下列说法正确的是（）A)菜单项的名称不可以为空B)菜单项不可以设置为不可见C)一个分隔线菜单项不需要设置名称D)顶级菜单不可以设置快捷键答案：A解析：VB中所有菜单项都必须设置唯一的名称标识，即使是分隔线类型的菜单项也需要设置名称；可以通过修改菜单项的Visible属性，将菜单项设置为不可见，实现动态菜单的效果；顶级菜单也可以设置对应的快捷键，因此只有A选项的描述正确，本题选A。10.表达式Mid("VisualBasic",6,3)的运算结果是（）A)"ual"B)"sua"C)"lBa"D)"ala"答案：C解析：VB中Mid函数的格式为Mid(字符串,起始位置,截取长度)，其中起始位置从1开始计数。原字符串"VisualBasic"各位依次为：1:V、2:i、3:s、4:u、5:a、6:l、7:B、8:a、9:s、10:i、11:c，因此从第6位开始截取3个字符，结果为l、B、a，即"lBa"，本题选C。11.若要清除列表框控件中的所有列表项，正确的语句是（）A)List1.ClearB)List1.RemoveItemC)List1.ClearAllD)List1.Remove答案：A解析：VB列表框控件的Clear方法用于清空所有列表项；RemoveItem方法需要指定索引参数，用于删除指定位置的单个列表项，没有参数时调用会报错；ClearAll不是列表框的方法，因此本题选A。12.执行语句s=Int(-12.4)后，变量s的值是（）A)-12B)-13C)12D)13答案：B解析：Int函数的功能是返回不大于参数的最大整数，不大于-12.4的最大整数是-13，若参数为12.4，Int函数返回12，因此本题选B。13.下列关于Static关键字声明局部变量的描述，正确的是（）A)Static声明的局部变量在过程结束后不释放内存，下次调用过程会保留原有值B)Static声明的变量只能在标准模块中声明C)Static声明的变量作用域是整个工程D)Static声明的局部变量和Dim声明的局部变量完全相同答案：A解析：Static用于声明静态局部变量，和Dim声明的普通局部变量不同，过程调用结束后，静态局部变量不会被释放，值会保留到下次调用；静态局部变量作用域仍然是声明它的过程，和普通局部变量作用域一致，只是生命周期不同，因此只有A选项描述正确，本题选A。14.下列关于VB中图片框（PictureBox）和图像框（Image）的描述，正确的是（）A)图片框可以通过AutoSize属性自动调整图片大小适应控件大小B)图像框可以通过Stretch属性调整图片大小适应控件大小C)图像框可以作为容器放置其他控件，图片框不可以D)图片框只能显示图片，不能使用绘图方法绘制图形答案：B解析：图片框是容器控件，可以放置其他控件，支持Circle、Line等绘图方法，其AutoSize属性的作用是自动调整图片框控件的大小来适应图片大小；图像框不是容器控件，不能放置其他控件，其Stretch属性设为True时，会自动调整图片的大小来适应图像框控件的大小，因此B选项描述正确，本题选B。15.下列关于VB字符串运算的描述中，运算结果正确的是（）A)"12"+34="1234"B)"12"&34=46C)"AB"+12运行时会报错D)"ABC"&"123"="ABC123"（中间带空格）答案：C解析：VB中+运算符的规则是：如果两个操作数都是数值，执行加法运算；如果一个是数字格式字符串，一个是数值，会自动转换为数值执行加法；如果一个是普通非数字字符串，一个是数值，就会抛出类型不匹配错误。&运算符强制将两个操作数转换为字符串后连接，不会添加额外空格。因此A选项"12"+34的结果是46，A错误；B选项"12"&34的结果是"1234"，B错误；D选项"ABC"&"123"结果是"ABC123"，没有空格，D错误；C选项"AB"+12会报错，描述正确，本题选C。16.使用通用对话框控件时，若要弹出打开文件对话框，需要调用的方法是（）A)ShowOpenB)ShowSaveC)ShowColorD)ShowFont答案：A解析：通用对话框控件的常用方法包括：ShowOpen方法弹出“打开”对话框，ShowSave方法弹出“另存为”对话框，ShowColor方法弹出“颜色”对话框，ShowFont方法弹出“字体”对话框，因此本题选A。17.设有如下程序段：x=10DoWhilex>=0Printxx=x-2Loop该循环总共执行的次数是（）A)5B)6C)10D)死循环答案：B解析：循环执行过程中，x的值依次为10、8、6、4、2、0，共执行6次循环，执行完第6次后x变为-2，判断x>=0条件不成立，退出循环，因此总共执行6次，本题选B。18.下列数组声明语句中，正确的是（）A)n=10:Dima(n)AsIntegerB)Dima(10)AsInteger:n=10:ReDima(n)AsIntegerC)Dima()AsInteger:n=10:ReDima(n)AsIntegerD)Dima()AsInteger:n=10:Dima(n)AsInteger答案：C解析：VB中动态数组的声明规则为：首先在过程或模块中声明数组，不指定大小（即写空括号），之后使用ReDim语句根据变量重新指定数组大小。静态数组声明后不能使用ReDim再次修改大小，不能重复声明同一个数组，只有C选项符合语法规则，因此本题选C。19.按下大写字母A键（未按下Shift键，输入法为英文状态），KeyPress事件中KeyAscii参数的值是（）A)65B)97C)1D)0答案：A解析：KeyPress事件的KeyAscii参数返回按键对应的ASCII码值，大写字母A的ASCII码为65，小写字母a的ASCII码为97，因此本题选A。20.执行语句Open"C:\data.txt"ForRandomAs#1，该语句打开随机文件时，如果不指定记录长度，默认的记录长度是（）A)128字节B)256字节C)512字节D)1024字节答案：A解析：VB中打开随机文件时，如果不指定记录长度，默认的记录长度是128字节，因此本题选A。二、基本操作题（共2小题，每题15分，总计30分）1.在窗体Form1上绘制一个名称为Text1的文本框，一个名称为Command1的命令按钮，命令按钮标题为“计算”。要求编写Command1的Click事件过程，实现功能：单击按钮时，计算1到100之间所有能被3整除的整数的和，并将计算结果显示在Text1中，要求不得使用循环和变量，直接输出结果。解答：操作步骤：①打开VB，新建一个标准EXE工程，在默认窗体Form1上添加一个文本框控件，修改其Name属性为Text1；再添加一个命令按钮控件，修改Name属性为Command1，修改Caption属性为“计算”。②双击命令按钮，进入代码编辑窗口，编写Click事件代码：PrivateSubCommand1_Click()Text1.Text=3+6+9+12+15+18+21+24+27+30+33+36+39+42+45+48+51+54+57+60+63+66+69+72+75+78+81+84+87+90+93+96+99EndSub③计算验证，所有能被3整除的数累加和为1683，结果正确。保存工程，将窗体文件命名为sjt1.frm，工程文件命名为sjt1.vbp，保存到考生文件夹。考点解析：本题考核文本框、命令按钮的属性设置，简单事件过程编写，要求不使用变量和循环，因此直接累加即可，结果正确即得分。2.在窗体Form1上绘制一个名称为P1的图片框控件，要求编写程序，实现功能：单击图片框时，在图片框中绘制一个圆心坐标为(1000,1000)、半径为500的红色空心圆，线条宽度为2。解答：操作步骤：①新建标准EXE工程，在窗体Form1上添加图片框控件，修改Name属性为P1，调整控件大小满足绘制要求。②双击图片框进入代码编辑窗口，编写Click事件代码：PrivateSubP1_Click()P1.DrawWidth=2P1.ForeColor=vbRedP1.Circle(1000,1000),500EndSub③保存文件，窗体文件命名为sjt2.frm，工程文件命名为sjt2.vbp。考点解析：本题考核图片框的绘图方法，DrawWidth属性设置线条宽度，ForeColor设置线条颜色，Circle方法用于绘制圆，格式为“对象.Circle(x坐标,y坐标),半径,颜色”，符合要求即可得分。三、简单应用题（共2小题，每题20分，总计40分）1.窗体上已经添加了两个文本框，Text1用于输入三位整数，Text2用于输出结果，还有一个标题为“判断”的命令按钮Command1。程序功能是：输入一个三位整数后，判断该数是否是水仙花数，若一个三位数各个位数字的立方和等于这个数本身，即为水仙花数（例153=1³+5³+3³），判断结果显示在Text2中。程序中有三处错误，请改正，不得增删原有语句，仅修改错误位置。源程序（错误位置用'*标注）：PrivateSubCommand1_Click()DimnAsInteger,aAsInteger,bAsInteger,cAsIntegern=Val(Text1.Text)*a=n/100*b=n/10Mod10c=nMod10Ifa^3+b^3+c^3=n*Text2.Text="是水仙花数"ElseText2.Text="不是水仙花数"EndIfEndSub解答：错误改正如下：①第一处错误：将a=n/100修改为a=n\100。错误原因：普通除法/会得到浮点数，要得到百位整数需要使用整除运算。②第二处错误：将b=n/10Mod10修改为b=(n\10)Mod10。错误原因：需要先用整除得到去掉个位的前两位，再对10取模得到十位数字，原语句使用普通除法导致结果错误。③第三处错误：If语句缺少Then关键字，在If条件行末尾添加Then，即修改为Ifa^3+b^3+c^3=nThen。错误原因：VB单行If语句格式为“If条件Then语句”，缺少Then会导致语法错误。改正后程序运行正常，输入153输出“是水仙花数”，输入123输出“不是水仙花数”，符合题目要求。2.窗体上已经添加了一个名称为List1的列表框控件，一个名称为Command1、标题为“添加”的命令按钮。要求程序功能为：单击命令按钮时，将100到200之间所有能被7整除的整数，依次添加到List1中。请补充程序中的空缺部分，不得修改原有语句。源程序：PrivateSubCommand1_Click()DimiAsIntegerFori=100To200If【1】ThenList1.【2】iEndIfNextiEndSub解答：【1】处填入：iMod7=0，说明：判断一个数能否被7整除，通过Mod运算取余，余数为0说明能整除，符合条件。【2】处填入：AddItem，说明：列表框添加新项的方法为AddItem，格式为“列表框名.AddItem内容”，因此此处填AddItem。补充后程序运行正确，会将所有符合条件的数添加到列表框中。四、综合应用题（共1小题，总计30分）考生文件夹下存在一个文本文件in.txt，文件中保存了10个整数，窗体上已经搭建好界面：一个名称为Text1的文本框，MultiLine属性为True，ScrollBars属性为2，允许多行显示带滚动条；一个名称为Command1、标题为“读取计算”的命令按钮。要求编写程序实现功能：单击Command1按钮，读取in.txt中的10个整数，存入整型数组，找出数组中的最大值、最小值，