国家二级VB机试（选择题）模拟试卷3（共255题）

国家二级VB机试（选择题）模拟试卷3（共9套）（共255题）国家二级VB机试（选择题）模拟试卷第1套一、选择题(本题共25题，每题1.0分，共25分。)1、在编辑VB应用程序时，如果不小心关闭了属性窗口，则可以单击主窗口标准工具栏上的一个按钮直接打开属性窗口，这个按钮的图标是A、

B、

C、

D、

标准答案：D知识点解析：单击选项A)的图标可以打开菜单编辑器；单击选项B)的图标可以添加窗体：单击选项C)的图标可以打开代码窗口；单击选项D)的图标可以打开属性窗口。2、栈的初始状态为空。现将元素1，2，3，A，B，C依次入栈，再依次出栈，则元素出栈的顺序是A、1，2，3，A，B，CB、C，B，A，1，2，3C、C，B，A，3，2，1D、1，2，3，C，B，A标准答案：C知识点解析：栈是按照“先进后出”或“后进先出”的原则组织数据的。所以出栈顺序是CBA321。3、目录列表框Path属性所表示的含义是A、当前驱动器或指定驱动器上的路径B、当前驱动器或指定驱动器上的某目录下的文件列表C、跟目录下的文件列表、D、指定路径下的文件列表标准答案：A知识点解析：本题考查目录列表框的基本属性。目录列表框的Path属性是指当前驱动器或指定驱动器上的路径。4、为了在运行时能显示窗体左上角的控制框(即系统菜单)，应执行的操作是A、把窗体的ControlBox属性设置为False，其他属性任意B、把窗体的ControlBox属性设置为True，并且把BorderStyle属性设置为1到5中的一个数C、把窗体的ControlBox属性设置为True，并且把BorderStyle属性设置为0D、把窗体的ControlBox属性设置为Fale，并且把BorderStyle属性设置为1到5中的一个数标准答案：B知识点解析：窗体的ControlBox(控制框属性)用于设置在窗体标题栏左侧是否显示控制按钮，该属性在运行时为只读，而且还要求BorderStyle属性设置为1到5中的一个数，不能为0(因为此时无边框)。5、下列叙述中正确的是()。A、软件过程是软件开发过程B、软件过程是软件维护过程C、软件过程是软件开发过程和软件维护过程D、软件过程是把输入转化为输出的一组彼此相关的资源和活动标准答案：D知识点解析：软件过程是把输入转化为输出的一组彼此相关的资源和活动。软件过程是为了获得高质量软件所需要完成的一系列任务的框架，它规定了完成各项任务的工作步骤。软件过程所进行的基本活动主要有软件规格说明、软件开发或软件设计与实线、软件确认、软件演进。在过程结束时，将输入(用户要求)转化为输出(软件产品)。6、在VB集成环境中，工具箱中的图标表示的是A、组合框控件B、列表框控件C、可显示多行的文本框控件D、框架控件标准答案：A知识点解析：题中所示为组合框控件（ComboBox），故正确答案为选项A。7、下列程序运行后，单击窗体，在窗体上显示：1，1＋2，1＋2＋3，1＋2＋3＋4，1＋2＋3＋4＋5的和。在横线处应填写()。PrivateSubForm_Click()。DimiAsInteger,ttAsIntegerFori＝1To5tt＝Sum(i)：Print"tt＝"；tt，NextiEndSubPrivateFuncfionSum(_______)j＝j＋n：Sum＝jEndFunctionA、nAsIntegerjAsIntegerB、nAsIntegerStaticjAsIntegerC、ByValnAsIntegerjAsIntegerD、ByValnAsIntegerStaticjAsInteger标准答案：D知识点解析：本题考查参数的传递和静态局部变量。Sum函数在窗体单击事件中调用5次并用来求和，因此每一次求和结果应当保留，所以借助静态变量实现。同时要求传递的形参变化不应影响到实参，因此采用传值调用。8、数据独立性是数据库技术的重要特点之一，所谓数据独立性是指A、数据与程序独立存放B、不同的数据被存放在不同的文件中C、不同的数据只能被对应的应用程序所使用D、以上三种说法都不对标准答案：D知识点解析：数据独立性是指数据库中数据独立于应用程序而不依赖于应用程序，即数据与程序间的互不依赖性。也就是说数据的逻辑结构、存储结构与存取方式的改变不会影响应用程序。数据的独立性包括物理独立性和逻辑独立性两级。①物理独立性：数据的物理结构(包括存储结构、存取方式等)的改变，如存储设备的更换、物理存储的更换、存取方式改变等都不影响数据库的逻辑结构，从而不致引起应用程序的变化。②逻辑独立性：数据库总体逻辑结构的改变，如修改数据模式、增加新的数据类型、改变数据间联系等，不需要相应的应用程序改变，这就是数据的逻辑独立性。9、窗体上有一个名称为Commandl的命令按钮，其事件过程如下：PrivateSubCommandl_Click()x=”VisualBasicProgramming”a=Right(x，11)b=Mid(x，7，5)c=MsgBox(a，，b)EndSub运行程序后单击命令按钮。以下叙述中错误的是A、信息框的标题是BasicB、信息框中的提示信息是ProgrammingC、C的值是函数的返回值D、MsgBox的使用格式有错标准答案：D知识点解析：本题考查的考点是有关取子串函数和MsgBox函数的。a的值应该是Programming，b的值是Basic。在MsgBox函数中，第一个参数是提示信息，第二个参数是按钮和图表的类型，若省略则应有逗号占位，第三个参数是对话框的标题。最终会产生一个返回值是用户单击的按钮代码。10、设有如下程序：PrivateSubForm．Click()num=InputBox("请输入一个实数")：p=InStr(num，"")Ifp>0ThenPrintMid(num，p+1)ElsePrint"END"EndIfEndSub运行程序，单击窗体，根据提示输入一个数值。如果输入的不是实数，则程序输出“END”；否则A、用字符方式输出该实数B、输出该实数的整数部分C、输出该实数的小数部分D、去掉实数中的小数点，保留所有数码输出标准答案：C知识点解析：字符串匹配函数Instr用于查找第二个参数在第一个参数中第一次出现的位置，若未找到返回O；Mid(字符串，起始位置[，个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串，若不指定个数将返回字符串中从参数“起始位置”到字符串尾端的所有字符。本题实际就是先找到小数点的位置，然后输出小数点后面的部分，即小数部分。11、以下变量名中合法的是A、x2-1B、printC、str_nD、2x标准答案：C知识点解析：变量是一个名字，给变量命名时应遵循以下4条规则：名字只能由字母、数字和F划线组成：名字的第1个字符必须是英文字母，最后一个字符可以是类型说明符；名字的有效字符为255个；不能用ⅥsualBaSic的保留字做变量名，也不能用末尾带有类型说明符的保留字做变量名，但可以在变量名中的保留字嵌入。12、窗体上有一个名称为Commandl的命令按钮，一个名称为Textl的文本框。编写如下程序：PrivateSubCommandl—Click()DimxAsIntegerX=val(InputBox(“输入数据”))Textl=Str(X+fun(x)+fun(x))EndSubPrivateFunctionfun(ByRefnAsInteger)IfnMod3=0Thenn=n+nElsen=n*nEndIffun=nEndFunction对于上述程序，以下叙述中错误的是()。A、语句fun=n有错，因为n是整型，fun没有定义类型B、运行程序，输入值为5时，文本框中显示655C、运行程序，输入值为6时，文本框中显示42D、ByRef表示参数按址传递标准答案：A知识点解析：过程fun的功能是将传人的值运算后返回，当传人数值为3的整数倍时返回该值的2倍，否则返回该值的平方。过程：Fun的参数指定为ByRef方式，即按址传递，因此会影响实参的值。Str函数是将数值转换为字符串。过程fun定义时没有指明返回类型因此默认为Variant类型，它可以表示任何值，因此A)选项的说法不正确。13、以下可以判断是否在文本框(名称为Text1)内按下了回车键的事件过程是()。A、Textl_ChangeB、Textl一ClickC、Text1_KeyPressD、Text1一GotFocus标准答案：C知识点解析：KeyPress事件：用户按下并且释放一个会产生ASCII码的键时被触发。此事件只对会产生ACSII码的按键有反应，包括数字、大小写的字母、Enter、Backspace、Esc、Tab等，对于如方向键这样的不会产生ASCII码的按键，KeyPress事件就不会被触发。14、PrintFormat(1234．56，"###．#")语句的输出结果是A、123．4B、1234．6C、1234．5D、1234．56标准答案：B知识点解析：Format函数可以使参数按照指定的格式输出，其格式为：Format￥(数值表达式，格式字符串)，该函数的功能是按“格式字符串”指定的格式输出“数值表达式”的值。其中#代表任意数值，小数部分多余的将进行四舍五入处理。15、假定Picture1和Text1分别为图片框和文本框的名称，则下列错误的语句是A、Print25B、Picture1．Print25C、Text1．Print25D、Debug．Print25标准答案：C知识点解析：Print方法可以在窗体上显示文本字符串和表达式的值，并且可以在图片框、立即窗口或打印机上输出这些信息，但是不能在文本框中输出。16、有数据定义语句：DimX，YAsInteger以上语句表明A、X、Y均是整型变量B、X是整型变量，Y是变体类型变量C、X是变体类型变量，Y是整型变量D、X是整型变量，Y是字符型变量标准答案：C知识点解析：在VisualBasic中用户既可以显式声明一个变量，也可以不声明而直接使用变量，显式声明变量时每个变量都应使用As子句声明类型，否则该变量将被视为变体类型。DimX，YAsInteger表示X是变体类型变量，Y是整型变量。17、如果把命令按钮的Cancel属性设置为True，则程序运行后A、按Esc键与单击该命令按钮的作用相同B、按回车键与单击该命令按钮的作用相同C、按Esc键将停止程序的运行D、按回车键将中断程序的运行标准答案：A知识点解析：命令按钮的Cancel属性用来设置窗体的“取消”按钮，程序运行时，按下＜Esc＞键将执行该命令按钮的单击事件过程。18、关于水平滚动条，如下叙述中错误的是A、当滚动框的位置改变时，触发Change事件B、当拖动滚动条中的滚动框时，触发Scroll事件C、LargeChange属性是滚动条的最大值D、Value是滚动条中滚动框的当前值标准答案：C知识点解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。Value是滚动条中滚动框的当前值，当滚动条的Value属性值改变时会触发Change事件。当拖动滚动条中的滚动框时，触发Scroll事件。LargeChange属性用于设置或返回单击滚动条中滚动框前面或后面的部位时，Value属性增加或减小的增量值；Max属性是滚动条的最大值。19、设有如下程序段：x=2Fori=1ToStep2x=x+iNexti运行以上程序后，X的值是A、26B、27C、38D、57标准答案：B知识点解析：本题考查For循环。x的初值为2，代码的功能是把循环变量的值和x做累加。For循环执行5次，循环变量i的值分别为：1、3、5、7、9，因此循环结束后x的值为：2+l+3+5+7+9=27。20、阅读程序：OptionBase1PrivateSubFormClick()DimArr(3，3)AsIntegerFori=1To3Fori=1To3Ifj=iOrj=3一i+1ThenArr(i，j)=1ElseArr(i，j)=0EndIfNextiNextiFori=lTo3Fori=1To3PrintArr(i，j)；NextiPrintNextiEndSub程序运行后，如果单击窗体，则输A、111111111B、000000000C、100010001D、101010101标准答案：D知识点解析：本题是用一个二重循环为二维数组赋值，只有满足下标j=i或者j=3．i+1才将其设置为1，否则设置为0，如果写出这个二维数组可以看出，两个对角线的元素被设置成1．21、将数据项“Student”添加到名称为Listl的列表框中，并使其成为列表框第一项的语句为A、Listl．Addltem”Student”．0B、Listl．Addltem”Student”，1C、Listl．AddItemO．”Student”D、Listl．Addlteml，”Student”标准答案：A知识点解析：AddItem方法可以在运行期间向列表框中添加项目，其格式为列表框名．AddItem项目字符串[，索引值]，其中“索引值”可以指定添加项在列表框中的位置，从0开始计数。如果省略“索引值”，则文本被放在列表框的尾部。22、以下关于控件数组的叙述中，正确的是A、数组中各个控件具有相同的名称B、数组中可包含不同类型的控件C、数组中各个控件具有相同的Index属性值D、数组元素不同，可以响应的事件也不同标准答案：A知识点解析：控件数组是一组具有共同名称和共同类型的控件，它们拥有共同的事件，数组中的每个控件都有惟一的索引号(Index)，即下标。23、编写如下程序：PrivateSubCommand1_Click()DimxAsInteger，yAsIntegerx=InputBox("输入第一个数")：y=InputBox("输入第二个数")Callf(x，y)Printx，yEndSubSubf(aAsInteger，ByValbAsInteger)a=a*2：x=a+b：b=b+100EndSub程序运行后，单击命令按钮Command1，并输入数值10和15，则输出结果为A、10115B、20115C、3515D、2015标准答案：D知识点解析：在VisualBasic中调用过程时，参数有两种传递形式：按值传递(Byval)和按址传递(Byref)，默认为按址传递。其中，当参数按址传递时，如果在引用该参数的过程中改变了形参的值，同时也就改变了传递参数时实参变量的值。本题中f的参数a是按地址传递的，b是按值传递的，因此在f中对a的改变会影响实参x，对b的操作不会影响实参y。24、窗体上有一个名称为Commandl的命令按钮，一个名称为Textl的文本框。编写如下程序：PrivateSubCommandl_Click()DimxAsIntegerx=Val(InputBox(”输入数据”))Text1=Str(x+fun(x)+fun(x))EndSubPrivateFunctionfun(ByRefnAsInteger)IfnMod3=0Thenn=n+nElsen=n*nEndIffun=nEndFunction对于上述程序，以下叙述中错误的是A、语句fun=n有错，因为n是整型，fun没有定义类型B、运行程序，输入值为5时，文本框中显示655C、运行程序，输入值为6时，文本框中显示42D、ByRef表示参数按址传递标准答案：A知识点解析：本题中的函数fun的功能是判断参数是否能被3整除，若可以整除则将n翻倍，否则将n变为n的平方返回。在函数头部没有声明函数的返回值类型，默认为变体型，可以接受任何数据类型的赋值；ByRef表示参数按址传递，对形参的改变将会影响实参；当输入5的时候输出5+25+625=655；当输入6的时候输出6+12+24=42。25、设窗体上有2个文本框Text1和Text2，并有下面的事件过程：DimnPrivateSubText1_KeyPress(KeyAsciiAsInteger)If”A”<=Chr(KeyAscii)AndChr(KeyAscii)<=“Z”Thenn=n+1EndIfIfKeyAscii=13ThenText2．Text=nEndSub程序运行时，在文本框Text1中输入“VisualBasic6．0”并按回车键后，在文本框Text2中显示的是A、2B、9C、13D、16标准答案：A知识点解析：KevPress(KeyAsciiAsInteger)事件是在对象具有焦点时，按下键盘上的键触发的，KeyPress(KeyAsciiAsInteger)事件中KevAscii参数是所按键的ASCII代码，该参数不显示键盘的物理状态，而只是传递一个字符代码。KeyPress将每个字符的大、小写形式作为不同的键代码解释，即作为两种不同的字符。在本题中n的值是文本框中大写字母的个数。国家二级VB机试（选择题）模拟试卷第2套一、选择题(本题共40题，每题1.0分，共40分。)1、下列数据结构中，属于非线性结构的是A、循环队列B、带链队列C、二叉树D、带链栈标准答案：C知识点解析：根据数据结构中各数据元素之间的前后件关系的复杂程度，一般将数据结构分为两大类：线性结构和非线性结构。循环队列、带链队列和带链栈都是线性结构，而二叉树是非线性结构。2、如果在VisualBasic集成环境中没有打开属性窗口，下列可以打开属性窗口的操作是A、用鼠标双击窗体的任何部位B、执行“工程”-“属性窗口”命令C、按Ctrl+F4键D、按F4键标准答案：D知识点解析：属性窗口是用来设置对象(窗体或控件)的属性值的，如果没有打开属性窗口，可以按F4键或者执行“视图”菜单中的“属性窗口”命令来打开属性窗口。用鼠标双击窗体的任何部位将打开代码窗口。3、按照“后进先出”原则组织数据的数据结构是A、队列B、栈C、双向链表D、二叉树标准答案：B知识点解析：栈是限定在一端进行插入与删除的线性表。在栈中，允许插入与删除的一端称为栈顶，不允许插入与删除的另一端称为栈底。栈顶元素总是最后被插入的元素，也是最先被删除的元素；栈底元素总是最先被插入的元素，也是最后才能被删除的元素。即栈是按照“后进先出”(LastInFirstOut，简称LIFO)或“先进后出”(FirstInLastOut，简称FILO)的原则组织数据的。因此，栈也称为“后进先出表”或“先进后出”表。4、在窗体上添加“控件”的正确的操作方式是A、先单击工具箱中的控件图标，再单击窗体上适当位置B、先单击工具箱中的控件图标，再双击窗体上适当位置C、直接双击工具箱中的控件图标，该控件将出现在窗体上D、直接将工具箱中的控件图标拖动到窗体上适当位置标准答案：C知识点解析：在窗体上画一个控件有以下两种方法。第1种方法步骤如下：步骤1：单击工具箱中的控件，该控件的图标反相显示。步骤2：把光标移到窗体的适当位置，此时光标变为“+”号，按下鼠标左键，不松开，并向右下方拖动鼠标，窗体上显示出一个方框。步骤3：鼠标向右下方移动，所画的方框逐渐增大，当增大到认为合适的大小时，松开鼠标左键，这样就在窗体上画好了一个控件。第2种方法比较简单：双击工具箱中某个所需要的控件图标即可。5、如果过程的首行是：PrivateSubproc(xAsControl)，则调用此过程时使用的实际参数应该是A、变体型变量，变量名必须是xB、某个控件的名称C、名称为x的控件D、字符型变量，变量名不限标准答案：B知识点解析：Do循环结构中Do[While|Until循环条件]…Loop先判断循环条件后执行程序；Do…Loop[While|Until循环条件]先执行程序后判断循环条件。其中DoUntil…Loop循环中，当条件为假时继续执行循环体，当条件为真时退出循环，故正确答案为B选项。6、下面叙述中错误的是()。A、软件测试的目的是发现错误并改正错误B、对被调试的程序进行“错误定位”是程序调试的必要步骤C、程序调试通常也称为DebugD、软件测试应严格执行测试计划，排除测试的随意性标准答案：A知识点解析：软件测试的目的是为了发现错误而执行程序的过程，并不涉及改正错误，所以选项A错误。程序调试的基本步骤有错误定位、修改设计和代码，以排除错误、进行回归测试，防止引进新的错误。程序调试通常称为Debug，即排错。软件测试的基本准则有所有测试都应追溯到需求、严格执行测试计划、排除测试的随意性、充分注意测试中的群集现象、程序员应避免检查自己的程序、穷举测试不可能、妥善保存测试计划等文件。7、设有以下定义语句：PrivateTypepointXAsIntegerYAsIntegerEndTypeDimaAspoint下面语句中正确的是A、a=12B、a．x=12C、point=12D、point．X=12标准答案：B知识点解析：Type语句用于在模块级别(过程外的任何代码都将看作模块级别代码，必须先列出声明，随后列出过程)中定义一个用户自己的数据类型，本质上是一个数据类型集合，它含有一个至一个以上的成员，每个成员可以被定义为不同的数据类型。当声明一个自定义类型变量后，就可通过“变量名．成员名”来访问自定义变量中的元素。自定义数据类型的声明与基本数据类型变量的声明相同。8、软件生命周期中的活动不包括A、市场调研B、需求分析C、软件测试D、软件维护标准答案：A知识点解析：软件的生命周期描述了软件从产生到最终消_亡的全过程，生命周期中的活动包括需求分析、软件设计(分为概要设计和详细设计)、软件实现、软件测试和软件维护，不包括市场调研。9、在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序()。PrivateTypestudentStuNameAsString*10StuGradeAsString*10StuAgeAsIntegerEndTypePrivateSubForm_Click()DimSAsstudentOpen"cAstudent．txt"ForRandomAs＃1Len＝Len(s)Fori＝1To5s.StuName＝InputBox("请输入姓名")s.StuCaMe＝InputBox("请输入年级号")s.StuAge＝ValonputBox("请输入年龄"))_____________________NextiClose＃1EndSubA、Print＃1，SB、Print＃1，iC、Put＃1,,sD、Put＃1,,i标准答案：C知识点解析：本题考查文件操作。题目中要求以随机的方式(Random)打开一个文件，打开文件的格式为：OpenFileNameForRandomAs＃文件号[Len＝记录长度]，然后以Put命令写入一条记录，格式为：Put[＃]文件号，[记录号]，变量名。若省略记录号，表示在当前记录号下写入记录型变量，逗号(，)不可以省略。10、已知A$＝"Welcome"，下列语句操作能够正确执行的是()。A、Label1．Height＝A$B、Label1．Caption＝A$C、Label1．Enabled＝A$D、Label1．Visible＝A$标准答案：B知识点解析：本题考查标签的各种属性。标签的Height属性值为数值型，不能赋字符串型值，而Enabled和Visible为布尔型，只有Caption属性值为字符串型。11、若实体A和B是一对多的联系，实体B和C是一对一的联系，则实体A和C的联系是A、一对一B、一对多C、多对一D、多对多标准答案：B知识点解析：由于B和C有一一对应的联系，而A和B只间有一对多的联系，则通过关系之间的传递，则A和C之间也是一对多的联系。12、下面描述中不属于数据库系统特点的是A、数据共享B、数据完整性C、数据冗余度高D、数据独立性高标准答案：C知识点解析：数据系统的基本特点有数据的集成件、数据的高共享性与低冗余性、数据的独立性、数据统一管理与控制。13、内聚性是对模块功能强度的衡量，下列选项中，内聚性较弱的是()。A、顺序内聚B、偶然内聚C、时间内聚D、逻辑内聚标准答案：B知识点解析：内聚是从功能角度来衡量模块的联系，它描述的是模块内的功能联系。内聚有如下种类，它们之间的内聚度由弱到强排列：偶然内聚一一模块中的代码无法定义其不同功能的调用。但它使该模块能执行不同的功能，这种模块为巧合强度模块。逻辑内聚一一这种模块把几种相关的功能组合在一起，每次被调用时，由传送给模块的参数来确定该模块应完成哪一种功能。时间内聚一一这种模块顺序完成一类相关功能，比如初始化模块，它顺序地为变量置初值。过程内聚一一如果一个模块内的处理元素是相关的，而且必须以特定次序执行，则称为过程内聚。通信内聚一一这种模块除了具有过程内聚的特点外，还有另外一种关系，即它的所有功能都通过使用公用数据而发生联系。顺序内聚一一如果一个模块内各个处理元素和同一个功能密切相关，而且这些处理必须顺序执行，处理元素的输出数据作为下一个处理元素的输入数据，则称为顺序内聚。功能内聚一一如果一个模块包括为完成某一具体任务所必需的所有成分，或者说模块中所有成分结合起来是为了完成一个具体的任务，此模块则为功能内聚模块。14、下列叙述中正确的是A、不同的对象可以具有相同名称的方法B、’abcd’是一个合法的字符串常量C、语句Dima(1To6,-2To4)AsInteger定义数组时出错D、向随机文件中写数据时，既可用Write#语句也可用Put#语句标准答案：A知识点解析：字符串常量由字符组成，可以是双引号和回车符以外的任何ASCII字符，选项B中应该用一对双引号括起来。选项C所定义的数组正确，Write#语句的功能是向顺序文件写入记录，Put#语句的功能是把"变量"的内容写入由"文件"号所指定的磁盘文件中，故本题正确选项为A。15、有两个关系R和S如下：则由关系R得到关系S的操作是A、自然连接B、并C、选择D、投影标准答案：C知识点解析：关系S是由关系R中的一行元组组成，应通过选择运算得到。16、在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是A、PrivateSubText1_Change()Label1．Caption=Str(Len(Text1．Text))EndSubB、PrivateSubText1_Click()Label1．Caption=Str(Len(Text1．Text)1EndSubC、PrivateSubText1_Change()Label1．Caption=Text1．TextEndSubD、PrivateSubLabel1_Change()Label1．Caption=Str(Len(Text1．Text))EndSub标准答案：A知识点解析：小题考查的考点是有关文本框处理的。首先，如果想要在文本框中每输入一个字符就会触发一次事件，应该编写文本框的Change事件；文本框中的字符个数由Len函数可以取得。17、命令按钮不支持的事件为()。A、ClickB、DblClickC、GotFocusD、MouseMove标准答案：B知识点解析：命令按钮支持的事件有Click，GotFocus和MouseMove，不支持Dblclick事件，故选B)。18、窗体上有一个名称为Command1的命令按钮，单击该按钮时所实现的功能是产生10个随机整数，然后从键盘输入一个整数，查找该数在数组中的位置。若找到，输出该数的位置；若没有找到，给出相应的提示。该命令按钮的单击事件过程如下：PrivateSubCommand1_Click()Dima(10)AsIntegerDimxAsIntegerFori=1To108(i)=Int(Rnd*100)Nextx=InputBox("输入100以内的整数：")p=0Fori=1To10Ifa(i)=xThenp=iExitForEndIfNextIfp=0ThenPrint"没有找到与输入数据相同的数!"ElsePrintStr(x)+"名[擞组中的位置是"+Str(p)EndIfEndSub对于上述事件过程，以下叙述中正确的是A、本程序实际产生的随机数是0-99B、若产生的随机数中有相同数，则p是其中最后一个数的位置C、程序有错，p的初值设置不对D、程序有错，InputBox函数产生的数据与x的类型不匹配标准答案：A知识点解析：Rnd生成的随机数为0-1的小数，乘以100后取整后范围为0-99，选A。19、下列方法中，不属于软件调试方法的是()。A、回溯法B、强行排错法C、集成测试法D、原因排除法标准答案：C知识点解析：软件调试主要采用以下三种方法：强行排错法：作为传统的调试方法，其过程可概括为设置断点、程序暂停、观察程序状态、继续运行程序。回溯法：该方法适合于小规模程序的排错、即一旦发现了错误，先分析错误征兆，确定最先发现“症状”的位置。原因排除法：原因排除法是通过演绎和归纳，以及二分法来实现。20、设窗体上有一个名称为Timer1的计时器控件，其Interval属性被设置为500，Enabled属性被设置为True；还有一个名称为Text1的文本框和下面的事件过程：PrivateSubTimer1_Timer()StaticxAsLongx=x+1Text1=xEndSub程序运行一段时间后，文本框中显示的是100，则表示()。A、程序已经运行了100秒B、程序已经运行了100毫秒C、程序已经运行了50秒D、文本框到窗体左边框的距离是100标准答案：C知识点解析：过程Timer1_Timer()按计时器的Interval属性值定时运行。该属性用来设置计时器事件之间的间隔，以毫秒为单位，取值范围为0～65535，因此其最大时间间隔不能超过65秒。文本框中显示值是100时，表示Timer1_Timer()运行了100次，运行时间是100*500毫秒=50秒。所以本题答案为C)。21、窗体j：有个名称为VScrolll的垂商滚动条，为了设定单出滚动条两端箭头时的Value增量值，麻设置的属性是A、LargeChangeB、SmallChangeC、MaxD、Min标准答案：B知识点解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。其Max属性用于设置或返回滚动条所能表示的最大值，Min属性用于设置或返回滚动条所能表示的最小值。LargeChange属性用于设置或返回单击滚动条中滚动框前面或后面的部位时，Value属性增加或减小的增量值；SmallChange属性用于设置或返回单击滚动条两端的箭头时，Value属性增加或减小的增量值。22、如果要定义一个窗体级变量，定义变量语句的位置应该是A、在使用该变量的过程中B、在该窗体模块所有过程的前面C、在该窗体模块所有过程的后面D、在某个标准模块中标准答案：B知识点解析：根据变量的定义位置和定义关键字的不同，变量可以分为局部(Local)变量、模块(Module)变量和全局(Public)变量3种类型：23、以下关于VB特点的叙述中，错误的是()。A、VB中一个对象可有多个事件过程B、VB应用程序能以编译方式运行C、VB应用程序从Form_Load事件过程开始执行D、在VB应用程序中往往通过引发某个事件导致对对象的操作标准答案：C知识点解析：VB应用程序不一定从From_Lmad事件开始执行，它是由工程中启动对象决定先从哪儿开始执行。故C选项错误。24、窗体上有一个名称为Text1的文本框，一个名称为Commandl的命令按钮。窗体文件的程序如下：PrivateTypexPrivateSubCommandl_Click()aAsInteger：bAsIntegerDimyAsxEndTypey．a=InputBox("")Ify．a＼2=y．a／2Theny．b=y．a*y．aElsey．b=Fix(y．a／2)EndIfText1．Text=y．bEndSub对以上程序，下列叙述中错误的是A、x是用户定义的类型B、InputBox函数弹出的对话框中没有提示信息C、若输入的是偶数，y．b的值为该偶数的平方D、Fix(y．a／2)把y．a／2的小数部分四舍五入，转换为整数返回标准答案：D知识点解析：本题考查的考点是有关自定义类型和Fix函数的。用户可以通过Type语句自定义类型，并可用自定义的类型声明变量。注意Fix函数是向下取整，Round函数是四舍五入。25、设窗体上有2个直线控件Linel和Line2，若使两条直线相连接，需满足的条件是A、Linel．X1=Line2．X2且Linel．Y1=Line2．Y2B、Linel．X1=Line2．Y1且Linel．Y1=Line2．XlC、Linel．X2=Line2．X1且Linel．Y1=Line2．Y2D、Linel．X2=Line2．X1且Linel．Y2=Line2．Y2标准答案：A知识点解析：Line控件有四个属性分别为X1、Y1，X2、Y2，分别代表两个端点的横坐标和纵坐标。若使两条直线相连接，需要让两条直线的一个X坐标和一个Y坐标重合。26、窗体上有1个名称为Command1的命令按钮；1个名称为List1、没有列表项的列表框。编写如下程序：PrivateSubCommand1_Click()DimxAsString，sAsString，tempAsStringDimiAsIntegerx=InputBox("输入字符串"，"输入")Ifx<>""ThenFori=Len(x)To1Step-1s=Mid(x，i，1)IfS<>""Thentemp=s+tempElseList1．AddItemtemps=""：temp=""EndIfNextList1．AddItemtempElseMsgBox"输入内容为空!"EndIfEndSub程序运行后，单击命令按钮Command1，并输入“Happynewyear”，则在List1中显示的内容为A、yearnewHappyB、HappynewyearC、raeywenyppaHD、yppaHwenraey标准答案：A知识点解析：本题的循环中倒序从字符串s中依次取出每一个字符，只要该字符不是空格就将其连接到temp的前面，见到空格就把连接好的temp加入到列表框中，即先加入year，然后是new，最后是Happy。27、编写如下程序：PrivateSubCommand1_Click()DimnumAsInteger，kAsInteger，nAsIntegersum=InputBox("请输入一个正整数：")k=sumn=2DoDoWhilesumModn=0Printn；：num=num／nLoopn=n+1LoopUntiln>k／2EndSub程序运行后，单击命令按钮Command1，并输入数值20，则输出结果为A、225B、234C、2345D、25标准答案：A知识点解析：Do型循环结构，首先看条件判断在循环体的前面还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件是什么，至少执行一次循环体。在Until循环中条件为False时执行循环体，条件为True时退出循环：在WhiIe循环中条件为True时执行循环体，条件为False时退出循环。本题是一个嵌套的Do循环，外层循环是后判断条件的Until型循环，内层循环是先判断条件的While型循环。根据输入的值20可判断出三次输出的结果为2、2、5。28、设工程文件包含两个窗体文件Form1．frm、Form2．frm及一个标准模块文件Module1．bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下：PublicxAsIntegerPrivmeSubForm_Load0x=1：y=5EndSUbPriateSubCommand1Click()Form2．ShowEndSubForm2的代码如下：PrivateSubCommand1＿Click()PrintForm1．x，yEndSubModule1的代码如下：PublicyAsInteger运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是A、15B、05C、0D、程序有错标准答案：A知识点解析：本题考查的考点是有关变量的作用域的。本题中的y就是在标准模块中定义的全局变量，在任何一个窗体中都能应用，并在Form1中被赋值为5；x是Form1中定义的局部变量，要想在Fonn2中引用，必须用Fom1．x格式来引用。29、窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：PrivateSubCommand1_Click()DimsAsDoubles=0:i=1DoWhilei＜6s=s+i/(i+1):i=i+1LoopPrintsEndSub该事件过程的功能是计算一个表达式的值，该表达式是A、1+1/2+2/3+3/4+4/5B、1+1/2+2/3+3/4+4/5+5/6C、1/2+2/3+3/4+4/5D、1/2+2/3+3/4+4/5+5/6标准答案：D知识点解析：本题中Do循环的循环变量i的初值为1，继续循环的条件是i＜6，在每次循环中i的值加1，因此循环会执行5次：存第一次循环中累加1／2，第二次循环中累加2／3，第三次循环中累加3／4……即最后计算的是1／2+2／3+3／4+4／5+5／6的值。30、下列关于滚动条的叙述中，错误的是A、在滚动条内单击滚动框前面或后面的部位时，会触发Scroll事件B、在滚动条内拖动滚动框时，会触发Scroll事件C、在滚动条内拖动滚动框后，会触发Change事件D、单击滚动条两端的箭头时，会触发Change事件标准答案：A知识点解析：滚动条通常用来帮助观察数据或确定位置，也可用来作为数据输入的工具。Value是滚动条中滚动框的当前值，当滚动条的Value属性值改变时会触发Chan-e事件。当拖动滚动条中的滚动框时，触发Scroll事件。31、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应使用的语句为A、Text1.ClearB、Text1.Visible=FalseC、Text1．HideD、Text1．Enabled=False标准答案：B知识点解析：文本框具有Enabled属性和Visible属性，Enabled属性设置文本框在运行时是否可用，Visible属性设置文本框在运行时是否可见。32、设有如下一段程序：PrivateSubCommand1_Click()StaticaAsVarianta=Array("one","two","three","four","five")Printa(3)EndSub针对上述事件过程，以下叙述中正确的是A、变量声明语句有错，应改为Statica(5)AsVariantB、变量声明语句有错，应改为StaticaC、可以正常运行，在窗体上显示threeD、可以正常运行，在窗体上显示four标准答案：D知识点解析：Array(arglist)函数用于将arglist参数中一组用逗号隔开的值列转换成一个数组并赋值给某数组变量，此时要求数组变量在定义时定义成变体型变量或者不声明长度的数组，不能是定长数组。数组的默认下界为0，所以a(3)是数组的第四个元素。33、文件d：＼city．txt的内容如下：BeiJingTianJinShangHaiChongQing编写如下事件过程：PfivaeSubForm_Click()DimInDOpen”d：＼citv.txt”ForInputAs#1DoWhileNotEOF(1)LineInput#1，InDLoopClose1PrintInDEndSub运行程序，单击窗体，输出结果是A、文件city．txt的全部内容B、BeiJingC、ChongQingD、空白标准答案：C知识点解析：VisualBasic程序中关于文件的操作，主要是先打开一个文件，然后对这个文件进行读或写的操作，操作完成后，关闭这个文件。打开文件的基本格式为：OpenFileNameForModeAs#FileNumber。打开方式主要有Output、Append、Input、Random等几种方式。以Input方式打开的文件主要用来读入数据，它与Input#、LineInput#语句配合使用。LineInput#语句从顺序文件中读取一个完整的行，并把它赋给一个字符串变量。本题中依次取出每一行放到InD中，变量中只能保留最后一次取出的行。34、窗体上已有1个名称为Picturel的图片框，要求实现下面2个功能之一：(1)在窗体上移动鼠标时，立即将Picturel显示在鼠标位置(2)在窗体上单击鼠标时，立即将Picturel显示在鼠标位置下面不能实现上述任何功能的事件过程是A、PrivateSubForm_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Picturel．MoveX，YEndSubB、PrivateSubForm_MouseUp(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Picturel．MoveX，YEndSubC、PrivateSubForm_MouseDown(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Picture1．CurrentX=X：Picture1．CurrentY=YEndSubD、PrivateSubFormMouseMove(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)Picturel．MoveX，YEndSub标准答案：C知识点解析：图片框的CurrentX和CurrentY属性会在程序运行时，返回或设置下一次打印或绘图位置的水平坐标和垂直坐标。Move方法用于移动窗体或控件，其语法：对象名．MoveLeft[Top】[，Width][Height]。其中，Left和Top参数分别表示对象左侧的水平坐标和上侧的垂直坐标，Width和Height参数分别表示对象新的宽度和高度。35、为了通过传值方式来传送过程参数，在函数声明部分应使用的关键字为A、ValueB、ByValC、ByRefD、Reference标准答案：B知识点解析：传值就是通过值传送实际参数，即传送实参的值而不是传送它的地址。在这种情况下，通用过程不访问变量(实参)的原始地址，因此不会改变原来变量的值，所有的变化都是在变量的副本上进行的。传值方式通过关键字ByVal来实现。也就是说，在定义通用过程时，如果形参前面有ByVal，则该参数通过传值方式传送。在传值方式下，对形参的改变不会影响到实参。36、VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Textl文本框中，则每输入一个字母A、这3个事件都会触发B、只触发KeyPress事件C、只触发KeyDown、KeyUp事件D、不触发其中任何一个事件标准答案：A知识点解析：当控件具有焦点时，如果按下一个字母键，将会依次触发此控件的KeyDown、KeyUp和KeyPress事件。37、如果改变驱动器列表框的Drive属性，则将触发的事件是A、ChangeB、ScrollC、KeyDownD、KeyUp标准答案：A知识点解析：驱动器列表框(DriveListBox)用来显示当前系统中所有有效磁盘驱动器的列表。驱动器列表框的Drive属性用于设置或返回选择的驱动器，设置时只能通过代码设置而不能在属性窗口中设置。程序运行时，当从驱动器列表框中选择一个新的驱动器或通过代码改变其Drive属性值将触发其Change事件。38、设有语句Open”c：＼Test．Dat”ForOutputAs#1则以下叙述中错误的是A、该语句打开C盘根目录下的一个文件Test．Dat，如果该文件不存在则出错B、该语句打开C盘根目录下一个名为Test．Dat的文件，如果该文件不存在则创建该文件C、该语句打开文件的文件号为1D、执行该语句后，就可以通过Print#语句向文件Test．Dat中写入信息标准答案：A知识点解析：根据数据的存取方式和结构不同，文件可分为顺序文件和随机文件。以Append方式打开文件时，文件指针被定位于文件尾，用于数据的追加写入；以Random方式打开的随机文件可用于随机文件的读与写操作；以Output方式打开文件时，若文件不存在，则建立一个新文件，打开文件后可以使用Print#语句向文件中写入信息。39、下面变量定义中错误的是A、PublicmodAsIntegerB、StaticbufC、DimchAsString*10D、Dima!(-5To-1)标准答案：A知识点解析：定义变量时需要使用As类型或者类型说明符来指明变量的数据类型，如果不指明则为隐式声明，该变量为变体型：mod是关键字表示求余运算，根据标识符命名规则不能作为变量名。40、PrintRight(”VBProgramming”，2)语句的输出结果是A、VBB、ProgrammingC、ngD、2标准答案：C知识点解析：Right()函数用于取出已有字符串最右边指定个数的字符串，本题中取出的是最后两位字符。国家二级VB机试（选择题）模拟试卷第3套一、选择题(本题共25题，每题1.0分，共25分。)1、设x的初始值为1，并有下面程序片段：Whilex<10x=x+1Wend下面与上述程序片段产生结果不同的是A、DoWhilex<10x=x+1LoopB、Dox=x+1LoopWhilex<10C、Dox=x+1LoopUntilx>10D、DoUntilx>=10x=x+1标准答案：C知识点解析：题目中的程序是先检验x<10为真时，再执行x=x+1，退出循环后x=10；而A、B和D项与题目中的程序一样，退出循环后，x为10，故A、B和D项正确；C项退出循环后，x为11，故C项错误。2、下列叙述中正确的是A、循环队列有队头和队尾两个指针，因此，循环队列是非线性结构B、车循环队列中，只需要队头指针就能反映队列中元素的动态变化情况C、在循环队列中，只需要队尾指针就能反映队列中元素的动态变化情况D、循环队列中元素的个数是由队头指针和队尾指针共同决定标准答案：D知识点解析：循环队列中元素的个数是由队头指针和队尾指针共同决定的，元素的动态变化也是通过队头指针和队尾指针来反映的。3、在窗体上画一个Text1文本框和一个CD1通用对话框控件，并编写下面程序：PrivateSubCommand1_Click()CD1.Flags=1Or256CD1.Action=4IfCD1.Color>=0ThenText1.ForeColor=CD1.ColorEndIfEndSub运行程序并单击命令按钮，下面叙述中正确的是A、弹出的是颜色对话框B、弹出的是打开文件对话框C、把代码CD1.Action=4改为CD1.ShowColor效果是一样的D、在弹出的对话框中选了一个颜色并单击"确定"按钮后，会改变文本框中文本的颜色标准答案：D知识点解析：通用对话框的Action属性值为4或者ShowFont方法，则弹出对话框为字体对话框，用ShowColor则弹出颜色对话框，故选项A、B、C错误，D项正确。4、在深度为7的满二叉树中，叶子结点的个数为A、32B、31C、64D、63标准答案：C知识点解析：所谓满二叉树是指这样的一种二叉树：除最后一层外，每一层上的所有结点都有两个子结点。也就是在满二叉树中，每一层上的结点数都是最大结点数，即在满二叉树的第k层上有2k-1个结点，且深度为m的满二叉树有2m-1个结点。对于深度为7的满二叉树，叶了结点所在的是第7层，一共有27-1=64个叶子结点。全部结点共27-1=127个。5、对长度为n的线性表作快速排序，在最坏情况下，比较次数为A、nB、n-1C、n(n-1)D、n)(n-1)／2标准答案：D知识点解析：假设线性表的长度为n，则在最坏情况下，冒泡排序需要经过n／2遍的从前往后的扫描和n／2遍的从后往前的扫描，需要的比较次数为n(n-1)／2。快速排序法也是一种互换类的排序方法，但由手它比冒泡排序法的速度快，因此，称为快速排序法。6、在软件设计中，不属于过程设计工具的是A、PDL(过程设计语言)B、PAD图C、N-S图D、DFD图标准答案：D知识点解析：DFD(数据流图Data-Flow-Diagram)是描述数据处理过程的丁具，是需求理解的逻辑模型的图形表示。它直接支持系统功能建模。在软件详细设计的过程阶段，要对每个模块规定的功能以及算法的设计给出适当的算法描述。常见的过程设计工具有：图形工具：程序流程图，N—S，PAD，HIPO；表格工具：判定表；语言工具：PDL(伪码)。7、以下关于VB的叙述中，错误的是A、’VB采用事件驱动方式运行B、VB既能以解释方式运行，也能以编译方式运行C、VB程序代码中，过程的书写顺序与执行顺序无关D、VB中一个对象对应一个事件标准答案：D知识点解析：VisualBasic是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言。在设计VisualBasic程序的过程中可以随时以解释方式运行程序，也可在整个应用程序设计完成后，经编译生成可脱离VisualBasic环境而在Windows下直接运行的可执行文件(．EXE)。VB程序代码中，过程的书写顺序与执行顺无关，一个对象可以对应多个事件。8、在窗体上添加“控件"的正确的操作方式是A、先单击工具箱中的控件图标，再单击窗体上适当位置B、先单击工具箱中的控件图标，再双击窗体一卜适当位置C、直接双击工具箱中国的控什图标，该控件将出现在窗体上D、直接将工具箱中的控件图标拖动到窗体上适当位置标准答案：C知识点解析：在窗体上画一个控件有以下两种方法。第1种方法步骤如下：步骤1：单击工具箱中的控件，该控件的图标反相显示。步骤2：把光标移到窗体的适当位置，此时光标变为“+”号，按下鼠标左键，不松开，并向右下方拖动鼠标，窗体上显示出一个方框，如图3—7所示。步骤3：鼠标向右下方移动，所画的方框逐渐增大，当增大到认为合适的大小时，松开鼠标左键，这样就在窗体上画好了一个控件。第2种方法比较简单：双击工具箱中某个所需要的控件图标即可。9、对手某些控件，只要将其Style属性设置为1，则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是A、命令按钮B、单选按钮C、复选按钮D、框架标准答案：D知识点解析：命令按钮、单选按钮、复选框的Style属性用来设置外观。一般可以设置以文字的形式显示还是以图片的形式显示。10、窗体上有一个名称为Textl的文本框，一个名称为Commandl的命令按钮。窗体文件的程序如下：一PrivateTypexPrivateSubCommand1．_Click()aAsInteger：bAsInteger、DimyAsxEndTypey.a=InputBox(“”)Ify．a\2y．a／2Theny．b=y．a*y．aElsey．b=Fix(y．a／21Text1．Text=y.bEndSub对以上程序，下列叙述中错误的是A、x是用户定义的类型B、InputBox函数弹出的对话框中没有提示信息C、若输入的是偶数，y．b的值为该偶数的平方D、Fix(y．a／2)把y．a／2的小数部分四舍五入，转换为整数返回标准答案：D知识点解析：本题考查的考点是有关自定义类型和Fix函数的。用户可以通过Type语句自定义类型，并可用自定义的类型声明变量。注意Fix函数是向下取整，Round函数是四舍五入。11、在VisualBasic中，表达式3*2＼5Mod3的值是A、1B、0C、3D、出现错误提示标准答案：A知识点解析：本题考查的考点是有关算术运算的。按照运算符的优先级，首先执行3*2得到6，然后用6整除5得到1，最后用1对3求余数得到最终结果1。本题要注意“＼”为整除运算符，以及Mod取余运算的算法。12、结构化程序所要求的基本结构不包括A、顺序结构B、GOTO跳转C、选择(分支)结构D、重复(循环)结构标准答案：B知识点解析：结构化程序的基本结构有：顺序结构、选择结构和循环结构，没有GOTO跳转结构。13、设：a=2，b=8，c=6，d=3，表达式a＞bAndNot(c＞d)Ord＞c的值是A、1B、0C、TrueD、False标准答案：D知识点解析：在一个包含多种运算的表达式中，优先级顺序为：首先进行函数运算，接着进行算术运算，然后进行关系运算(=、＞、＜、＞=、＜=、＜＞)，最后进行逻辑运算(Not→And→Or→Xor→Eqv→Imp)。按此规则本题简化为FalseAndNotTrueOrFalse，最终结果为False。14、下面循环语句中在任何情况下都至少执行一次循环体的是A、DoWhile<条件>循环体LoopB、While<条件>循环体WendC、Do循环体LoopUntil<条件>D、DoUntil<条件>循环体Loop标准答案：C知识点解析：本题考查循环，DoLoopUntil循环至少会执行一次，该循环是先执行然后判断循环条件。15、窗体上有一个名称为Combo1的组合框，一个名称为Command1的命令按钮。要求编写程序，在组合框中输入一个字符串，当单击命令按钮时，将该字符串逐项与组合框中原有列表项进行比较，若有相同列表项，则将其删除；若没有相同列表项，则将其添加到组合框中。现有人编写如下程序，以期实现上述功能：PrivateSubCommand1_Click()str1=Trim(Combo1.Text)flag=0Ifstr1＜＞""ThenFori=0ToCombo1.ListCount-1Ifstr1=Combo1.List(i)ThenCombo1.RemoveItemi:Combo1.Text=""flag=1EndIfNextIfflag=1ThenCombo1.AddItemCombo1.TextEndIfEndSub程序中存在问题，以下关于程序问题的叙述中，正确的是A、For循环的循环初值i应该从1开始B、语句Combo1.RemoveItemi有错误C、语句Combo1.AddItemCombo1.Text有错，Combo1.Text的内容已存在于组合框中D、应把程序倒数第3行中的Ifflag=1改为Ifflag=0标准答案：D知识点解析：本题中首先用一个循环遍历组合框的所有列表项，依次取出每一个列表项与str1进行比较，若相同则删除该项，将flag置为1，否则flag为0；循环结束后如果flag的值为0则说明没有任何一个现有的列表项与str1相同，需要将str1添加到组合框中，否则不需添加。16、窗体上有一个名称为Text1的文本框，一个名称为Commandl的命令按钮。命令按钮的单击事件过程如下：PrivateSubCommand1．Click()DimxlAsInteger,x2AsInteger,x3AsInteger．S=Trim(Textl．Text)strLen=Len(s)Fori=1TostrLenC=Mid(s，i，1)SelectCasexCase“0”To”9”x1=x1+1Case“A”Tb“Z”x2=x2+1Case“A、s是去掉文本框中字符串末尾的空格B、SelectCasec有误，Case后应该是一个表达式C、各Case分支条件有误，不能用To表示字符的取值区间D、x4是字符串中非字母、非数字字符的个数标准答案：D知识点解析：Tilm函数的作用是去掉文本框中字符串两端的空格；多分支控制结构又称为SelectCase语句或Case语句，可以同时对条件的多个取值来判断，Case后面的表达式可采用3种形式：①表达式1[，表达式2]…②表达式lTo表达式2：③Is关系运算表达式。最终x1是字符串中数字的个数；x2是字符串中大写字母的个数：x3是字符串中小写字母的个数；x4是字符串中非字母、非数字字符的个数。17、己知列表框控件List1中已放入若干表项，下列关于List1的叙述中错误的是A、第一个表项的序号为0B、没有选中任何一个表项时，Listlndex属性的值为－1C、最后一个表项的序号为ListCountD、可用MultiSelect属性设置是否可多选标准答案：C知识点解析：列表框的List属性是一个字符串数组，数组的一项就是一个列表项目，可以通过下标访问数组中的值。ListIndex属性可返回当前所选项目的索引号，其起始值为0，最后一项的值为ListCount-1。当ListIndex的值为-1时，表示未选定项目。可用MultiSelect属性设置是否可多选。18、窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：PrivateSubCommand1_Click()DimxAsInteger，yAsIntegerStaticzAsIntegerx=3：y=5：z=yCallf(x，y，z)Printx；y；zEndSubPrivateSubffByValaAsInteger，ByRefbAsInteger，cAsInteger)a=a+a：b=b+b：c=c+cEndSub运行程序，单击命令按钮时，3个标签中显示的内容分别是A、355B、3510C、3105D、31010标准答案：D知识点解析：在VisualBaSic中调用过程时，参数有两种传递形式：按值传递(Byval)和按址传递(Byref)，默认为按址传递。其中，当参数按址传递时，如果在引用该参数的过程中改变了形参的值，同时也就改变了传递参数时实参变量的值。本题中f的参数a是按值传递的，b和c是按地址传递的，因此在f中对a的改变不会影响实参x，对b和c的操作会影响实参x和y。19、设有下面程序代码：PdvateSubCommandl_Click()Dim．aAsVarianta=Array(22，43，23，56，87，45，67，12，98，98，56，34，23，75，64)m=a(0)n=mFork=1ToUBound(aIfa(k)>mThenn=m：m=a(k)Elselfa(k)>nAnda(k)＜＞mThenn=a(k)EndIfNextkPrintnEndSub程序运行时的输出是A、数组中最大的数(即98)B、数组中最小的数(即12)C、数组中第2大的数(即87)D、数组中第1个数(即22)标准答案：C知识点解析：本题显然是求取数组最大值的，先取得数组的第一个元素作为最大值，然后用m保存最大值；在循环中如果发现了有比m还大的数组元素，则将该元素作为新的最大值，原来的最大值m赋值给n；如果元素不比m大就去比较元素是否大于n，若大于n则将元素赋值给n，所以循环结束后n中的值是数组中第2大的数。20、下列不包含滚动条的控件是A、列表框B、标签C、组合框D、文本框标准答案：B知识点解析：列表框和组合框当其项目较多时均会自动出现滚动条以便用户能够查看每～项；文本框可以通过设置ScrollBars属性来设置滚动条，标签没有滚动条。21、窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为“计算”的命令按钮Commandl，并编写了以下下程序：PrivateSubCommandl_Click()EndSubPublicSubcalc(xAsInteger，yAsInteger)Text1．Text=x*yEndSub运行程序，单击“计算”按钮，可根据速度与时间计算出距离，并显示计算结果。对以上程序，下列叙述中正确的是A、过程调用语句不对，应为calc(HV，HT)B、过程定义语句的形式参数不对，应为Subcalc(xAsControl，yAsContro1)C、计算结果在文本框中显示出来D、程序不能正确运行标准答案：C知识点解析：本题考查控件属性和过程调用。在Commandl的Click事件过程中，调用calc过程，传入的参数是两个滚动条的value值。在calc过程中，把x和y的乘积(距离)显示在文本框当中。22、如果改变驱动器列表框的Drive属性，则将触发的事件是A、ChangeB、ScrollC、KeyDownD、KeyUp标准答案：A知识点解析：驱动器列表框(DriveLfistBox)用来显示当前系统中所有有效磁盘驱动器的列表。驱动器列表框的：Drive属性用于设置或返回选择的驱动器，设置时只能通过代码设置而不能在属性窗口中设置。程序运行时，当从驱动器列表框中选择一个新的驱动器或通过代码改变其Drive属性值将触发其Change事件。23、假定建立了一个名为Commandl的命令按钮数组，则以下说法中错误的是A、数组中每个命令按钮的名称(Name属性)均为CommandlB、数组中每个命令按钮的标题(Caption属性)都一样C、数组中所有命令按钮可以使用同一个事件过程D、用名称Commandl(下标)可以访问数组中的每个命令按钮标准答案：B知识点解析：本题考查控件数组。选项B)中，命令按钮控件数组的Caption属性不一定相同，可以单独分别设置，其他选项均正确。24、以下不属于VisualBasic数据文件的是A、顺序文件B、随机文件C、数据库文件D、二进制文件标准答案：C知识点解析：根据数据性质，文件可分为程序文件和数据文件；根据数据的存取方式和结构，文件可分为顺序文件和随机文件；根据数据的编码方式，文件可以分为ASCII文件和二进制文件两种。25、窗体上：有Commandl、Command2两个命令按钮。现编写以下程序：OptionBase0Dima()AsInteger,mAsIntegerPrivateSubCortmaandlClick()