二级VISUAL+BASIC笔试-323
二级VISUAL BASIC笔试-323(总分：100.00，做题时间：90分钟)一、选择题(总题数：35，分数：70.00)1.设a=5，b=6，c=7，d=8，执行下列语句后，x的值为( )。
x=IIf((a＞b)And(c＞d)，10，20)（分数：2.00）A.10B.20 √C.TrueD.False解析：2.下列哪个是满足要求的正确表达式：年龄在20到60之间(包括年龄20～60在内)或工资少于500的女职工( )。
（分数：2.00）A.20仁年龄＜=60and工资＜500 or 性别="女"B.20＜年龄＜60and工资＜500 or 性别="女"C.20＜年龄and年龄＜60 or 工资＜500 and 性别="女"D.(20＜=年龄and年龄＜=60 or 工资＜500)and性别="女" √解析：3.以下关于过程的叙述中，错误的是( )。
（分数：2.00）A.事件过程是由某个事件触发而执行的过程B.函数过程的返回值可以有多个√C.可以在事件过程中调用通用过程D.不能在事件过程中定义函数过程解析：4.设有如下通用过程：Public FunctionFun(x Str As String)As StringDimtStr As String，strL As IntegertStr=""strL=Len(xStr)i=1DoWhilei＜=strL/2tStr=tStr&Mid(xStr,i，1)&Mid(xStr,strL-i+1，1)"i=i+1LoopFun=tStrEnd Function在窗体上画一个名称为Text1的文本框和一个名称为Commandl的命令按钮。
然后编写如下的事件过程：Private Sub Commandl_Click()Dim S1 As StringS1="abcdef"Text1.Text=UCase(Fun(S1))End Sub程序运行后，单击命令按钮，则Text1中显示的是( )。
（分数：2.00）A.ABCDEFB.abcdefC.AFBECD √D.DEFABC解析：5.单击一次命令按钮后，下列程序的执行结果是( )。
Private Sub Commandl_Click()s=P(1)+P(2)+P(3)+P(4)Print sEnd SubPublic FunctionP(N As Integer)Static SumFori=1To NSum=Sum+iNextiP=SumEnd Function（分数：2.00）A.15B.25C.35 √D.45解析：6.表达式3^2*2+3MODl0/4的值是( )。
（分数：2.00）A.18B.1C.19 √D.0解析：7.执行如下语句：a=InputBox("Today","Tomorrow","Yesterday"，"Daybefore yesterday",5) 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。
（分数：2.00）A.TodayB.TomorrowC.Yesterday √D.DaybefOreyesterday解析：8.如下有一段不完整的程序段，如果要求该程序执行3次循环，则在程序中的空白处要填入( )。
x=1Dox=x+3PrintxLoopUntil______（分数：2.00）A.x＞=8 √B.X＜=8C.x＞=7D.X＜=7解析：9.下面说法不正确的是( )。
（分数：2.00）A.滚动条的重要事件是Change和ScrollB.框架的主要作用是将控件进行分组，以完成各自相对独立的功能C.组合框是组合了文本框和列表框的特性而形成的一种控件D.计时器控件可以通过对Visible属性的设置，在程序运行期间显示在窗体上√解析：10.在窗体上画一个名称为Labe11、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timerl的计时器控件，并把其Interval属性设置为500，如下图所示。
编写如下程序：Private Sub Form_Load()Timer1.Ena bled=FalseEnd SubPrivate Sub Commandl_ChCk()Timer1.Enabled=TrueEnd SubPrivate Sub Command2_Click()Timer1.Enabled=FalseEnd SubPdvate Sub Tlmerl_Timer()If Labe11.LeftLabe11.Left=Labe11.Left+20ElseLabe11.Left=0End IfEnd Sub程序运行后单击“开始”按钮，标签在窗体中移动。
对于这个程序，以下叙述中错误的是( )。
（分数：2.00）A.标签的移动方向为自右向左√B.单击“停止”按钮后再单击“开始”按钮，标签从停止的位置继续移动C.当标签全部移出窗体后，将从窗体的另一端出现，重新移动D.标签按指定的时间间隔移动解析：11.“按相同大小制作”多个控件时，( )是制作的基准。
（分数：2.00）A.被锁定的控件B.第十个控件C.最后一个控件D.主控件√解析：12.为使Print方法在Form_Load事件中起作用，可以对以下( )属性进行设置。
（分数：2.00）A.AutoReDrawB.BackColorC.MoveableD.Caption √解析：13.以下可以作为VisualBasic变量名的是( )。
（分数：2.00）A.A#AB.counstA √C.3AD.?AA解析：14.在窗体上画一个名称为Text1的文本框，并编写如下程序：Private Sub Form_Load()ShowText1.Text="Text1.SetFocusEnd SubPhvate Sub Form_MouseUp(Buuon As Integer,Shift As Integer,X As Single，Y As Single) Phnt“程序设计”End SubPrivate Sub Textl_KeyDown(KeyCode As Integer,Shift As Integer)Print"Visual Basic"：End Sub程序运行后，如果按“A”键，然后单击窗体，则在窗体上显示的内容是( )。
（分数：2.00）A.Visual BasicB.程序设计C.A程序设计D.VisualBasic程序设计√解析：15.只能用来显示字符信息的控件是( )。
（分数：2.00）A.文本框B.标签框√C.图片框D.图像框解析：16.在窗体上画一个名称为List1的列表框，一个名称为Labe11的标签。
列表框中显示若干城市的名称。
当单击列表框中的某个城市名时，在标签中显示选中城市的名称。
下列能正确实现上述功能的程序是( )。
（分数：2.00）A.B.C.D. √解析：17.以下叙述中错误的是( )。
（分数：2.00）A.在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件√B.以.BAS为扩展名的文件是标准模块文件C.窗体文件包含该窗体及其控件的属性D.一个工程中可以含有多个标准模块文件解析：18.与传统的程序设计语言相比，Visual Basic最突出的特点是( )。
（分数：2.00）A.结构化程序设计B.程序开发环境C.程序调试技术D.事件驱动编程机制√解析：19.下列程序段的执行结果为( )。
a=95if a＞60ThenI=1if a＞70Thenl=2if a＞80Thenl=3if a＞90ThenI=4Print"I="；I（分数：2.00）A.I=1B.I=2C.I=3D.I=4 √解析：20.要强制显示声明变量，可在窗体模块或标准模块的声明段中加入语句( )。
（分数：2.00）A.Option Base0B.Option Explicit √C.Option BaselD.Option Compare解析：21.若要使用户不能修改文本框TextBoxl中显示的内容，应设置( )属性。
（分数：2.00）A.Locked √B.MultiLineC.PassWordCharD.ScrollBar解析：22.程序启动未执行任何操作前，为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为Ture，这个属性是( )。
（分数：2.00）A.ValueB.Default √C.CancelD.Enabled解析：23.英文缩写“OOP'’的含义是( )。
（分数：2.00）A.事件驱动的编程机制B.结构化程序设计语言C.面向对象的程序设计√D.可视化程序设计解析：24.数据的存储结构是指( )。
（分数：2.00）A.存储在外存中的数据B.数据所占的存储空间量C.数据在计算机中的顺序存储方式D.数据的逻辑结构在计算机中的表示√解析：25.设有如下变量声明Dimtimel As Date,为变量timel正确赋值的表达式是( )。
（分数：2.00）A.timel=#11:34:04# √B.timel=Format(Time,"yymm:dd")C.timel=#，"11:34:04"#D.timel=Format("hh:mm:ss"，Time)解析：26.如果要在文本框中输入字符时，只显示某个字符，如星号(*)，应设置文本框的( )属性。
（分数：2.00）A.CaptionB.PasswordChar √C.TextD.Char解析：27.函数过程(用Function定义)与子过程(用Sub定义)的最大区别是( )。
（分数：2.00）A.函数过程有返回值√B.子过程有返回值C.函数过程可以带参数D.子过程可以带参数解析：28.能够接受Print方法的对象是( )。
(1)窗体 (2)标签 (3)标题栏 (4)立即窗口(5)图片框 (6)状态栏 (7)打印机 (8)代码窗口（分数：2.00）A.(1)(3)(5)(7)B.(2)(4)(6)(8)C.(1)(4)(5)(7) √D.(1)(2)(5)(8)解析：29.以下( )操作不能打开属性窗口（分数：2.00）A.按下F4键B.单击工具栏上的“属性窗口”按钮C.执行“视图”菜单中的“属性窗口”命令D.双击任何一个对象√解析：30.在窗体上已经添加了名为CommonDialogl控件，用Show方法显示”打开”对话框的正确方法是( )。
二级VISUAL+BASIC笔试321
二级VISUAL BASIC笔试321(总分：88.00，做题时间：90分钟)一、{{B}}选择题{{/B}}(总题数：35，分数：70.00)1.软件开发中常采用的结构化生命周期方法，由于其特征而一般称其为______。
（分数：2.00）A.层次模型B.螺旋模型C.瀑布模型√D.对象模型解析：[分析] 结构化生命周期方法是将软件生命周期的各项活动划分为若干时期，每个时期又区分为各个阶段，各阶段的工作顺序展开，恰如自上而下的瀑布，所以称之为瀑布模型。
根据对软件生命周期分析的方法和手段的不同，对软件生命周期的描述还可用演化模型、螺旋模型、喷泉模型和智能模型。
2.数据库的安全性是指保护数据库，以防止不合法的使用而造成的数据泄露、更改或破坏，下列的措施中，______不属于实现安全性的措施。
（分数：2.00）A.数据备份√B.授权规则C.数据加密D.用户标识和鉴别解析：[分析] 数据库安全性控制的常用方法；用户标识和鉴别；存取控制(印授权规则)；视图；审计；数据加密。
数据备份属于数据恢复范畴，不是实现数据安全性的措施。
3.对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为______。
（分数：2.00）A.log2nB.n/2C.nD.n+1 √解析：[分析] 对于线性表进行顺序查找，最坏的情况就是待查数据在表中不存在，即比较到表的末尾时，还要进行一次比较，所以比较次数要比表中元素的个数多1，因此答案D是正确的。
4.在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim a As Integer, s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s; a End Sub 程序运行后，单击命令按钮．则窗体上显示的内容是______。
（分数：2.00）A.7 9B.34 0C.9 7 √D.死循环解析：[分析] 当第一次进入循环体后，s=1+8=9，a=8-1=7，由于“7＜=0”的条件为假，所以只执行了一次循环就退出循环体。
二级VISUALBASIC笔试333_真题-无答案
二级VISUAL BASIC笔试333(总分94,考试时间90分钟)一、选择题下列各题A) 、B) 、C) 、D) 四个选项中，只有一个选项是正确的。
1. 在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程：Private Sub Commandl Click() Forn=1 To 20 If n Mod 3＜＞Thenm=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。
A. 15B. 18C. 21D. 242. 以下声明语句中错误的是______。
A. Constvarl=123B. Dimvar2='ABC'C. Dim intSum As IntegerD. Static var3 As Integer3. 在循环体中，可以使程序转让控制权，以便让操作系统处理其他的事件的语句是______。
A. Exit DoB. DoEventsC. EndD. Unload4. 下列不属于软件调试技术的是_______。
A. 强行排错法B. 集成测试法C. 回溯法D. 原因排除法5. 以下能正确定义数据类型TelBook的代码是______。
A. Type TelBook Name As String*10 TelNum As Integer End TypeB. Type TelBook Name As String*10 TelNum As Integer End TelBookC. Type TelBook Name String*10 TelNum Integer End Type TelBookD. Typedef TelBook NameString*10 TelNum Integer End Type6. 下列有关数据库的描述，正确的是______。
A. 数据库是一个DBF文件B. 数据库是一个关系C. 数据库是一个结构化的数据集合D. 数据库是一组文件7. 需求分析阶段的任务是确定______。
二级VISUALBASIC笔试-334_真题-无答案
二级VISUAL BASIC笔试-334(总分100,考试时间90分钟)一、选择题在下列各题的A) 、B) 、C) 、D) 4个选项中，只有1个选项是正确的。
1. 要将窗体Form1标题设为“学习VB”，以下能正确实现该功能的语句为A. ="学习VB"B. Form1.Visible="学习VB"C. Form1.Caption="学习VB"D. Form1.Show="学习VB"2. 设有关系R和S，关系代数表达式为R-(R-S)表示的是A. RNSB. R-SC. RUSD. R÷S3. 数据结构作为计算机的一门学科，主要研究数据的逻辑结构、对各种数据结构进行的运算，以及A. 数据的存储结构B. 计算方法C. 数据映象D. 逻辑存储4. 下列选项中不符合良好程序设计风格的是A. 源程序要文档化B. 数据说明的次序要规范化C. 避免滥用goto语句D. 模块设汁要保证高耦合、高内聚5. 声明一个变量为局部变量应该用A. GlobalB. PrivateC. StaticD. Public6. 下列不属于Visual Basic特点的是A. 对象的链接与嵌入B. 结构化程序设计C. 编写跨平台应用程序D. 事件驱动程序编程机制7. 在文本框中，当用户键入一个字符，能同时引发的事件是A. KeyPress和ClickB. KeyPress和LostFocusC. KeyPress和ChangeD. Change和LostFocous8. 随机文件用于读数据的语句是A. GetB. WritC. printD. Input9. 有如下程序：Private Sub Form_C1ick()E=1:F=1For j=1 To 3E=E+F:F=F+ENextPrint E;FEnd Sub该程序的输出结果是Ａ) 6 6 Ｂ) 5 8 Ｃ) 13 21 Ｄ) 34 5510. 在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码：Private Sub Command1_C1ick()Dim a(5，5)For i=1 To 3For j=1 To 4a(i，j) =i*jNextNextFor n=1 To 2For m=1 To 3Print a(m,n)；NextNextEnd Sub程序运行后，单击命令按钮，输出结果是Ａ) 2 4 6 1 2 3 Ｂ) 1 2 3 2 4 6Ｃ) 1 2 3 4 5 6 Ｄ) 6 5 4 3 2 111. 通过对话框中能打开“颜色对话框”的方法是A. ShowOpenB. ShowColorC. ShowSaveD. ShowPrinter12. 向顺序文件Temp.txt中写入1，2，3这3个数。
二级VISUAL+BASIC笔试323
二级VISUAL BASIC笔试323(总分：88.00，做题时间：90分钟)一、{{B}}选择题{{/B}}(总题数：35，分数：70.00)1.以下能够触发文本框Change事件的操作是______。
（分数：2.00）A.文本框失去焦点B.文本框获得焦点C.设置文本框的焦点D.改变文本框的内容√解析：[分析] 当在运行期间改变文本框中的文本时，将引发文本框的Change事件。
2.下面数组说明语句错误的是______。
（分数：2.00）A.Dim b(-10)As Double √B.Dim c(8, 3)As ByteC.Dim d(-10 To-1)As BooleanD.Dim e(-99 To-5, -3 To 0)解析：[分析] 选项A中的数组b下界不为0时不能这样定义，要用关键字To显式地指明下标范围；选项B中的二维数组c的数组元素个数是36，类型是字节型；选项C中的一维数组d的数组元素个数是10，类型是逻辑型；选项D中的二维数组e的数组元素个数是420，类型是可变类型。
3.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim num As Integer num=1 Do Until num＞6 Print num; num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。
（分数：2.00）A.13.45.8B.135 √C.1 4 7D.无数据输出解析：[分析] 由于变量num被定义成整型变量，所以在“Do Until-Loop”的循环中，num的计算过程为1、3、5，当为7时退出循环。
4.在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程；Private Sub Command1_Click()a $="software and hardware"b $=Right(a$, 8)c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。
二级VISUAL+BASIC笔试-322
二级VISUAL BASIC笔试-322(总分：92.00，做题时间：90分钟)一、选择题(总题数：35，分数：70.00)1.如果对一个关系实施了一种关系运算后得到了一个新的关系，而且新的关系中属性个数少于原来关系中属性个数，这说明所实施的运算关系是 ( )（分数：2.00）A.选择B.投影√C.连接D.并解析：[解析] 选择运算是对二维表进行行切割，执行后会删除某些元组。
投影运算是对二维表的列操作，执行后去除某列属性。
连接运算有选择的将两关系中取出的元组组合，属性列并不会减少。
并运算同样不会减少属性列的个数。
根据以上知识点可知选项B正确。
2.下面______不是VB的文件类控件。
( )（分数：2.00）A.DriveListBox控件B.DirListBox控件C.FileListBox控件D.MsgBox √解析：[解析] 为了管理计算机中的文件，VB 6.0提供了一组文件系统控件来帮助用户管理文件系统。
主要包括：驱动器列表框(Drive ListBox)、目录列表框(Directory List Box)和文件列表框(File ListBox)。
3.执行下面的语句后，所产生的信息框的标题是 ( )a=MsgBox(“AAAA”，“BBBB”，“”，5)（分数：2.00）A.BBBB √B.空C.AAAAD.出错，不能产生信息框解析：[解析] 奉题主要是对MsgBox函数的考查。
执行语句a＝MsgBox("AAAA"，" BBBB"，"，5)显示在对话框中的信息为 AAAA，对话框的标题是“BBBB”。
故选项A正确。
4.Date Time是一个Date类型的变量，以下赋值语句中正确的是 ( )（分数：2.00）A.DateTime="5/12/03"B.Date Time=September 1， 2003C.DateTime=#12 :15 :30 AM# √D.Date Time＝("8/8/99")解析：[解析] 表示日期类型即Date类型数据时要用“#”括起来。
全国计算机等级考试二级vb笔试试卷及参考答案（附详细解析）
全国计算机等级考试二级vb笔试试卷及参考答案（附详细解析）20XX年3月全国计算机等级考试二级vb笔试试卷及参考答案（考试时间90分钟，满分100分）一、选择题（每小题2分，共70分）（1）下列关于栈叙述正确的是A）栈顶元素最先能被删除B）栈顶元素最后才能被删除C）栈底元素永远不能被删除D）以上三种说法都不对（2）下列叙述中正确的是A）有一个以上根结点的数据结构不一定是非线性结构B）只有一个根结点的数据结构不一定是线性结构C）循环链表是非线性结构D）双向链表是非线性结构（3）某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为（假设根结点在第1层）A）3 B）4 C）6 D）7（4）在软件开发中，需求分析阶段产生的主要文档是A）软件集成测试计划B）软件详细设计说明书C）用户手册D）软件需求规格说明书（5）结构化程序所要求的基本结构不包括A）顺序结构B）GOTO跳转C）选择（分支）结构D）重复（循环）结构（6）下面描述中错误的是A）系统总体结构图支持软件系统的详细设计B）软件设计是将软件需求转换为软件表示的过程C）数据结构与数据库设计是软件设计的任务之一D）PAD图是软件详细设计的表示工具（7）负责数据库中查询操作的数据库语言是A）数据定义语言B）数据管理语言C）数据操纵语言D）数据控制语言（8）一个教师可讲授多门课程，一门课程可由多个教师讲授，则实体教师和课程间的联系是A）1:1联系B）1：m联系C）m：1联系D）m：n联系（9）有三个关系R、S和T如下：R S T AB C A1 2 B2 1 C3 1则由关系R 和S 得到关系T 的操作是A ）自然连接B ）交C ）除D ）并（10）定义无符号整数类为UInt ，下面可以作为类UInt 实例化值的是A ）-369B ）369C ）0.369D ）整数集合{1，2，3，4，5}（11）在Visual Basic 集成环境中，可以列出工程中所有模块名称的窗口是A ）工程资源管理器窗口B ）窗体设计窗口C ）属性窗口D ）代码窗口（12）假定编写了如下4个窗体事件的事件过程，则运行应用程序并显示窗体后，已经执行的事件过程是A ）LoadB ）ClickC ）LostFocusD ）KeyPress(13)为了使标签具有“透明”的显示效果，需要设置的属性是A) Caption B) Alignment C) BackStyle D) AutoSize（14）下面可以产生20-30（含20和30）的随机整数的表达式是A) Int （Rnd*10+20） B) Int （Rnd*11+20）C) Int （Rnd*20+30） D) Int （Rnd*30+20）（15）设窗体上有一个名称为HS1的水平滚动条，如果执行了语句： HS1.Value=（HS1.Max-HS1.Min ）/2+HS1.Min 则A ）滚动块处于最左端B ）滚动块处于最右端C ）滚动块处于中间位置D ）滚动块可能处于任何位置，具体位置取决于Max 、Min 属性的值（16）窗体上有一个名称为Cb1的组合框，程序运行后，为了输出选中的列表项，应使用的语句是A ）Print Cb1.SelectedB ）Print Cb1.List(Cb1.ListIndex)C ）Print Cb1.Selected.TextD ）Print Cb1.List(ListIndex)(17)为了在窗体上建立2组单选按钮，并且当程序运行时，每组都可以有一个单选按钮被选中，则以下做法中正确的是C 1 A B c 3A) 把这2组单选按钮设置为名称不同的2个控件数组B) 使2组单选按钮的Index属性分别相同C) 使2组单选按钮的名称分别相同D) 使2组单选按钮分别画到2个不同的框架中（18）如果一个直线控件在窗体上呈现为一条垂直线，则可以确定的是A）它的Y1、Y2属性的值相等B）它的X1、X2属性的值相等C）它的X1、Y1属性的值分别与X2、Y2属性的值相等D）它的X1、X2属性的值分别与Y1、Y2属性的值相等（19）设a=2,b=3,c=4,d=5,则下面语句的输出是Print 3>2*b Or a=c And b<>c Or c>dA) False B) 1 C) True D) -1(20)窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是A) Private Sub Form1_Click()…End SubB) Private Sub Form_Click()…End Sub C) Private Sub Command1_Click()…End SubD) Private Sub Command_Click()…End Sub(21)默认情况下，下面声明的数组的元素个数是Dim a（5，-2 to 2）A）20 B）24 C）25 D）30（22）设有如下程序段Dim a(10)……For Each x In aPrint x;Next x在上面的程序段中，变量x必须是A) 整型变量B）变体型变量C）动态数组D)静态数组（23）设有以下函数过程Private Function Fun(a() As Integer, b As String)As Integer …End Function若已有变量声明：Dim x(5)As Integer,n As Integer,ch As String则下面正确的过程调用语句是A. x(0)=Fun(x,"ch")B. n=Fun(n,ch)C. Call Fun x,"ch"D. n=Fun(x(5),ch)(24)假定用下面的语句打开文件：Open“Filel.txt”For Input AS #1则不能正确读文件的语句是A) Input #1 ，ch$ B) Line Input #1，ch$C) ch$=Input$(5,#1) D) Read #1 ,ch$(25)下面程序执行结果是Private Sub Command 1_Click（）a=10For k=1 To 5 Step-1a=a-kNext kPrint a ;kEnd SubA) -5 6 B) -5 -5 C)10 0 D) 10 1（26）设窗体上有一个名为Text1 的文体框和一个名为Command1 的命令按钮，并有以下事件过程：Private Sub Command 1_Click()X!=Val(Text1.Text)Select Case xCase Is <-10,Is>=20Print “输入错误”Case Is<0Print 20-xCase Is <10Print 20Case Is<=20Print x +10End SelectEnd Sub程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是A) 5 B) 20 C) 25 D) 输入错误（27）设有如下程序Private Sub Command 1_Click()X=10:y=0For i=1 To 5Dox=x-2y=y+2Loop Unti1 y>5 Or x<-1NextEnd Sub运行程序，其中Do循环执行的次数是A) 15 B) 10 C) 7 D) 3（28）阅读程序Private Sub Command 1_ ClickDim arrDim i As IntegerArr=Array (0,1,2,3,4,5,6,7,8,9,10)For i=0 To 2Printarr（7 –i）;NextEnd Sub程序运行后，窗体上显示的是：A) 8 7 6 B) 7 6 5C) 6 5 4 D) 5 4 3（29）在窗体上画一个名为Command 1的命令按钮，然后编写以下程序：Private Sub Command 1_Click()Dim a(10) As IntegerFor k=10 TO 1 Step -1a（k）=20-2*kNext kK=k+7Print a(k-a(k))End Sub运行程序，单击命令按钮，输出结果是A) 18 B) 12 C)8 D)6(30)窗体上有一个名为Command 1 的命令按钮，并有如下程序：Private Sub Command 1_Click()Dim a(10),x%For k=1 To 10a(k)=Int(Rnd*90+10)x=x+a(k) Mod 2Next kPrint xEnd Sub程序运行后，单击命令按钮，输出结果是：A) 10个数中奇数的个数B) 10个数中偶数的个数C) 10个数中奇数的累加和D) 10个数中偶数的累加和(31) 窗体上有一个名为Command 1的命令按钮和一个名为Timer 1 的计时器，并有下面的事件过程：Private Sub Command 1_Click()Timer 1.Enabled=TrueEnd SubPrivate Sub Form _Load()Timer 1.Interval=10Timer 1.Enabled=FalseEnd SubPrivate Sub Timer 1_Timer()Command 1.Left=Command 1.Left+10End Sub程序运行时，单击命令按钮，则产生的结果是A) 命令按钮每10秒向左移动一次B) 命令按钮每10秒向右移动一次C) 命令按钮每10毫秒向左移动一次D) 命令按钮每10毫秒向右移动一次（32）设窗体上有一个名为List1 的列表框，并编写下面的事件过程：Private Sub List 1_Click()Dim ch AS Stringch=List 1.List(List1.ListIndex)List 1.RemoveItem List1.ListIndexList 1.AddItem chEnd Sub程序运行时，单击一个列表项，则产生的结果是A) 该列表项被移到列表的最前面B) 该列表项被删除C) 该列表项被移到列表的最后面D) 该列表项被删除后又在原位置插入（33）窗体上有一个名为Command1的命令按钮，并有如下程序：Private Sub Command1_Click()Dim a As Integer, b As Integera = 8b = 12Print Fun(a, b); a; bEnd SubPrivate Function Fun(ByVal a As Integer, b As Integer) As Integera = a Mod 5b = b \ 5Fun = aEnd Function程序运行时，单击命令按钮，则输出结果是A）3 3 2 B）3 8 2 C）8 8 12 D）3 8 12（34）为了从当前文件夹中读入文件File1.txt，某人编写了下面的程序：Private Sub Command1_Click()Open "File1.txt" For Output As #20Do While Not EOF(20)Line Input #20, ch$Print chLoopEnd Sub程序调试时，发现有错误，下面的修改方案中正确的是A）在Open语句中的文件名前添加路径B）把程序中各处的“20”改为“1”C）把Print ch 语句改为Print #20,chD）把Open语句中的Output改为Input（35）以下程序运行后的窗体如图所示，其中组合框的名称是Combo1，已有列表项如图所示；命令按钮的名称是Command1。
国家二级计算机vb考试题附参考答案
国家二级计算机vb考试题附参考答案一、单项选择题（每题2分，共20分）1.在Visual Basic中，以下哪个选项不是基本数据类型？A.IntegerB.StringC.ObjectD.Boolean答案：C2.如果一个变量被声明为Dim x As Integer，那么x的值可以是以下哪个？A.123B."Hello"C.3.14D.True答案：A3.在Visual Basic中，哪个关键字用于声明过程？A.FunctionB.SubC.IfD.For答案：B4.下列哪个选项不是Visual Basic的控件？A.TextBoxbelC.ButtonD.List答案：D5.在Visual Basic中，以下哪个选项可以用于循环结构？A.ForB.IfC.Select CaseD.With答案：A6.在Visual Basic中，哪个函数用于计算一个数的绝对值？A.AbsB.RoundC.IntD.Sgn答案：A7.在Visual Basic中，哪个属性用于设置文本框的只读属性？A.ReadOnlyB.BackColorC.ForeColorD.Enabled答案：A8.在Visual Basic中，哪个事件用于响应按钮点击？A.ClickB.DoubleClickC.MouseDownD.MouseUp答案：A9.在Visual Basic中，哪个关键字用于创建数组？A.ArrayB.ListC.CollectionD.Dim答案：D10.在Visual Basic中，哪个函数用于将字符串转换为数字？A.StrB.ValC.CStrD.Chr答案：B二、填空题（每题2分，共20分）1.在Visual Basic中，使用________关键字可以声明一个全局变量。
答案：Public2.如果一个变量的值需要在多个过程中共享，应该使用________关键字进行声明。
答案：Shared3.在Visual Basic中，使用________函数可以将小数四舍五入到最接近的整数。
二级VISUAL+BASIC笔试328
二级VISUAL BASIC笔试328(总分：100.00，做题时间：90分钟)一、{{B}}选择题{{/B}}(总题数：35，分数：70.00)1.Microsoft Visual Basic 6.0包括三种版本，其中不包括______。
（分数：2.00）A.通用版√B.企业版C.学习版D.专业版解析：[评析] Microsoft Visual Basic 6.0包括三种版本，分别是：学习版、专业版、企业版。
2.下列哪条语句是错的 ______。
（分数：2.00）A.exit subB.exit functionC.exit while √D.exit do解析：[评析] exit sub用来跳出本过程。
exit function 用来跳出本函数并返回到调用处继续执行。
exit do 用来退出do循环。
没有exit while这个用法。
3.在深度为5的满二叉树中，叶子结点的个数为______。
（分数：2.00）A.32B.31C.16 √D.15解析：[评析] 所谓满二叉树是指这样的一种二叉树：除最后一层外，每层上的所有结点都有两个子结点。
这就是说，在满二叉树中，每一层上的结点数都达到最大值，即在满二叉树的第K层上有2k+1个结点，且深度为m 的满二叉树有2m个结点。
在满二叉树中，最后一层的结点个数就是叶子结点的个数，本题中深度为5，故叶子结点数为25-1=24=16。
4.Visual Basic根据计算机访问文件的方式将文件分成三类，其中不包括 ______。
（分数：2.00）A.顺序文件B.Unix文件√C.二进制文件D.随机文件解析：[评析] Visual Basic访问文件的方式分为三类：有Input/Output/Append(访问顺序文件)、Binary(访问二进制文件)、Random(访问随机文件)。
如果未指定方式，则以Random访问方式打开文件。
5.符号%是声明 ______ 类型变量的类型定义符。
二级VISUAL+BASIC笔试324
二级VISUAL BASIC笔试324(总分：100.00，做题时间：90分钟)一、{{B}}选择题{{/B}}(总题数：35，分数：70.00)1.以下语句的输出结果是 ______。
Print Format ＄(“123.58”，“#，###.00”)（分数：2.00）A.123.58 √B.123.00C.123.58D.0，123.58解析：[评析] Format用于格式化输出文本，其一般格式如下： Format(expression,[format]) 其中，expression为任何有效表达式。
format为格式字符串，其描述符作用如下：#：输出数字，不在输出前后补0。
0：输出数字，在输出的前后补0。
.：输出小数点。
，：输出千分位分隔符。
%：输出百分比符号，同时转化数值。
＄：输出前加“＄”。
2.改变驱动器列表框的Drive属性值将激活______事件。
（分数：2.00）A.Change √B.ScrollC.KeyDownD.KeyUp解析：[评析] 驱动器列表框控件的相关属性和事件驱动器列表框的Drive属性，用来设置或返回程序运行时所选择的驱动器名。
当驱动器列表框的Drive属性值发生变化时，会触发驱动器列表框的Change事件。
当驱动器列表框的滚动框被重新定位或沿水平或垂直方向滚动时，会触发驱动器列表框的Scroll事件。
在驱动器列表框获得焦点时，按下或松开键盘上的按键，会触发驱动器列表框的KeyDown或KeyUp事件。
3.以下叙述中错误的是______。
（分数：2.00）A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用Private定义的通用过程能被其他窗体调用√C.在设计Visual Basic程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件D.全局变量必须在标准模块中定义解析：[评析] 一个应用程序可以有多个窗体(最多可达255个)；在默认情况下，模块级变量对该模块中的所有过程都是可见的，但对其他模块中的代码不可见。
二级VISUAL+BASIC笔试32
二级VISUAL BASIC笔试32(总分：96.00，做题时间：90分钟)一、{{B}}选择题{{/B}}(总题数：35，分数：70.00)1.执行如下两条语句后，窗体上显示的是 ______。
a=8.4326 Print Format(a,"$00,00.00")（分数：2.00）A.0,008.43B.$8.43C.8.43D.$0,008.43 √解析：[评析] Format(a,"$00,00.00")表示显示a为以“$”开头的，带2位小数(不足2位部0)，整数部分为4位(不足4位补0，且2位之间用“，”分隔)的字符。
2.在Visual Basic中传递参数的方法有 ______方式。
（分数：2.00）A.一种B.两种√C.三种D.四种解析：[评析] 在VB中传递参数的方式有按值传递By Val和按地址传递ByRef两种。
3.执行下面的程序段后，x的值为 ______。
x=5 For I=1 To 20 Step 2 x=x+I/5 Next I（分数：2.00）A.21 √B.22C.23D.24解析：[评析] For循环语句中，Step是表示步长，即循环计数器变化的幅度。
本题中i每次加2，故要执行10次循环。
而“/”是整除运算符，故当i等于1、3时，x都加0，当i等于5、7、9时，x都加1，当i等于11、13时，x都加2，当i等于15、17、19时，x加3。
所以x=5+1.3+2.2+3.3=21。
4.不在Visual Basic 6启动时的基本控件集中的是 ______。
（分数：2.00）A.TimerB.OLEC.ShapemonDialog √解析：[评析] CommonDialog控件在使用的时候必须从“工程-部件”中引用“Microsoft CommonDialog Control 6.0”。
5.要使列表框中的列表项显示成复选框形式，则应将其Style属性设置为 ______。