1、VB笔试模拟试卷 189及答案与解析 1 以下叙述中错误的是 ( )。 （ A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 （ B）保存 Visual Basic程序时，应分别保存窗体文件及工程文件 （ C） VisualBasic应用程序只能以解释方式执行 （ D）事件可以由用户引发，也可以由系统引发 2 下列不能打开属性窗口的操作是 ( )。 （ A）执行 “视图 ”菜单中的 “属性窗口 ”命令 （ B）单击工具栏上的 “属性窗口 ”按钮 （ C）按 Ctrl+T快捷 键 （ D）按 F4键 3 Visual Basic集成的主窗口中不包括 ( )。 （ A）属性窗
2、口 （ B）标题栏 （ C）菜单栏 （ D）工具栏 4 下面表达式中， ( )的运算结果与其他三个不同。 （ A） Exp(-3.5) （ B） Int(-3.5)+0.5 （ C） -Abs(-3.5) （ D） Sgn(-3.5)-2.5 5 算法的时间复杂度是指 ( )。 （ A）执行算法程序所需要的时间 （ B）算法 程序的长度 （ C）算法执行过程中所需要的基本运算次数 （ D）算法程序中的指令条数 6 用 Visual Basic编写的应用程序的特点是 ( )。 （ A）无须有明显的开头程序和结尾部分 （ B）无须编写任何程序代码 （ C）必须有明确的开头程序才能启动运行 （ D）
3、必须有结尾的程序段才能正常运行 7 下面子过程语句说明合法的是 ( )。 （ A） Sub f1(ByValx() As Integer) （ B） Subf1(x%()As Integer （ C） Functionf1%(f1%) （ D） Functionf1%(x As Integer) 8 以下属于 VisualBasic合法的数组元素是 ( )。 （ A） x8 （ B） x8 （ C） s(0) （ D） v8 9 以下关于文件的叙述中，错误的是 ( )。 （ A）顺序文件中的记录一个接一个地顺序存放 （ B）随机文件中记录的长度是随机的 （ C）执行打开文件的命令后，自动生成一
4、个文件指针 （ D） LOF函数返回给文件分配的字 节数 10 一个工程必须包含的文件的类型是 ( )。 （ A） *.vbp、 *.rrm、 *.frx （ B） *.vbp、 *.cls、 *.bas （ C） *.bas、 *.OCX、 *.res （ D） *.frm、 *.cis、 *.bas 11 不能正确表示条件 “两个整型变量 A和 B之一为 0，但不能同时为 0”的布尔表达式是 ( )。 （ A） A*B=0 And A B （ B） (A=0 Or B=0)And A B （ C） A=0 And B 0 Or A 0 And B=0 （ D） A*B=O And(A=0
5、Or b=0) 12 把窗体设置为不可见的，应该将 ( )属性设置为 False。 （ A） Font （ B） Caption （ C） Enable （ D） Visible 13 下列符号常量的声明中， ( )是不合法的。 （ A） Const a As Single=1.1 （ B） Const As Integer=“12“ （ C） Const a AS Double=Sin(1) （ D） Const a=“OK“ 14 假定在图片框 Picturel中装入了一个图形，为了清除该图形 (不删除图片框 )，应采用的正确方法是 ( )。 （ A）选择图片框，然后按 Del键 （ B）
6、执行语句 Picture 1.Picture=Load Picture(“) （ C）执行语句 Picture1.Picture=“ （ D）选择图片框，在属性窗口中选择 Picture属性条，然后按回车键 15 下列对象不能响应 Crick事件的是 ( )。 （ A）列表框 （ B）图片框 （ C）窗 体 （ D）计时器 16 执行了下面的程序后，组合框中数据项的值是 ( )。 PrivateSubForm_Click() Fori=1 To 6 Comb01.Addltem i Nexti Fori=1 To 3 Combol Removeltem i Nexti End Sub （ A）
7、 1 5 6 （ B） 1 3 5 （ C） 4 5 6 （ D） 2 4 6 17 要强制显示声明变量，可在窗 体模块或标准模块的声明段中加入语句 ( )。 （ A） Option Base 0 （ B） Option Explicit （ C） Option Base 1 （ D） Option Compare 18 下列能正确产生 1， 30之间的随机整数的表达式是 ( )。 （ A） 1+md(30) （ B） 1+30*md() （ C） md(1+30) （ D） int(md()*30)+1 19 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Comma
8、ndl_Click() Dim a(5)As String Fori=1 To 5 a(i)=Chr(Asc(“A“)+(11) Nexti For Each b In a Print b Next End Sub 程序运行后，单击命令按钮，输出结果是 ( )。 （ A） ABCDE （ B） 1 2 3 4 5 （ C） abcde （ D）出错 信息 20 设已打开 5个文件，文件号为 1， 2， 3， 4， 5。要关闭所有文件，以下语句正确的是 ( )。 （ A） Closeg1,2,3,4,5 （ B） Close#1； #2， #3， #4； #5 （ C） Close#1-#5 （
9、 D） Close 21 下列字符串常量中，最大的是 ( )。 （ A）北京 （ B）上海 （ C）天津 （ D）广州 22 要清除列表框中所有的列表项时，应使用 ( )方法。 （ A） Remove （ B） Clear （ C） RemoveItem （ D） Move 23 在窗体上画 1个文本框，其名称为 Text1，然后编写如下过程： Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_Key Up(KeyCode As
10、Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后，把焦点移到文本框中，此时如果敲击 “A” 24 在程序运行期间属性值不允许改变的属性是 ( )属性。 （ A） Caption （ B） Name （ C） BackColor （ D） Enabled 25 下列 ( )符号不能作为 VB中的变量名。 （ A） ABCabc （ B） b1234 （ C） 28wed （ D） crud 26 关于创建通用过程的方法叙述正确的是 ( )。 （ A）双击窗体 打开的 “代码编辑窗口 ”中不能创建通用过程 （ B）创建通用过程
11、一定要使用 Sub关键字 （ C）选择 “工具 ”下拉菜单中的 “添加过程 ”命令才能创建通用过程 （ D）在 “代码编辑窗口 ”中即可以建立事件过程，也能建立通用过程 27 设有语句： Open“d:Test.txt“ForOutput As#1，以下叙述中错误的是 ( )。 （ A）若 d盘根目录下无 Test.txt文件，则该语句创建此文件 （ B）用该语句建立的文件的文件号为 1 （ C）该语句打开 d盘根目录下一个已存在的文件 Test.txt，之后就可以从文件中读取信息 （ D）执行该语句后，就可以通过 Print#语句向文件 Test.txt中写入信息 28 执行下列程序段后，输
12、出的结果是 ( )。 Forkl=0 To 4 y=20 For k2=0 To 3 y=10 Fork3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y （ A） 90 （ B） 60 （ C） 40 （ D） 10 29 执行以下 Commandl的 Click事件过程，在窗体上显示 ( )。 Option Base 0 Private Sub Commandl_Click() Dima a=Array(“a“， “b“， “c“， “d“， “e“， “f“， “g“) Printa(1);a(3);a(5) End Sub （ A） abc
13、（ B） bdf （ C） ace （ D）出错 30 可以用 InputBox函数产生 “输入对话框 ”。执行语句 “st$=(hputBox(“请输入字符串 ”， “字符串对话框 ”， “字符串 ”)”时，当用户输入完毕，按 OK按钮后， stS变量的内容是 ( )。 （ A）字符串 （ B）请输入字符串 （ C）字符串对话框 （ D）用户输入的内容 31 语句 Print5/4*65Mod2的输出结果是 ( )。 （ A） 0 （ B） 1 （ C） 2 （ D） 3 32 先在窗体上添加一个命令按钮，然后 编写如下程序： Function fun(ByValnum As Long)As
14、 Long Dim k As Long k=1 num=Abs(nam) Do While num k=k*(num Mod 10) num=num10 Loop Fun=k End Function PrivateSubCommandl_Click （ A） 0 （ B） 100 （ C） 200 （ D） 300 33 以下能在窗体 Forml的标题栏中显示 “Visual Basic窗体 ”的语句是 ( )。 （ A） Forml.Namer=“VisualBasic窗体 “ （ B） Forml.Title=“VisualBasic窗体 “ （ C） Forml.Caption=“Vi
15、sualBasic窗体 “ （ D） Forml.Text=“VisualBasic窗体 “ 34 Int(100*Rnd(1)产生的随机整数的闭区间是 ( )。 （ A） 0,99 （ B） 1,100 （ C） 0,100 （ D） 1,99 35 在窗体上画一个命令按钮，然后编写如下程序。运行后，单击命令按钮，输出结果为 ( )。 Private Sub Command4_Click() Dima As Integer,bASInteger a=1 b=2 PrintN(a,b) End Sub Function N(X As Integer,yAsInteger)AsInteger N
16、=IIf(x y， x， y) End Funcfion 36 VisualBasic中有一种控件组合了文本框和列表框的特性，这种控件是 _。 37 DefSng a定义的变量 a是 _类型的变量。 38 顺序存储方法是把逻辑上相邻的结点存储在物理位置 _的存储单元中。 39 刚建立工程时，使窗体上的所有控件具有区别于默认值的相同的字体格式，应对 Form窗体的 _属性进行设置。 40 图像框中的图形能与图像框的大小相适应，必须把该图片框的 Stretch属性设置为 _。 41 在鼠标事件过程 MouseDown和 MouseUp中，参数 Button的值为 1、 2、 4时，分别代表按下鼠标
17、的 _、 _和 _按钮。 42 已知变量 boo1Var是一个布尔型的变量，如果要给其赋值为 True，则正确的赋值语句是 _。 43 执行下列语句后，输出结果是 _。 s$=“ABCDEFG“ Print lnStr(s$,“efg“) Print LCase$(s$) 44 表达式 “12345“ “12345“&“ABC“的值是 _。 45 在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程： Private Sub Form_C1ick() Textl.Text=“VB Programming“ End Sub Private SubText1_change() Picture
18、1.Print“VB程序设计 “ End SUb 程序运行后，单击窗体，则在文本框中显示的内容是 _，而在图片框中显示的内容是 _。 46 下列程序用于在带垂直滚动条的文本 框 Text1中输出 3到 100之间的全部素数。请填空。 Private Sub Command1_click() Text1.Text=“ For n=3 to 100 k=Int(Sqr(n) i=2 Flag=0 Do While i = _And Flag=0 If n Mod i=0 Then Flag=1 47 阅读程序： Option Base 1 Private Sub Form_Click() Dima
19、(3)As Integer Print“输入的数据是 :“； Fori=1 To 3 a(i)=InputBox(“输入数据 ”) Printa(i)； Next Print If a(1) a(2) Then t=a(1) a(1)=a(2) a(2)= 10 VB笔试模拟试卷 189答案与解析 1 【正确答案】 C 2 【正确答案】 C 3 【正确答案】 A 4 【正确答案】 A 5 【正确答案】 C 6 【正确答案】 A 7 【正确答案】 D 8 【正确答案】 C 9 【正确答案】 B 10 【正确答案】 A 11 【正确答案】 D 12 【正确答案】 D 13 【正确答案】 B 14
20、【正确答案】 B 15 【正确答案】 D 16 【正确答案】 B 17 【正确答案】 B 18 【正确答案】 D 19 【 正确答案】 A 20 【正确答案】 D 21 【正确答案】 C 22 【正确答案】 B 23 【正确答案】 C 24 【正确答案】 B 25 【正确答案】 C 26 【正确答案】 D 27 【正确答案】 C 28 【正确答案】 C 29 【正确答案】 B 30 【正确答案】 D 31 【正确答案】 B 32 【正确答案】 A 33 【正确答案】 C 34 【正确答案】 A 35 【正确答案】 B 36 【正确答案】 组合框或组合 37 【正确答案】 单精度 38 【正确答
21、案】 相邻 39 【正确答案】 Font 40 【正确答案】 True 41 【正确答案】 左 右 中间 【试题解析】 MouseDown、 MouseUp和 MouseMove事件均能区分出鼠标的左、右和中间按钮。 Button参数与按钮的刘应关系是：当 Button=1时，对应于左按钮 (位 0)；当 Button=2时，对应于右按钮 (位 1)；当 Button=4时，刘应于中间按钮 (位 2)。 42 【正确答案】 boo1Var=Ture 【试题解析 】 赋值运算符号为 “=”，功能是将右侧的值赋值给左侧的变量，并要求两侧的数据类型匹配，布尔类型的值有两个 True或 False，所
22、以正确的赋值形式为：布尔型变量名 =True(或 False)。 43 【正确答案】 0 CR abcdefg 【试题解析】 本题考查了字符串函数的应用。 lnStr函数是字符串匹配函数，它的格式为： InStr(首字符位置， 字符串 1，字符串 2， n)。它的功能是在字符串1中查找字符串 2，如果找到了，则返回字符串 2的第一个字符在字符串 1中的位置。注意：字符串的第一个字符 的位置为 1。 44 【正确答案】 True 45 【正确答案】 VB Programming VB程序设计 【试题解析】 单击窗体触发 Form的 Click事件，执行 “Text1.Text=“VB Progr
23、amming“”语句，在文本框 Text1中显示 “VB Programming“；此时文本框Text1的 Text属性发生了变化，因此触发 Text1的 Change事件，执行“Picture1.Print“VB程序设计 “”语句，在图片框中显示 “VB程序设计 ”。 46 【正确答案】 k Flag=0 【试题解析】 判断一个数是不是素数，其算法是：从 2开始到该数的平方根的下限 (即为题中 k的值 )去除这个数，如果没有可以整除的数财说明该数是个素数。本题中设置了一个标志变量 Flag，默认值为 0，如果在整除的循环中，检查出该数不是素数，则设置 Flag为 1，也就是循环后 Flag为 0的数表示该数是素数，并把它显示在 Text1文本框。 47 【正确答案】 T,a(3)
