VB模拟试题四
vb模拟试题及答案
vb模拟试题及答案1. 以下哪个选项是Visual Basic（VB）的编程语言？A. C++B. JavaC. PythonD. 答案：D2. 在中，以下哪个关键字用于声明一个类？A. FunctionB. ClassC. SubD. Module答案：B3. 在中，以下哪个属性用于获取或设置一个窗体的标题？A. TextB. TitleC. CaptionD. Label答案：C4. 在中，以下哪个方法用于启动一个新的线程？A. StartB. BeginInvokeC. ThreadD. Run答案：A5. 在中，以下哪个数据类型用于表示布尔值？A. BooleanB. StringC. IntegerD. Double答案：A6. 在中，以下哪个选项用于创建一个数组？A. Dim arr(5) As IntegerB. Dim arr As New Integer(5)C. Dim arr As Integer = 5D. Dim arr As Integer(5)答案：A7. 在中，以下哪个关键字用于实现继承？A. InheritsB. ImplementsC. InheritsFromD. Base答案：A8. 在中，以下哪个关键字用于捕获异常？A. TryB. CatchC. FinallyD. All of the above答案：D9. 在中，以下哪个方法用于将一个字符串转换为小写？A. ToLowerB. ToLowercaseC. LowerD. ConvertToLower答案：A10. 在中，以下哪个方法用于将一个字符串转换为大写？A. ToUpperB. ToUppercaseC. UpperD. ConvertToUpper答案：A。
VB机试模拟试卷4(题后含答案及解析)
VB机试模拟试卷4(题后含答案及解析)题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题（30分）1．注意：下面出现的“考生文件夹”均为c:\wexam\25160001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上建立一个名称为Text1的文本框，一个名称为Cmd1，标题为“输出”的命令按钮，如图4-1所示。
要求程序运行后，在文本框输入几个字符，单击“输出”按钮，则在窗体上显示文本框中的文字。
注意：在程序中不能使用任何变量。
保存时必须存放在考生文件夹下，窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
(2)在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2，标题为“按钮一”和“按钮二”的命令按钮，如图4-2所示。
要求程序运行后，如果单击“按钮一”，则把“按钮二”移到“按钮一”上，使两个按钮重合，如图4-3所示。
注意：在程序中不得使用任何变量(必须通过属性设置来移动控件)。
保存时必须存放在考生文件夹下，窗体文件名为sjt2.frm，工程文件名为sjt2.vbp正确答案：(1)在窗体上建立好控件后，先设置控件属性，再编写事件过程。
通过命令按钮的Caption属性来设置其标题，单击命令按钮触发Click事件；文本框显示内容是用Text属性。
文本框中的内容通过其Text属性得到，在命令按钮的Click事件中利用Print方法将文本框中的内容输出，完成题目要求。
解题步骤：第一步：建立界面并设置控件属性。
程序中用到的控件及其属性见表4-1。
第二步：编写程序代码。
参考代码：Private Sub Cmd1_Click( ) Cls Print Text1.Text End Sub 第三步：调试并运行程序。
第四步：按题目要求存盘。
(2)在窗体上建立好控件后，先设置控件的属性，再编写事件过程。
命令按钮的Caption属性用来设置其标题，单击命令按钮触发Click 事件，本题考查的是按钮的摆放位置的设置，涉及到对象的Left和Top属性。
vb笔试模拟试题(九套)
附录1 Visual Basic笔试模拟试题（1~6套）笔试模拟试题 1第一部分软件技术基础（共15分）一、是非判断题（每小题1分，共10分）（判断下列各题是否正确，如正确，在客观答题纸上对应编号选A，否则选B）1．在操作系统中，作业调度和进程调度没有区别。
（）2．数据类型是具有共同属性的一类变量的抽象。
（）3．瀑布模型中需求分析的主要工作是确定要开发的软件做什么。
（）4．软件设计阶段产生的最重要的文档之一是概要设计说明书。
（）5．在进行插入排序时，其数据比较次数和数据的初始排列无关。
（）6．软件测试不是为了证明软件的正确性，而是立足于软件有错误而进行的。
（）7．线性表若采用链式存储表示时所有结点之间的存储单元地址必须连续。
（）8．中断处理通常是按中断优先级响应和进行中断的。
（）9．缓冲池可作为CPU和I/O设备之间信息传输的集散地。
（）10．进程调度是根据一定的调度算法，从等待队列中挑选出合适的进程。
（）二、选择题（每小题1分，共5分）1．把高级语言的源程序翻译成二进制代码的过程称为：（A ）（A）编译（B）连接（C）运行（D）重定位2．把逻辑地址转变为内存的物理地址的过程称作：（D ）（A）地址分配（B）地址连接（C）地址调用（D）地址变换3．白盒法又称为逻辑覆盖法，主要用于：（D ）（A）功能测试（B）系统测试（C）α测试（D）单元测试4．在操作系统中，进程最基本的特征是：（A ）（A）动态性和并发性（B）顺序性和可再现性（C）和程序的对应性（D）执行过程的封闭性5．以下哪一项不是软件危机的表现形式。
（C ）（A）成本高（B）生产率低（C）技术发展快（D）质量得不到保证第二部分Visual Basic语言程序设计（共85分）一、单项选择题（每小题1分，共10分）1. 数学表达式|（2x+3y）sinz|的VB表达式为（ C ）。
（A）| ( (2*x+3*y)*sin(z) )| （B）Abs( (2x+3y)*sin(z) )（C）Abs( (2*x+3*y)*sin(z) ) （D）Abs( (2*x+3*y)*sinz )2. 在下列VB运算符中，运算优先级最低的是（A ）。
VB第四套
一、基础单项选择 (每小题1分,共20分)1、下列哪个符号不能作为VB中的变量名（D）。
(A)wash (B)CET4 (C)fh (D)a[3]2、函数Int( 5 * RND )+1的值是在哪个范围内的整数（C）。
(A) [0,5] (B) [0,6] (C) [1,5] (D) [1,6]3、语句Dim x As Single作用是:将x定义为（A）变量。
(A)单精度型(B)整型 (C) 布尔型(D)字符型4. Int(-6.24)的值是（C）。
(A) -6 (B) -6.14 (C) -7 (D) 6.245．设A=7, 则A MOD 3 的值是（B）。
(A) 7 (B) 1 (C) 3 (D) 56．Len(“Goodbaby”)的值是（C）。
(A) 6 (B) 7 (C)8 (D) 97. Left (“SWUSTNIC”,2)的值是（A）。
(A) SW (B) W (C) IC (D) US8、表达式2*3^2+2*6/3 的值是（B）。
(A) 60 (B) 22 (C) 45 (D) 589、语句Dim arr(-3 TO 4,2 TO 6)AS Integer定义的数组元素有（D）个。
(A)45 (B)35 (C)42 (D)4010、设有语句: a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（A）。
(A) 字符串"20" (B) 字符串"120"(C) 默认值100 (D) 数值12011、要从for-next中退出循环使用的语句是（B）。
(A) exit (B) exit for (C) continue (D) stop loop12、设a=3,b=5,则以下表达式值为真的是（B）。
（A）a>=b And b>10 （B）(a>b) Or (b>0)（C）(a<0) Eqv( b>0) （D）(-3+5>a) And (b>0)13、设a=“Visual□Basic”,下面使b=“Basic”的语句是（D）。
期末模拟试题4及参考答案
VB期末模拟试题4一、单项选择题（每题2分，共30分）1．定义符号常量所使用的命令为（）。
A．Dim B．Public C．Static D．Const2．在Visual Basic中表达式x=8的类型是（）。
A．错误的表达式B．关系表达式C．算术表达式D．逻辑表达式3．在下列四个表达式中，非法的Visual Basic表达式是（）。
A．x=x+y B．x+y>z C．x=(x=y) D．以上均为合法表达式4．数学式子Sin300写成V isual Basic表达式是（）。
A．Sin30B．Sin(30)C．SIN(300)D．Sin(30*3.14/180)5．用于获得字符串S最右边4个字符函数是（）。
A．Right(S,4) B．Left(S,4)C．RightStr(S) D．RightStr()6．用于获得字符串S从第6个字符开始的4个字符的函数是（）。
A．Mid(S, 6, 4) B．Mid (S, 4, 6)C．MidStr(S, 6, 4) D．MidStr(S, 4, 6)7．用于获得字符串长度的函数是（）。
A．Len() B．Length()C．StrLen() D．StrLength()8．用于获得字符串S最左边4个字符的函数是（）。
A．Left (S,4) B．Left(1,4)C．LeftStr (S) D．LeftStr (S,4)9．表达式4 + 5 \\ 6 * 7 Mod 8 / 9的值是（）。
A．4 B．5C．6 D．710．以下多窗体操作中工程文件的扩展名是（）。
A．.frm B．.vbp C．.bas D．.cls11. 下面选项中，能绘制椭圆的语句是（）A．Circle (1000, 1000),500,RGB(255,0,0),0.5B．Circle (1000, 1000),500,RGB(255,0,0),,0.5C．Circle (1000, 1000),500,RGB(255,0,0),,,0.5D．Circle (1000, 1000),500,RGB(255,0,0),,,,0.512.图像框（Image）和图片框（Picture）在使用时有所不同，以下叙述中正确的是（）A．图片框比图像框占内存少B．图像框内还可包括其它控件C．图片框有Stretch属性而图像框没有D．图像框有Stretch属性而图片框没有13.ADOrs为Recordset对象，从Tabel中获取所有记录的语句是（）A．ADOrs.New "Select * From Tabel"B．ADOrs.Open "Select * From Tabel"C．ADOrs.Execute "Select * From Tabel"D．ADOrs. Select "Select * From Tabel"14.要发送数据，通常使用Winsock控件的（）A．SendData方法B．Listen方法C．Accept方法D．GetData方法15. VB程序中通常不会产生错误提示的（）。
计算机等级考试二级VB模拟试题四及答案解析
计算机等级考试二级VB模拟试题四及答案解析一、选择题(1)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private SubCommand1_Click()Move 500,500End Sub程序运行后，单击命令按钮，执行的操作为A)命令按钮移动到距窗体左边界、上边界各500的位置B)窗体移动到距屏幕左边界、上边界各500的位置C)命令按钮向左、上方向各移动500D)窗体向左、上方向各移动500正确答案: B(2)在窗体上有若干控件，其中有一个名称为Text1的文本框。
影响Text1的Tab顺序的属性是A)TabStopB)EnabledC)VisibleD)TabIndex正确答案: D(3)以下定义数组或给数组元素赋值的语句中，正确的是A)Dim a As Varianta=Array(1,2,3,4,5)B)Dima(10)As Integera=Array(1,2,3,4,5)C)Dim a%(10)a(1)="ABCDE"D)Dim a(3),b(3)As Integera(0)=0a(1)=1a(2)=2b=a正确答案: A(4)在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为A)For i=0 ToList1.ListCount-1……NextB)For i=0 To List1.Count-1……NextC)For i=1 To List.ListCount……NextD)For i=1 ToList1.Count……Next正确答案: A(5)以下Case语句中错误的是A)Case 0 To10B)Case Is>10C)Case Is>10 And Is<50D)Case 3, 5,Is>10正确答案: C(6)以下关于图片框控件的说法中，错误的是A)可以通过Print方法在图片框中输出文本B)清空图片框控件中图形的方法之一是加载一个空图形C)图片框控件可以作为容器使用D)用Stretch属性可以自动调整图片框中图形的大小正确答案: D(7)执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是A)VisualB)BasicC)6D)11正确答案: C(8)以下叙述中错误的是A)下拉式菜单和弹出式菜单都用菜单编辑器建立B)在多窗体程序中，每个窗体都可以建立自己的菜单系统C)除分隔线外，所有菜单项都能接收Click事件D)如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见正确答案: D(9)在窗体上画一个命令按钮，其名称为Command1,然后编写如下事件过程：Private Sub Command1_Click()a=12345Print Format＄(a,"000.00")EndSub程序运行后，单击命令按钮，窗体上显示的是A)123.45B)12345.00C)12345D)00123.45正确答案: B(10)以下叙述中错误的是A)一个工程可以包括多种类型的文件B)Visual Basic应用程序既能以编译方式执行，也能以解释方式执行C)程序运行后，在内存中只能驻留一个窗体D)对于事件驱动型应用程序，每次运行时的执行顺序可以不一样正确答案: C(11)以下关于函数过程的叙述中，正确的是A)函数过程形参的类型与函数返回值的类型没有关系B)在函数过程中，过程的返回值可以有多个C)当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D)如果不指明函数过程参数的类型，则该参数没有数据类型正确答案: A(12)以下关于变量作用域的叙述中，正确的是A)窗体中凡被声明为Private的变量只能在某个指定的过程中使用B)全局变量必须在标准模块中声明C)模块级变量只能用Private关键字声明D)Static类型变量的作用域是它所在的窗体或模块文件正确答案: B(13)确定一个控件在窗体上的位置的属性是A)Width和HeightB)Width或HeightC)Top和LeftD)Top或Left正确答案: C(14)在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private SubCommand1_Click()Text1.Text="Visual"Me.Text1="Basic"Text1="Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是A)VisualB)BasicC)ProgramD)出错正确答案: C(15)以下关系表达式中，其值为False的是A)"ABC">"AbC"B)"the"<>"they"C)"VISUAL"=UCase("Visual")D)"Integer">"Int"正确答案: A(16)语句Print5/4*6＼5 Mod 2的输出结果是A)0B)1C)2D)3正确答案: B(17)在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程：Private SubCommand1_Click()strText=InputBox("请输入")Text1.Text=strTextEndSubPrivate Sub Text1_Change()Label1.Caption=Right(Trim(Text1.Text),3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef,则在标签中显示的内容是A)空B)abcdefC)abcD)def正确答案: D(18)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=-5If Sgn(x)Theny=Sgn(x∧2)Elsey=Sgn(x)End IfPrint yEnd Sub程序运行后，单击命令按钮，窗体上显示的是A)-5B)25C)1D)-1正确答案: C(19)一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句Public X AsInteger,在Model1中有语句Public Y As Integer。
VB模拟试题4
一、概念填空题（每空0.5分，共10分）1．如果希望时钟控件每0.6秒钟产生一个计时事件，应将（）属性值应设置为（）。
2．为了防止用户编辑文本框内的内容，应将控件的（）属性设置为（）。
3．VB中，列表框对象常使用的方法有（）、（）和（）。
4．结构化程序设计方法，把程序的结构规定为三种基本结构，它们是：（）、（）和（）三种基本结构。
5．VB中，工程文件、窗体文件的文件后缀名分别是（）、（）。
6．VB中，用Option Base 1说明后，Dim A（4，6）定义的数组有（）个元素。
7．x,y 都小于z的VB表达式为（）。
8．设A=2,B=-2,则表达式A/2+1＞B+5 Or B*(-2)=6的值是（）。
9．将一般窗体转换为MDI窗体的子窗体时要把（）属性的值设置为（）。
10．在多窗体工程中，可用（）方法显示一个窗体，用（）方法将一个窗体隐藏起来。
11．用随机数函数Rnd产生100～200之间（含100和200）的随机整数的表达式是：（）。
二、是非题(答案填入表中，正确的打钩，错误的打叉，每题1分，共20分)1．在Visaul Basic中，当一个工程含有多个窗体时，其中的启动窗体是第一个添加的窗体。
2．在Visaul Basic中，Redim语句可以改变数组的类型。
3．在Visaul Basic中，文本框的Autosize属性是根据文本内容自动调整文本框的大小。
4．在Visaul Basic中，工具箱中包含了所有的VB控件。
5．在Visaul Basic中，列表框包含了组合框的功能。
6．在Visaul Basic中，在同一个模块不同过程中的变量可以同名。
7．在Visaul Basic中，要删除组合框中的某一个项目，可以使用Clear方法。
8．在Visaul Basic中,若在程序中使用日期型数据时，必须用符号{}将日期型数据括起来。
9．在Visaul Basic中，使焦点移动到某一个控件上的方法是Lostfocus。
全国计算机等级考试二级VB笔试模拟试题(4)-中大网校
全国计算机等级考试二级VB笔试模拟试题(4)总分：100分及格：60分考试时间：90分每小题2分，共70分(1)执行下列程序后，鼠标单击窗体，输出结果为。
Private Sub Form_Click（）Print "Click"; End Sub Private Sub Form_MouseDown（Button As Integer, Shift _ As Integer, X As Single, Y As Single）Print "Donw" End Sub Private Sub Form_MouseUp（Button As Integer, Shift _ As Integer, X As Single, Y As Single）Print " Up" End Sub（）。
A. DownUpClickB. ClickDownUpC. DownClickUpD. UpDownClick(2)在属性窗口中设置何属性，可以把指定的图形放入当前对象中?（）。
A. CurrentYB. PictureC. CurrentXD. Stretch(3)Visual Basic 6.0分为3种版本，不属于这3种版本的是（）。
A. 学习版B. 专业版C. 企业版D. 业余版(4)当组合框的Style属性设置为何值时，组合框称为下拉式列表框（）。
A. 0B. 1C. 2D. 3(5)在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。
当改变当前驱动器时，目录列表框应该与之同步改变。
设置两个控件同步的命令放在一个事件过程中，这个事件过程是（）。
A. Drive1_ChangeB. Drive1_ClickC. Dir1_ClickD. Dir1_Change(6)有如下事件过程，单击命令按钮扣，输出结果为Private Sub Command1_Click（）Dim b%（1 To 4）, j%, t# For j=1 To 4 b（j）=j Next j t=Tax（b（））Print "t="; t, End Sub Function Tax （a（）As Integer）Dim t#, i% t=1 For i=2 To UBound（A．t=t * a（i）Next i Tax=t End Function（）。
VB模拟题及参考答案
VB复习题一一、判断题：(每小题1分，共20分。
请将答案涂在答题卡上，正确的涂A，错误的涂B）1.Visual Basic 6.0工作模式有3种：它们是设计、运行和调试。
（）2.标签支持Dblclick事件。
（2 ）3.窗体中控件的位置由Height和Top属性确定。
（3 ）4.滚动条的SmallChange属性设置为5时，表示单击滚动条两端的箭头时变化为5. （4 ）5.当把定时器控件的Visible属性设置为True时，运行时定时器在窗体上就可见了。
（5 ）6.Vbred是Visual Basic 6.0允许的常量。
（6 ）7.#25/6/2018#是Visual Basic 6.0合法的日期型常量书写。
（7 ）8.逻辑运算符Not的优先级比Or高。
（8 ）9.Visual Basic 6.0中可以用print做变量名。
（9 ）10.表达式5 mod 4与5\4的结果相同。
（10 ）11.语句if x>=60 and x<70 then print ”及格”是正确的。
（11 ）12.有select case 语句必须有End select语句与之相匹配。
（12 ）13.Exit for是Do循环的一个出口。
（13 ）14.选择结构与循环结构可以相互嵌套，并且允许交叉嵌套。
（14 ）15.Visual Basic 6.0中，Dim a(-5 to 5) as single 是正确的数组定义。
（15 ）16.可以用Ubound()函数返回数组下标的下界。
（16 ）17.过程体内可以再定义另外一个过程。
（17 ）18.实参是变量，且过程定义时与其对应的形参用Byval关键字加以限制是地址（引用）传递。
（18 ）19.用Output模式打开文件，如果指定的路径不存在，则会自动先创建指定的路径，然后再创建文件。
（19 ）20.Visual Basic 6.0中，文件号最大可取的值是511。
2011年全国计算机等级考试二级VB模拟试卷（四）参考答案
2011年全国计算机等级考试二级VB模拟试卷（四）参考答案2011年全国计算机等级考试二级VB模拟试卷(四)参考答案一、选择题：35题，2分/题，共70分下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
1.执行以下程序段后,变量c的值为( )a = " Visual Basic Programing"b = "Quick"c =b & UCase (Mid(a,7,6) & Right(a,11)A)Visual BASIC ProgramingB)Quick Basic ProgramingC)QUICK Basic ProgramingD)Quick BASIC Programing分析:2.不能正确表示条件“两个整型变量A和B之一为0，但不能同时为0”的布尔表达式是（）A)A*B=0 and A+B<>0B)(A=0 or B=0)and (A<>0 OrB<>0)C)not(A=0 And B=0) and (A=0 or B=0)D)A*B=0 and (A=0 or B=0)分析:3. 下面子过程语句说明合法的是（）A)Function fl(ByVal n%)B)Sub fl (n%)As IntegerC)Function fl%(fl%)D)Sub fl(ByVal n%())分析:4.对窗体编写如下代码：Option Base 1Private Sub Form _KeyPress(KeyAscii As Integer) a=Array (237,126,587,48,498)ml=a(1)m2=1If KeyAscii=13ThenFor i=2 To 5If a (i)>ml Thenml=a (i)m2=iEnd IfNext iEnd IfPrint ml;print m2End Sub程序运行后，按回车键，输出结果为（）A)48 4B)237 1C)587 3D)498 4分析:5.Visual Basic 中没有提供下列（）事件A)MouseDownB)MouseUpC)MouseMoveD)MouseExit分析:6.执行下面对面的程序后，X的值为（）x=50Fox i=1 To 20 Step 2Next iA)66B)67C)68D)69分析:7.为了防止用户随意将光标置于控件之上，需做的工作是（）A)将控件的Enabled属性设置为FalseB)将控件的TabStop属性设置为FalseC)将控件的TabStop属性设置为TrueD)将控件的TabIndex属性设置为0分析:8.表达式String(2,"Shanghai")的值是（）A) ShB) ShanghaiC) ShanghaiShanghaiD) SS分析:9.为了在按回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True,这个属性是（）A) valueB) DefaulC) CancelD) Enabed分析:10.visual Basic 提供的缺省窗体包含（）A) 标题栏B)菜单栏C)工具条分析:11.假定有一个菜单项，名为MenuItem,为了在运行时该菜单项失效（变灰），应使用的语句为（）A)MenuItem.Enabled=FalseB)MenuItem.Enabled=TrueC)MenuItem.Visible=TrueD)MenuItem.Visible=False分析:12.下列不能打开菜单编辑器的操作是（）A)按Ctrl+EB)单击工具栏中的“菜单编辑器”按钮C)执行“工具”菜单中的“菜单编辑器”命令D)按Shift+Alt+M分析:13.列表框（如图2-6所示）经过下列操作后，剩余的项目是（）Listl.RemoveItem lListl.RemoveItem 2Listl.RemoveItem lA)aaB)bbC)ccD)dd分析:14.要暂时关闭计时器，应把计时器的某个属性设置为False，这个属性是（）A)VisibleB)TimerC)EnabledD)Interval分析:15.InputBox函数返回值的类型为（）A)数值B)字符串C)变体D)数值或字符串（视输入的数据而定）分析:16.当窗体的AutoRedraw属性采用默认值时，若在窗体装入时使用绘图方法绘制图形，则应将程序放在（）A)Paint事件B)Load事件C)Initilize事件D)Click事件分析:17.下列可以打开立即窗口的操作是（）A)Ctrl+DB)Ctrl+EC)Ctrl+FD)Ctrl+G分析:18.如是要向工具箱中加入控件和部件，可以利用“工程”的菜单中的（）命令A)引用B)部件C)工程属性D)添加窗体分析:19.若要清除列表框的所有内容，可用来实现的方法是（）A)RemoveitemB)ClsC)ClearD)以上均不可以分析:20.假定有下面的过程：Function Func(a As Integer,b As Integer)As IntegerStatic m As Integer, i As Integerm = 0i = 2i = i + m +1m = i + a + bFunc = mEnd Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim k As Integer, m As IntegerDim p As Integerk=4m=1p=Func(k,m)Print p;p=Func(k,m)Print pEnd Sub程序运行后，单击命令按钮，输出结果为（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
一、单选题（30分，每题1分）1．计算机中采用二进制，是因为__(1) ____。
(A)可降低硬件成本 (B)两个状态的系统具有稳定性(C)二进制的运算法则简单 (D)上述三个原因2．我们通常说的U盘属于计算机部件中的___(2) ___。
(A) 输出设备 (B) 输入设备 (C) 存储设备 (D) 打印设备3.下列表示存储容量的数据中，____(3) ____是最小的。
(A)20480 KB (B) 1.44 MB (C) 1 GB (D)4865723 Byte4. 一个完整计算机系统应包括___(4) ____。
(A) 主机和显示器 (B)硬件系统和软件系统(C)系统软件和应用软件 (D) 内存和外存5.下列执行速度最快的程序语言是___(5) ____。
(A)数据库语言 (B)高级语言 (C)机器语言 (D)汇编语言6.一只白色的足球被踢进球门，则白色、足球、踢、进球门是___(6) ___。
(A)属性、对象、方法、事件 (B) 属性、对象、事件、方法(C) 对象、属性、方法、事件 (D) 对象、属性、事件、方法7. 以下叙述中正确的是____(7) ____。
(A)窗体的Name属性指定窗体的名称，用来标识一个窗体(B)窗体的Name属性的值是显示在窗体标题栏中的文本(C)可以在运行期间改变对象的Name属性的值(D)对象的Name属性值可以为空8. 在VB中，保存一个工程至少应保存两个文件，这两个文件分别是___(8) ____。
(A)文本文件和工程文件 (B)窗体文件和工程文件(C)窗体文件和标准模块文件 (D)类模块文件和工程文件9. 在下列说法中，正确的是___(9) ___(A)通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上(B)在列表框中不能进行多项选择(C) VB系统不能在列表框中自动实现将项目按字母顺序从大到小排列(D)复选框的Value属性值为布尔型10.当一个复选框被选中时，它的Value属性的值是___(10) ___(A) 3 ( B) 2 (C) 1 (D) 011.计算结果为0的表达式是___(11) ____(A)Int(2.4)+Int(-2.8) (B)Cint(2.4)+Cint(-2.8)(C)Fix(2.4)+Int(-2.8) (D)Fix(2.4)+Fix(-2.8)12.可以惟一标识控件数组中的每一个控件属性的是___(12) ____(A)Name (B)Caption (C)Index (D)Enabled13. 下列变量名中，合法的变量名是___(13) ____。
(A)m24 (B)mn-k (C)24m (D)m+n14. 若有语句”Dim Flag As Boolean”，则下面赋值语句正确的是___(14) _____。
(A) Flag ="True" (B) Flag='True' (C)Flag=Ture (D)Flag=True15. 下列叙述不正确的是___(15) _____。
(A)InputBox函数返回值为字符型 (B)MsgBox函数返回值为所单击按钮的键值(C) MsgBox语句没有返回值 (D) MsgBox语句返回值为所单击按钮的键值16. 若要在Text1的光标(焦点)移动到其它控件时进行合法性判断，则可使用__(16) __事件来实现。
(A) Refresh (B) SetFocus (C) LostFocus (D) GotFocus17.一般情况下，控件的大小是由___(17) ___属性确定的(A) Width和Height (B) Top和Left (C) Width和Left (D) Top和Width18．以下能判断是否到达文件尾的函数是__(18) ____(A)BOF (B) LOC (C)LOF (D)EOF19．下列过程语句说明合法的是____(19) ____。
(A)Sub f1(ByVal n() As Integer) (B)Sub f1(n() As Integer)As Integer(C)Function f1(f1 As Integer) As Integer (D)Finction f1(ByVal n As Integer)20.要在文本框Text1中显示列表框List1中最后一个项目的正确语句是__(20) ____。
(A)Text1.Text=List1.List(ListCount-1) (B)Text1.Text=List1.List(0)(C)Text1.Text=List1.List(List1.ListCount-1) (D)Text1.Text=List1.ListIndex21．设组合框Combo1中有5个项目，则以下能删除最后一项的语句是__(21) ______。
(A)Combo1.RemoveItem Text (B)Combo1.RemoveItem 5(C)Combo1.RemoveItem 4 (D)Combo1.RemoveItem Combo1.Listcount22．在通用声明代码中有以下语句：Option Base 1Dim a (4,-3 to 3) As String则该数组有_(22) ___个元素。
(A) 28 (B) 24 (C) 35 (D) 3023.要使菜单项能通过按键盘上的Alt键及K键打开，应在菜单编辑器中设置__(23) __。
(A) 在“名称”栏中“K”字符前加上“&”(B) 在“标题”栏中“K”字符前加上“&”(C) 在“名称”栏中“K”字符后加上“&”(D) 在“标题”栏中“K”字符后加上“&”24. 以下Case语句中错误的是__(24) __。
(A) Case 0 To 10 (B) Case Is>10(C) Case Is>10 And Is<50 (D) Case 3,5,Is>1025．假定有以下两个过程,则以下说法中不正确的是__(25) ______。
Private Sub PPP (a As Single, b As Single)a = a + bb = a + bPrint a, bEnd SubPrivate Sub Form_Activate( )x=18Call PPP (x,(x))Print xEnd Sub(A)形参是 a 和b ，两个实参x和(x)允许重名(B)形参是 a 和b ，实参(x)表示是传值调用(C)形参是 a 和b ，实参x表示是传址调用(D)Print a, b 输出的值分别为36，3626．若需要在同一窗口内安排两组相互独立的单选按钮（OptionButton），可使用 __(26) _____ 控件将它们分隔开。
① TextBox ② PictureBox ③ Image ④ Frame(A) ①或②(B) ②或③(C) ②或④(D) ③或④27.在窗体上画一个名称为CommandDialog1 的通用对话框，一个名称为Command1的命令按钮。
然后编写如下事件过程：Private Sub Command1_Click()CommonDialog1.FileName =""CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"CommonDialog1.FilterIndex=2CommonDialog1.DialogTitle="VBTest"CommonDialog1.Action=1End Sub对于这个程序，以下叙述中错误的是___(27) ___(A)该对话框被设置为“打开”对话框 (B) 在该对话框中指定的默认文件名为空(C)该对话框的标题为VBTest (D)在该对话框中指定的默认文件类型为文本文件(*.Txt)28.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Command1_Click()Dim aa= Array(1,2,3,4,5)For i=1 To UBound(a)a(i) = a(i)+i-1NextPrint a(3)End Sub程序运行后，单击命令按钮，则在窗体上显示的内容是___(28) ___。
(A) 4 (B) 5 (C) 6 (D) 729．在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程,该事件过程的功能是__(29) __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(A)输出n以内的奇数 (B) 输出n以内的偶数(C) 输出n以内的素数 (D) 输出n以内能被j整除的数30．设有如下程序：Private Sub Command1_Click()Dim sum As Double, x As Doublesum = 0: n = 0For i = 1 To 5x = n / i: n = n + 1: sum = sum + xNextEnd Sub该程序通过For循环计算一个表达式的值，这个表达式是___(30) ____(A)1+1/2+ 2/3+3/4+4/5 (B)1+1/2+2/3+3/4(C)1/2+2/3+3/4+4/5 (D)1+1/2+1/3+1/4+1/5二、填空题（50分，每空2分）1、设a=6，则执行x=Iif(a>5,-1,0)后，x的值为_____[1] __________。
2、Visual Basic提供了三种对数据文件的访问方式，它们是顺序访问方式、____[2] __访问方式和二进制访问方式。
3、赋值语句：a=123 & MID("123456",3,2)执行后，a变量中的值__[3] ____ 。
4、如果有以下程序代码，则输出结果是___[4] _____。
x = 10y = 5Print x ^ 2 >= y ^ 35、运行下面的程序，单击窗体后在窗体上显示的内容是___[5] ___；若将程序中的A语句与B语句的位置互换，再次执行程序，单击窗体后在窗体上显示的内容是___[6] ___。