VB省计算机二级考试(样卷)

J--J全国高等学校（安徽考区）计算机水平考试试卷（二级Visual Basic语言）一、单项选择题（每题1分，共40分）1.计算机系统是由 1 构成的。

A）控制器、运算器和存储器B）系统软件与应用软件C）硬件系统和软件系统D）CPU、存储器、输入／输出设备2.在微型计算机系统中，下列访问速度最快的存储器是 2 。

A）硬盘B）U盘C）光盘D）内存3.与十进制数41等值的二进制数是 3 。

A）00100100 B）00110011 C）00101001 D）00101010 4.下列关于Windows操作系统通配符的说法中，正确的是 4 。

A）* 代表多个字母B）？代表任意多个字符C）* 代表任意多个字符D）* 代表任意一个字符5.下列 5 是目前Internet上常用的Web浏览器之一。

A）Internet Explorer B）Outlook ExpressC）Yahoo D）FrontPage6.下列选项中， 6 是正确的电子邮件地址。

A）ahabc@2a@ B）ahabc@C）www. ah. cn D）ahabc7.下列属于视频文件的是7 。

A）ABC.MP4 B）ABC.MP3 C）ABC.DOC D）ABC.BMP 8.下列软件中，不属于杀毒软件的是8 。

A）瑞星B）迅雷C）江民KV2007 D）金山毒霸9.下列关于计算机病毒的说法中，正确的是9 。

A）计算机病毒是一种具有破坏性的生物病毒B）计算机病毒是一种人为编制的具有破坏性的特殊程序C）计算机病毒感染一台电脑后就会失效，不具有传染性D）计算机病毒可感染操作电脑的人10.下列描述中正确的是10 。

A）软件就是用高级语言编写的程序B）软件开发不受计算机系统的限制C）软件就是能在计算机上运行的程序D）软件是程序、数据与相关文档的集合11.下列各项不是VB的基本数据类型的是11 。

A）Single B）Integer C）Basic D）Double 12.下列不是VB常量的是12 。

A）3.14 B）’Name’C）#10/18/2007# D）True13.下列符号中，可以用作VB变量名的是13 。

A）Int B）4xy C）x , y D）sum_2 14.表达式Len ("VB程序设计") 的值是14 。

A）4 B）6 C）8 D）1115.下列4个字符串进行比较，最小的是15 。

A）"2007" B）"About" C）"Basic" D）"DATA"16.已知A= "12345678"，则表达式Val ( Left (A,3) + Mid ( A,5,2 ) )的值是16 。

A）12356 B）179 C）12345 D）4517.表达式15 / 3 – 2 ^ 3 * 4 / 8 Mod 5 \ 2的值是17 。

A）3 B）4 C）5 D）618.下面的语句18 可以实现：先在窗体上输出大写字母A，然后在同一行的第10列输出小写字母b。

A）Print "A" ; Tab (9) ; "b" B）Print "A" ; Space (9) ; "b"C）Print "A" ; Space (10) ; "b" D）Print "A" ; Tab (10) ; "b"19.若Dim b (3) As Integer，则Ucase ( Chr (97) & UBound (b))的结果是19 。

A）A3 B）A2 C）A1 D）A020.数学表达式1≤x≤10表示成正确的VB表达式为20 。

A）1≤x<10 B）x >=1 And x <=10C）x >= 1 Or x < 10 D）x >=1 And <1021.下面正确的赋值语句是21 。

A）y = 3x B）3 * x = y C）y = 3 * x D）x + y = 1022.语句Dim A (-2 To 2,1 To 4)As Single定义的数组元素个数是22 。

A）16 B）20 C）24 D）3023.对于窗体Form1，若将其名称属性设置为Disp，Caption属性设置为OK，则下列正确的语句是23 。

A）Form1 . Left=1000 B）OK . Left=1000C）Disp . Left=1000 D）以上语句都不对24.若要使标签框的大小自动与所显示的文本框相适应，则可通过设置24 属性的值为True来实现。

A）AutoSize B）BorderStyle C）BackStyle D）BackColor25.创建一个MDI子窗体，只需把一个普通窗体的25 属性设置为True即可。

A）MaxButton B）MinButton C）MDIChild D）Moveable26.可通过修改命令按钮的26 属性值为True将其设置为默认按钮。

A）Value B）Default C）Cancel D）Enabled27.复选框或单选按钮的当前状态可通过27 属性来设置或访问。

A）Caption B）Value C）Checked D）Selected28.下列控件中，没有Caption属性的是28 。

A）框架B）复选框C）标签D）组合框29.将数据项“北京奥运会”添加到列表框List1中成为第2项，应使用29 语句。

A）List1.AddItem "北京奥运会" , 2 B）List1.AddItem 2,"北京奥运会"C）List1.AddItem "北京奥运会" , 1 D）List1.AddItem 1,"北京奥运会"30.表示滚动条控件取值范围最大值的属性是30 。

A）Max B）LargeChange C）Value D）Min31.如果每0.5秒产生一个计时器事件，那么时钟控件的Interval属性值应设为31 。

A）5 B）50 C）500 D）500032.窗体中有图片框Picture1和图像框Image1 两个对象，下面关于Print方法的使用中，错误的是32 。

A）Picture1. Print 100 B）Print 100C）Printer. Print 100 D）Image1.Print 10033.关于MsgBox（）函数显示的对话框，以下叙述正确的是33 。

A）该对话框有一个“确定”按钮B）该对话框有“是”、“否”两个按钮C）该对话框有“是”、“否”、“取消”3个按钮D）该对话框通过选择参数可以得到以上不同的按钮组合34.执行下列语句：A = InputBox ("请输入第一个数")B = InputBox ("请输入第二个数")Print A + B当输入为111和222时，输出结果为34 。

A）111222 B）111 C）222 D）33335.下列程序段的输出结果是35 。

Dim s As IntegerFor i = 10 To 1 Step –2s = s + iNext iPrint iA）0 B）-1 C）1 D）-236.以下程序段运行后，输出结果是36 。

For i =1 To 3For j =1 To iIf j Mod 2 = 0 ThenPrint "@" ;ElsePrint "$" ;End IfNext jPrintNext iA）$ B）@ C）@ D）$ $$ @@ @$ $@$$$ @@@ @$@ $@$37.菜单控件只有一个37 事件。

A）KeyPress B）Click C）DblClick D）MouseDown 38.下面38 不是VB的文件类控件。

A）DriverListBox控件B）DirListBox控件C）FileListBox控件D）CommonDialog控件39.执行语句Open " Test .dat" For Output As #1，对文件Test .dat中的数据能够执行的操作是39 。

A）只能读，不能写B）既可以读，也可以写C）只能写，不能读D）不能读，不能写40.Data控件的40 属性用来设置访问的数据库类型。

A）DatabaseName B）Connect C）RecordSource D）RecordsetType二、填空题（每空2分，共20分）1.VB有3中工作模式，即设计模式、（1）和中断模式。

2.VB工程文件的扩展名为.vbp，窗体文件的扩展名为（2）。

3.若要将窗体Form1隐藏起来，调用语句为（3）。

4.数学表达式xy yx的VB表达式是（4）。

5.VB的三种基本流程控制结构是指：顺序结构、（5）与循环结构。

6.若要求输入密码时文本框中只显示“*”号，则应当在文本框的属性窗口中修改（6）属性值为“*”。

7.在VB中有（7）、随机型和二进制型三种数据文件访问类型。

8.若要显示一个弹出式菜单，可使用（8）方法。

9.下面程序的功能是找出100到999之间所有的“水仙花数”，请用正确的内容填空。

所谓“水仙花数”是指一个三位数，其各位数字的立方和等于该数本身，例如153=13+53+33，故153是“水仙花数”。

Private Sub Form_Click ()Dim p As IntegerFor n = 100 To 999a = （9）b = Int ( n – a * 100 ) / 10 )c = n Mod 10p= a ^ 3 + b ^ 3 + c ^ 3If （10）ThenPrint n ; "是水仙花数"End IfNext nEnd Sub三、阅读理解题（每小题4分，共20分）1.执行下面的程序后，若输入4，则输出的结果是 1 。

Private Sub Form_Click ()Dim x As Integer , y As Integerx = InputBox ("请输入一个整数")Select Case xCase Is >= 5y = x * 5Case Is >= 4y = x * 4Case Is >= 3y = x * 3Case Elsey = x * 2End SelectPrint x ; yEnd Sub 2.下面程序运行后，输出的结果是 2 。