[计算机类试卷]VB笔试模拟试卷107及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷107及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷107及答案与解析.doc(20页珍藏版)》请在麦多课文档分享上搜索。
1、VB笔试模拟试卷 107及答案与解析 1 以下叙述中错误的是 ( A) Visual Basic是事件驱动型可视化编程工具 ( B) Visual Basic应用程序不具有明显的开始和结束语句 ( C) Visual Basic工具箱中的所有控件都具有宽度 (Width)和高度 (Height)属性 ( D) Visual Basic中控件的某些属性只能在运行时设置 2 以下叙述中错误的是 ( A)在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 ( B)以 .BAS为扩展名的文件是标准模块文件 ( C)窗体文件包含该窗体及其控件的属性 ( D)一个工程中可以含有多个标准模块文
2、件 3 对于长度为 n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是 ( A)冒泡排序为 n/2 ( B)冒泡排序为 n ( C)快速排序为 n ( D)快速排序为 n(n-1)/2 4 设有如下的记录类型: Type Student number As String name As String age As Integer End Type 则正确引用该记录类型变 量的代码是 ( A) Student.name=“张红 ” ( B) Dim s As Student s.name=“张红 ” ( C) Dim s As Type Student s.name=“张红 ” (
3、 D) Dim s As Type s.name=“张红 ” 5 在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=InputBox(“Input“) Select Case x Case 1, 3 Print“分支 1” Case Is 4 Print“分支 2” Case Else Print “Else分支 ” End Select End Sub 程序运行后,如果在输入对话框中输入 2,则窗体上显示的是 ( A)分支 1 ( B)分支 2 ( C) Else分支 ( D)程序出错 6 在软件设计中,不
4、属于过程设计:工具的是 ( A) PDL(过程设计语言 ) ( B) PAD图 ( C) N-S图 ( D) DFD图 7 软件测试的目的是 ( A)证明软件系统中存在错误 ( B)找出软件系统中存在的所有错误 ( C)尽可能多地发现系统中的错误和缺陷 ( D)证明软件的正确性 8 下列描述中正确的是 ( A)程序就是软件 ( B)软件开发不受计算机系统的限制 ( C)软件既是逻辑实体,又是物理实体 ( D)软件是程序、数据与相关文档的集合 9 利用 E-R模型进行数据库的概念设计,可以分成三步:首先设计局部 E-R模型,然后把各个局部 E-R模型综合成一个全局的模型,要得到最终的 E-R模型
5、 ,还要对全局 E-R模型进行 ( A)简化 ( B)结构化 ( C)最小化 ( D)优化 10 设 a=“Visual Basic“,下面使 b=“Basic“的语句是 ( A) b=Left(a, 8, 12) ( B) b=Mid(a, 8, 5) ( C) b=Right(a, 5, 5) ( D) b=Left(a, 8, 5) 11 执行以下语句后,输出的结果是 a$= “Good“ b$=“Afternoom“ Print a$+b$ Print a$&b$ ( A) GoodAfternoon GoodAfternoon ( B) Good+ GoodAfternoon ( C
6、) Good+ Good&Afternoon ( D) Good Good& 12 单击命名按钮时,下列程序代码的执行结果为 Public Sub procl ( n As Integer, Byval m As Integer) n=n Mod 10 m=m Mod 10 End Sub Private Sub Cmmand1 Click() Dim x As Integer, y As Integer x=12: y=12 Call Procl (x, y) Print x; y End Sub ( A) 12 2 ( B) 2 12 ( C) 2 2 ( D) 12 12 13 执行以下
7、 Command1的 Click事件过程在窗体上显示 Option Base 1 Private Sub Command1 Click() Dim a a= Array(“a“, “b“, “C“, “d“, “e“, “f“, “g“) Print a(1); a(3); a(5) End Sub ( A) ab; ( B) bdf ( C) ace ( D)出错 14 设 a=2, b=3, c=4, d=5,下列表达式的值是 Not a =C Or 4*c=b2 And b a+c ( A) -1 ( B) 1 ( C) True ( D) False 15 设 a=“a“, b=“b“
8、, c=“c“, d=“d“,执行语句 x=IIf(a B)Or(c D), “A“, “B“)后, x的值为 ( A) a ( B) b ( C) B ( D) A 16 下面程序段的输出结果为 _。 Print “10+20=“, Print 10+20 Print “20+20=“; Print 20+20 ( A) 10+20=30 20+20=40 ( B) 10+20= 30 20+20= 40 ( C) 10+20 20+20 ( D) 10+20=30 20+20= 40 17 如果要在菜单中添加一个分隔 线,则应将其 Caption属性设置为 ( A) = ( B) * (
9、C) & ( D) - 18 在窗体上绘制一个文本框和一个计时器控件,名称分别为 Text1和 Timer1,在属性窗口中把计时器的 Interval属性设置为 1 000, Enadled属性设置为 False。程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序: Private Sub Command1 Click() Timerl._ End Sub Private Sub Timer_Timer() Text1.Text=Time End Sub 在横线处应填入的内容是 ( A) Enabled=True ( B) Enabled=Fals
10、e ( C) Visible=True ( D) Visible=False 19 一个工程中含有窗体 Form1、 Form2和标准模块 Model1,如果在 Form1中有语句 Public X As Integer,在 Model1中有语句 Public Y As Integer,则以下叙述中正确的是 ( A)变量 X、 Y的作用域相同 ( B) Y的作用域是 Model1 ( C)在 Form1中可以直接使用 X ( D)在 Form2中可以直接使用 X和 Y 20 设有以下循环结构 Do 循环体 Loop While条件 则以下叙述中错误的是 ( A)若 “条件 ”是一个为 0的常数
11、,则一次也不执行循环体 ( B) “条件 ”可以是关系表达式、逻辑表达式或常数 ( C)循环体中可以使用 Exit Do语句 ( D)如果 “条件 ”总是为 True,则不停地执行循环体 21 有如下程序: Private Sub Form Click() Dim Check, Counter Check=True Counter=0 Do Do While Counter 20 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter, C
12、heck End Sub 程序运行后,单击窗体,输出结果为 ( A) 15 0 ( B) 20 -1 ( C) 10 Tree ( D) 10 False 22 有如下程序: Private Sub Form Click() Dim i As Integer, sum As Integer sum=0 For i=2 To 10 If i Mod 2 0 And i Mod 3=0 Then sum=sum+i End If Next i Print sum End Sub 程序运行后,单击窗体,输出结果为 ( A) 12 ( B) 30 ( C) 24 ( D) 18 23 在窗体上画一个名
13、称为 Text1的文本框和一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 Click() Dim array1 (10, 10) As Integer Dim i As Integer, j As Integer For i=1 To 3 For j=2 To 4 array1(i, j)=i+j Next j Next i Text1.Text=array1(2, 3)+array1(3, 4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是 ( A) 12 ( B) 13 ( C) 14 ( D) 15 24 在窗体
14、 上画一个名称为 Command1的命令按钮和一个名称为 Text1的文本框,然后编写如下程序: Private Sub Command1 Click() Dim x, y, z As Integer x = 5 y = 7 z = 0 Text1.Text = “ “ Call P1(x, y, z) Text1.Text=Str(z) End Sub Sub Pl(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a + b End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的内容是 ( A) 0 ( B) 12
15、 ( C) Str(z) ( D)没有显示 25 有如下程序: Option Base 1 Private Sub Form Click() Dim arr, Sum Sum =0 arr=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19) For i=1 To 10 If arr(i)/3=arr(i)3 Then Sum=Sum+arr(i) End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为 ( A) 25 ( B) 26 ( C) 27 ( D) 28 26 把窗体的 KeyPreview属性设置为 True,
16、然后编写如下事件过程: Prirate Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch) Print Chr(KeyAscii+2) End Sub 程序运行后,按键盘上的 A键,则在窗体上显示的内容是 ( A) A ( B) B ( C) C ( D) D 27 在窗体上绘制一个命令按钮和一个文本框,名称分别为 Command1和 Text1,然后编写如下程序: Private Sub Command1+Click() a=InputBox(“请输入日
17、期(1 31)”) t=“旅游景点: ” &If(a 0 And a = 10, “长城 ”, “ “) &IIf(a 10 And a = 20, “故宫 ”, “ “) &IIf(a 20 And a =31, “颐和园 ”, “ “) Text1.Text=t End Sub 程序运行后,如果从键盘上输入 16,则在文本 框中显示的内容是 ( A)旅游景点:长城故宫 ( B)旅游景点:长城颐和园 ( C)旅游景点:颐和园 ( D)旅游景点:故宫 28 函数过程 F1的功能是:如果参数 b为奇数,则返回值为 1,否则返回值为 0。以下能正确实现上述功能的代码是 ( A) Function
18、F1(b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function ( B) Function F1(b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function ( C) Function F1(b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Function ( D) Function F1(b As Integer) If b Mod 2 0 Then Retur
19、n 0 Else Return 1 End If End Function 29 以下叙述中错误的是 ( A)在程序运行时,通用对话框控件是不可见的 ( B)在同一个程序中,用不同的方法 (如 ShowOpen或 ShowSave等 )打开的通用对话框具有不同的作用 ( C)调用通用对话框控件的 ShowOpen方法,可以直接打开在该通用对话框中指定的文件 ( D)调用通用对话框控件的 ShowColor方法,可以打开颜色对话框 30 阅读程序: Option Base 1 Dim arr() As Integer Private Sub Form Click() Dim i As Integ
20、er, i As Integer ReDim arr(3, 2) For i=1 To 3 For j=1 To 2 arr(i, j)=i*2+j Next j Next i ReDim arr(3, 2)+arr(3, 4) End Sub 程序运行后,单击窗体,输出结果 为 ( A) 21 ( B) 13 ( C) 8 ( D) 25 31 测试的目的是暴露错误,评价程序的可靠性;而【 】的目的是发现错误的位置井改正错误。 32 在最坏情况下,堆排序需要比较的次数为【 】。 33 若串 s=“Program“,则其子串的数目是【 】。 34 千个项目具有一个项目主管,一个项目主管可管理多
21、个项目,则实体 “项目主管 ”与实体 “项目 ”的联系属于【 】的联系。 35 数据库管理系统常见的数据模型有层次模型、网状模型和【 】三种; 36 下列表达式有错 误,正确的写法应该是【 】。 (a+B+e/80-5(d+e) 37 在窗体上画两个文本框,其名称分别为 Text1和 Text2,然后编写如下事件过程: Private Sub Form_Load() Show Textl.Text=“ Text2.Text=“ Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Intege
22、r) Textl.Text=Textl.Text+Chr(KeyCode-4) End Sub 程序运行后,如果在 Text2文本框中输入 “efghi”,则 Text1文本框中的内容为【 】。 38 当用【 】方式打开文件时,如果对文件进行写操作,则写入的数据附加到原来文件的后面。 39 在窗体上画一个命令按钮,其名称为 Command1,然后编写如下程 序; Function M(x As Integer,y As Integer) M=IIf(x y,x,y) End Function Private Sub Commandl_Click() Dim a As Integer,b As
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 107 答案 解析 DOC
