VB考试题库,二级习题(含答案)
计算机二级VB考试题及答案
计算机二级VB考试题及答案为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是搜索的计算机二级VB考试题及答案，供参考练习，预祝考生们考出自己理想的成绩!1.在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：Private Sub Command1_Click( )n = Val(Text1.Text)If n2 = n/2 Thenf = f1(n)Elsef = f2(n)End IfPrint f; nEnd SubPublic Function f1(ByRef x)x=x*xf1=x+xEnd FunctionPublic Function f2(ByVal x)x=x*xf2=x+x+xEnd Function程序运行后，在文本框中输入3，然后单击命令按钮，窗体上显示的是(D)(单)A.72 36B.108 36C.72 6D.27 32.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )c = "1234"For i = 1 To 4c1 = Trim(Str( ))Print c1Next iEnd Sub程序运行后，单击命令按钮，要求在窗体上显示如下内容 121231234则在下划线处应填入的内容为(B)(单)A.Right(c1,i)B.Left(c1,i)C.Mid(c1,i,1)D.Mid(c1,i,i)3.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Private Sub Command1_Click( )n = Val(Text1.Text)For i = 2 To nFor j = 2 To sqr(i)If i Mod j = 0 Then Exit ForNext jIf j >Sqr(i) Then Print iNext iEnd Sub该事件过程的功能是(C)(单)A.输出n以内的奇数B.输出n以内的偶数C.输出n以内的素数D.输出n以内能被j整除的数4.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function f(m As Integer)If m Mod 2 = 0 Thenf = mElsef = 1End IfEnd FunctionPrivate Sub Command1_Click( )Dim i As Integers = 0For i = 1 To 5s = s + f(i)NextPrint sEnd Sub程序运行后，单击命令按钮，在窗体上显示的是(C)(单)A.11B.10C.9D.85.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是(D)(单)A.15B.14C.13D.126.Visual Basic应用程序中标准模块文件的扩展名是【BAS 或.BAS】(注意不要写点)。
【最全最详细】国家二级VB程序设计题及答案
Vb专项练习第一套题目1、打开“考生文件夹\96\工程1.vbp”，完善程序并保存。
实现功能：假设有一个5位数密码。
只记得密码为67□□8，其中百位和十位的数字记不清了，但知道该密码能够被78整除，也能被67整除。
请完善算法帮忙找出这个密码。
''请不要更改源程序的结构，删除原题里的①、②、③。
填写正确的代码，使程序完善Private Sub Command1_Click()Dim x As LongFor x = ① To 67998 Step 10If (x Mod 67 = 0) And (x Mod 78 = 0) ThenPrint ②End If③End Sub2、“考生文件夹\51\工程1.vbp”是采用“穷举法”求出所有水仙花数的程序，请完善程序并保存。
说明：若一个三位数abc，满足：abc=a3+b3+c3，则称abc为水仙花数。
如三位数153满足：13+53+33=1+125+27=153，则153是水仙花数。
'请不要更改源程序的结构，删除原题里的①、②、③。
填写正确的代码，使程序完善Private Sub Command1_Click()Dim i, a, b As IntegerFor i = 100 To ①a = i \ 100b = (i - a * 100) \ 10c = ②If a * a * a + b * b * b + c * c * c = i ThenPrint CStr(i)③Next iEnd Sub3、打开“考生文件夹\12\工程1.vbp”，完善程序并保存。
实现功能：在Text1中输入一个代表秒数的整数后，单击“计算”按钮后，在Label1、Label2、Label3中显示对应的小时、分钟和秒数。
如在Text1中输入“3672”，Label1、Label2、Label3中分别显示“1”、“1”、“12”，即1小时1分12秒。
全国计算机二级考试《VB》操作试题及答案
全国计算机二级考试《VB》操作试题及答案全国计算机二级考试《VB》操作试题及答案全国计算机等级考试（National Computer Rank Examination，简称NCRE），是在1994年，经原国家教育委员会（现教育部）批准，由教育部考试中心主办，面向社会，用于考查应试人员计算机应用知识与能力的全国性计算机水平考试体系。
以下是店铺整理的全国计算机二级考试《VB》操作试题及答案，希望对大家有帮助。
一、基本操作题(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条，并在属性窗口中设置它的属性值，使其满足下列要求：它的最小刻度值为1，最大刻度值为100，在程序运行时，用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。
再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp，窗体文件名为sjtl.frm。
(2)在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框，初始内容均为空;再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Copy和Clear，标题分别为“复制”、“清除”，请编写适当的事件过程，使得在程序运行时，单击“复制”选项菜单，则把Textl中的内容复制到Text2中，单击“清除”选项菜单，则清除Text2中的内容(即在Text2中填入空字符串)。
运行时的窗体如图所示。
要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sit2.vbp，窗体文件名为sjt2.frm。
二、简单应用题(1)在考生文件夹F有一个工程文件sjt3.vbp，窗体上已经有一个标签Labell，请添加一个单选按钮数组，名称为Opl，含三个单选按钮，它们的Index属性分别为0、1、2，标题依次为“飞机”、“火车”、“汽车”，再添加一个名称为T extl的文本框。
计算机二级vb考试题库及答案
计算机二级vb考试题库及答案计算机二级vb考试题库一及答案1.下列关于栈的叙述正确的是(D)A)栈是非线性结构B)栈是一种树状结构C)栈具有先进先出的特征D)栈具有后进先出的特征2.若某二叉树的前序遍历访问顺序是abdgcefh，中序遍历访问顺序是dgbaechf，则其后序遍历的结点访问顺序是(D)A)bdgcefhaB)gdbecfhaC)bdgaechfD)gdbehfca3.根据数据结构中各数据元素之间前后件关系的复杂程度，一般将数据结构分成(C)A)动态结构和静态结构B)紧凑结构和非紧凑结构C)线性结构和非线性结构D)内部结构和外部结构4.下面对对象概念描述错误的是(A)A)任何对象都必须有继承性B)对象是属性和方法的封装体C)对象间的通讯靠消息传递D)操作是对象的动态属性5.软件开发的结构化生命周期方法将软件生命周期划分成(A)A)定义、开发、运行维护B)设计阶段、编程阶段、测试阶段C)总体设计、详细设计、编程调试D)需求分析、功能定义、系统设计6.下列工具中为需求分析常用工具的是(D)A)PADB)PFDC)N-SD)DFD7.开发大型软件时，产生困难的根本原因是(A)A)大系统的复杂性B)人员知识不足C)客观世界千变万化D)时间紧、任务重8.下述关于数据库系统的叙述中正确的是(A)A)数据库系统减少了数据冗余B)数据库系统避免了一切冗余C)数据库系统中数据的一致性是指数据类型一致D)数据库系统比文件系统能管理更多的数据9.单个用户使用的数据视图的描述称为(A)A)外模式B)概念模式C)内模式D)存储模式10.关系数据库管理系统能实现的专门关系运算包括(B)A)排序、索引、统计B)选择、投影、连接C)关联、更新、排序D)显示、打印、制表计算机二级vb考试题库二及答案1.以下程序段运行的结果为(B)Private Sub Form_Click( )MyDate = #7/21/1997#Print Format(MyDate, "m/d/yy")Print Format(MyDate,"yyyy年m月dd日")End SubA.7/21/97 1997年7月21日B.7-21-97 1997年7月21日C.97/7/21 1997年7月21日D.7/21/97 97年7月21日2.以下程序段运行的结果为(B)Private Sub Form_Click( )MyTime = #9:21:30 PM#MyDate = #7/21/1997#Print Tab(2); Format(MyDate, "mmmm-yy")Print Tab(2); Format(MyTime, "hh:mm:ss A/P") End SubA.July-97 9:21:30 PB.July-97 09:21:30 PC.07-97 9:21:30 PD.July-97 9:21:303.以下程序段运行的结果为(C)Private Sub Form_Click( )MyDate = #7/21/1997#Print Format(MyDate, "dddd,mmmm,dd,yyyy")End SubA.21,07,1997B.21,07,21,1997C.Monday,July,21,1997D.Monday,07,21,19974.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocus( )If Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为(B)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示5.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocus( )If Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入数字123456之后，单击命令按钮，结果为(A)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示6.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_Click( )Dim I As IntegerIf Text1.Text "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"Gong"，则程序运行结果为(A)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示7.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_Click( )Dim I As IntegerIf Text1.Text "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"gong"，则程序运行结果为(B)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示8.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_Click( )Dim I As IntegerIf Text1.Text "Gong" ThenI = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")If I 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"123"，显示"密码错误"对话框，关于此对话框描述正确的是(A)A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是”按钮D.以上说法都不正确9.在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为command1的命令按钮，编写如下代码：Private Sub Command1_Click( )Dim x!, y!, z!, t!x = Text1y = Text2z = Text3If x y Thent = xx = yy = tEnd IfIf y z Thent = yy = zz = tIf x y Thent = xx = yy = tEnd IfEnd IfLabel1.Caption = x "," y "," zEnd Sub当在文本框text1、text2 和 text3 中分别输入5、3和8，则标签显示的结果为(C)A.3,5,8B.5,3,8C.8,5,3D.3.8.510.以下程序段：Private Sub Form_Load( )Dim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数")) Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = ""Result = Num1 * Num2Case 4Op = ""Result = Num1 / Num2End SelectLabel1= Num1 Op Num2 "=" ResultEnd Sub窗体运行后，输入1，则label1的标题显示结果为(A)A.3+2=5B.3-2=1C.32=6D.32=1.5看了“计算机二级vb考试题库及答案”。
全国计算机二级VB试题及答案
下面的138道题目，在二级考试中命中率极高。
一、选择题(1) 下面叙述正确的是(C)A. 算法的执行效率与数据的存储结构无关B. 算法的空间复杂度是指算法程序中指令（或语句）的条数C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止D. 以上三种描述都不对(2) 以下数据结构中不属于线性数据结构的是(C)A. 队列B. 线性表C. 二叉树D. 栈(3) 在一棵二叉树上第5层的结点数最多是(B) 注：由公式2k-1得A. 8B. 16C. 32D. 15(4) 下面描述中，符合结构化程序设计风格的是(A)A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑B. 模块只有一个入口，可以有多个出口C. 注重提高程序的执行效率D. 不使用goto语句(5) 下面概念中，不属于面向对象方法的是 (D) 注：P55-58A. 对象B. 继承C. 类D. 过程调用(6) 在结构化方法中，用数据流程图（DFD）作为描述工具的软件开发阶段是(B)A. 可行性分析B. 需求分析C. 详细设计D. 程序编码(7) 在软件开发中，下面任务不属于设计阶段的是(D)A. 数据结构设计B. 给出系统模块结构C. 定义模块算法D. 定义需求并建立系统模型(8) 数据库系统的核心是(B)A. 数据模型B. 数据库管理系统C. 软件工具D. 数据库(9) 下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中，数据的物理结构必须与逻辑结构一致(10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注：P108A. 内模式B. 外模式C. 概念模式D. 逻辑模式(11) 算法的时间复杂度是指(C)A. 执行算法程序所需要的时间B. 算法程序的长度C. 算法执行过程中所需要的基本运算次数D. 算法程序中的指令条数(12) 算法的空间复杂度是指(D)A. 算法程序的长度B. 算法程序中的指令条数C. 算法程序所占的存储空间D. 算法执行过程中所需要的存储空间(13) 设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B) 注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出A. 349B. 350C. 255D. 351(14) 结构化程序设计主要强调的是(B)A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性(15) 在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D) 注：即第一个阶段A. 概要设计B. 详细设计C. 可行性分析D. 需求分析(16) 数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。
计算机二级考试VB练习题及答案
计算机二级考试VB练习题及答案计算机二级考试VB练习题及答案为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是店铺搜索整理的计算机二级考试VB练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!计算机二级考试VB练习题及答案1.以下程序是求最大公约数和最小公倍数的程序，在【】处填写合适的关系运算符。
Private Sub Form_Click( )Dim m1, n1, m, n, r As Integern1 = InputBox("输入自然数n", "输入数")m1 = InputBox("输入自然数m", "输入数")n = n1m = m1If m<n p="" then<="">t = m: m = n: n = tEnd Ifr = m Mod nDo While r 【<>】 0m = nn = rr = m Mod nLoopPrint "最大公约数=", nPrint "最小公倍数= ", m1 * n1 / nEnd Sub2.下面是求100以内素数的程序。
Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod 【i】 = 0 Then tag = FalseNext iIf tag Then Print mNext mEnd Sub3.下面是求100以内素数的程序，下面说法正确的是(A)(单)Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod i = 0 Then tag = FalseNext iIf tag=true Then Print mNext mEnd SubA.tag为true时，表示m是素数B.tag为false时，表示m是素数C.语句m Mod i = 0，说明m是素数D.以上说法都不正确4.百元买百鸡问题：假定小鸡每只5角,公鸡每只2元，母鸡每只3元。
国家二级(VB)机试模拟试卷200(题后含答案及解析)
国家二级（VB）机试模拟试卷200(题后含答案及解析) 题型有：1. 选择题 2. 基本操作题 3. 简单应用题 4. 综合应用题选择题1．不能正确表示条件”两个整型变量A和B之一为0，但不能同时为0”的布尔表达式是( )。
A．A*B=0 and A+B＜＞0B．(A=0 or B=0)and(A＜＞0 or B＜＞0)C．not(A=0 And B=0)and(A=0 or B=0)D．A*B=0 and(A=0 or B=0)正确答案：D解析：考查VB的表达式。
选项A中由于A*B=0，因此A为0或者B为0，或者A、B同时为O，而A+B＜＞，恰好排除了A、B同时为0的条件，因此符合条件描述；选项B中恰好描述了条件中的问题；选项C描述的A、B同时为0的取非，也就是同时为0不成立，然后再加上A或者B其中一个为0，符合条件描述；选项D中前面条件和选项A相同，但是后面不能排除二者同时为0的条件。
2．下面是求最大公约数的函数的首部( )。
Function fun(By Val x As Integer，ByVal y As Integer)As Integer若要输出8、12、16这3个数的最大公约数，下面正确的语句是A．Print fun(8，12)，fun(12，16)，fun(16，8)B．Print fun(8，12，16)C．print fun(8，12)，fun(12，16)，fun(16)D．Print fun(8，fun(12，16))正确答案：D解析：函数过程在传递参数时，形参表与实参表中对应变量的名字不必相同，但参数的个数、对应位置和对应类型必须相同。
本题中的fun函数有两个参数，任何对于fun的调用都必须传递实参为两个整型值；选项A)中得到3个结果，显然不是我们所需要的；选项D)中的函数嵌套调用能够求出3个数的最大公约数。
3．设已经在窗体上添加了一个通用对话框控件CommonDialogl，以下语句正确的是( )。
全国计算机二级VB试题
下面的138道题目，在二级考试中命中率极高。
一、选择题(1) 下面叙述正确的是(C)A. 算法的执行效率与数据的存储结构无关B. 算法的空间复杂度是指算法程序中指令（或语句）的条数C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止D. 以上三种描述都不对(2) 以下数据结构中不属于线性数据结构的是(C)A. 队列(3)(4)A.(5)A. 对象(6)A.(7)A.C.(8)A. 数据模型B. 数据库管理系统C. 软件工具D. 数据库(9) 下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中，数据的物理结构必须与逻辑结构一致(10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注：P108A. 内模式B. 外模式C. 概念模式D. 逻辑模式(11) 算法的时间复杂度是指(C)A. 执行算法程序所需要的时间B. 算法程序的长度C. 算法执行过程中所需要的基本运算次数D. 算法程序中的指令条数(12) 算法的空间复杂度是指(D)A. 算法程序的长度B. 算法程序中的指令条数C. 算法程序所占的存储空间D. 算法执行过程中所需要的存储空间(13)(14)A.C.(15)(D)A.(16)A.(17)以及A.(18) 下述关于数据库系统的叙述中正确的是(A)A. 数据库系统减少了数据冗余B. 数据库系统避免了一切冗余C. 数据库系统中数据的一致性是指数据类型的一致D. 数据库系统比文件系统能管理更多的数据(19) 关系表中的每一横行称为一个(A)A. 元组B. 字段C. 属性D. 码(20) 数据库设计包括两个方面的设计内容，它们是(A)A. 概念设计和逻辑设计B. 模式设计和内模式设计C. 内模式设计和物理设计D. 结构特性设计和行为特性设计(21) 下列叙述中正确的是(A)A. 线性表是线性结构B. 栈与队列是非线性结构C. 线性链表是非线性结构D. 二叉树是线性结构(22)A.C.(23)A.C.(24)A.C.(25)A.C.(26)A. 工具B. 过程C. 方法D. 环境(27) 程序流程图（PFD）中的箭头代表的是(B) 注：P81A. 数据流B. 控制流C. 调用关系D. 组成关系(28) 在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
V B考试题库,二级习题(含答案)work Information Technology Company.2020YEARVB考试一1、能够获得一个文本框中被选取文本的内容的属性是______。
A：SelStart B：SelLength C：SelText D：Text参考答案：C2、在窗体上画一个文本框，其名称为Text1，为了在程序运行后隐藏该文本框，应当使用的语句为：______。
A：Text1.Enabled = False B：Text1.HideC：Text1.Clear D：Text1.Visible = False参考答案：D3、对于语句 If x=1 Then y=1, 下列说法正确的是____。
A： x=1和y=1 均为赋值语句B： x=1和y=1 均为关系表达式C： x=1为赋值语句，y=1为关系表达式D： x=1为关系表达式，y=1 为赋值语句参考答案：D4、以下变量名中，______是不符合Visual Basic的命名规范的。
A：_mnu_Open_234 B：Abc901 C：price_ D：K参考答案：A5、MsgBox 函数返回值的类型是__________。
A：数值或字符串 B：字符串 C：变体 D：整型数值参考答案：D6、VB一共有设计、运行和中断三种模式，要使用调试工具应该______。
A：进入中断模式 B：进入运行模式C：进入设计模式 D：不用进入任何模式参考答案：A7、设a=6，则执行x=IIF(a>5,-1,0) 后，x的值为______。
A：-1 B：6 C：0 D：5参考答案：A8、可以同时删除字符前导和尾部空白的函数是______。
A：Mid B：Rtrim C：Trim D：Ltrim参考答案：C9、以下语句的输出结果是______。
Print Format$("32548.5","000,000.00")A：32,548.5 B：32548.5 C：032,548.50 D：32,548.50参考答案：C10、设有如下声明：Dim X As Integer如果Sgn(X)的值为-1，则X的值是______。
A：等于0的整数 B：大于0的整数 C：整数 D：小于0的整数参考答案：D11、在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()For i = 1 To 4x = 4For j = 1 To 3x = 3For k = 1 To 2x = x + 6Next kNext jNext iPrint xEnd Sub程序运行后，单击命令按钮，输出结果是______。
参考答案： 15# 15 #15 #1512、执行下面的程序段后，S的值为______。
s=5For i=2.6 To 4.9 Step 0.6s=s+1Next i参考答案：913、下列表达式有错误,正确的写法应该是______。
[(a+b)+c]/80-5÷(d+e)参考答案：(a+b+c)/80-5/(d+e)#（a+b+c）/80-5/（d+e）14、表示x 是5的倍数或是9的倍数的逻辑表达式为__________参考答案：x Mod 5 = 0 Or x Mod 9 = 0#x Mod 9 = 0 Or x Mod 5 = 015、以下程序的功能是:从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，输出结果。
请填空。
Private Sub Form_click()Dim x, y As SingleDim z As Integerx = InputBox("Enter a score")Do while x>=0y = y + xz = z + 1x = InputBox("Enter a score")LoopIf z = 0 Thenz = 1End Ify = ______Print yEnd Sub参考答案：y/zVB考试二1、列表框中的列表项的数目可以通过以下哪个属性的值获得______。
A：ListIndex B：ListCount C：Count D：Index参考答案：B2、在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。
列表框中显示若干城市的名称。
当单击列表框中的某个城市名时，在标签中显示选中城市的名称。
下列能正确实现上述功能的程序是______。
A：Private Sub List1_Click()Label1.Caption=List1.TextEnd SubB：Private Sub List1_Click()=List1.ListIndexEnd SubC：Private Sub List1_Click()=List1.TextEnd SubD：Private Sub List1_Click()Label1.Caption=List1.ListIndexEnd Sub参考答案：A3、在列表框中当前被选中的列表项的序号是由下列哪个属性表示______。
A：Listindex B：Index C：List D：Tabindex参考答案：A4、为了清除列表框中的所有内容，应使用的方法是：______。
A：Clear B：Remove C：RemoveItem D：Cls参考答案：A5、在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为______。
A：For i=1 To List1.ListCount……NEXTB：For i=0 To List1.Count-1……NEXTC：For i=0 To List1.ListCount-1……NEXTD：For i=1 To List1.Count……NEXT参考答案：C6、设有如下程序：Option Base 0Private Sub Form_Click()Dim aDim i As Integera = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)For i = 0 To 3Print a(5 - i);NextEnd Sub程序运行后，单击窗体，则在窗体上显示的是______。
A： 6 5 4 3 B： 5 4 3 2 C： 4 3 2 1 D： 7 6 5 4参考答案：A7、设执行以下程序段时依次输入1、3、5，执行结果为______。
Dim a(4) As Integer, b(4) As IntegerFor K = 0 To 2a(K + 1) = Val(InputBox("请输入数据"))b(3 - K) = a(K + 1)Next KPrint b(K)A： 0 B： 3 C： 5 D： 1参考答案：D8、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click()Dim i As Integer,j As IntegerDim a(10,10) As IntegerFor i=1 To 3For j=1 To 3a(i,j)=(i-1)*3+jPrint a(i,j);Next jPrintNext iEnd Sub程序运行后，单击命令按钮，窗体上显示的是______。
A： 1 2 34 5 67 8 9B： 2 3 43 4 54 5 6C： 1 4 72 5 83 6 9D： 1 2 32 4 63 6 9参考答案：A9、用下面的语句所定义的数组的元素个数是：______。
Dim arr(3 To 5,-2 to 2)A：24 B：12 C：15 D：20参考答案：C10、下列______语句可以为动态数组分配实际元素个数。
A：static语句 B：Dim语句 C：public语句 D：ReDim语句参考答案：D11、假定程序中有以下语句：answer = MsgBox("String1",,"String2","String3",2)执行该语句后，将显示一个信息框，此时如果单击"确定"按钮，则answer的值为：______。
A：String3 B：String2 C：String1 D：1参考答案：D12、设有语句x=InputBox("输入数值","0","示例")程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是______。
A：0是默认值B：变量X的值是字符串"10"C：在InputBox对话框标题栏中显示的是"示例"D：变量X的值是数值10参考答案：B13、以下程序段运行的结果是：______。
Dim a(-1 To 5) As BooleanDim flag As Booleanflag = FalseDim i As IntegerDim j As IntegerDo Until flag = TrueFor i = -1 To 5j = j + 1If a(i) = False Thena(i) = TrueExit ForEnd IfIf i = 5 Thenflag = TrueEnd IfNextLoopPrint jA：20 B：7 C：8 D：35参考答案：D14、设a=5，b=6，c=7，d=8，则执行下列语句后，x的值为：______。
x= IIF((a>b) And (c<d),10,20)A：300 B：20 C：30 D：10参考答案：B15、要将一个组合框设置为简单组合框（Simple Combo），则应将其Style属性设置为______。
A：0 B：1 C：3 D：2参考答案：BVB考试三1、设组合框Combo1中有3个项目，则以下能删除最后一项的语句是______。
A：Combo1.RemoveItem Combo1.ListcountB：Combo1.RemoveItem 2C：Combo1.RemoveItem 3D：Combo1.RemoveItem Text参考答案：B 题分：62、在窗体上画一个命令按钮，其名称为Command1，然后编写如下程序：Function Func(ByVal x As Integer, y As Integer)y = x * yIf y > 0 ThenFunc = xElseFunc = yEnd IfEnd FunctionPrivate Sub Command1_Click()Dim a As Integer, b As Integera = 3b = 4c = Func(a, b)Print "a="; aPrint "b="; bPrint "c="; cEnd Sub程序运行后，单击命令按钮，其输出结果为：______。