1、VB笔试模拟试卷 185及答案与解析 1 程序流程图中带有箭头的线段表示的是 （ A）图元关系 （ B）数据流 （ C）控制流 （ D）调用关系 2 下面不属于软件设计原则的是 （ A）抽象 （ B）模块化 （ C）自底向上 （ D）信息隐蔽 3 下列选项中 ,不属于模块间耦合的是 （ A）数据耦合 （ B）标记耦合 （ C）异构耦合 （ D）公共耦合 4 下列叙述中 ,不属于软件需求规格说明书的作用的是 （ A）便于用户、开发人员进行理解和交流 （ B）反映出用户问题的结构 ,可以作为 软件开发工作的基础和依据 （ C）作为确认测试和验收的依据 （ D）便于开发人员进行需求分析 5 算法的时
2、间复杂度是指 （ A）执行算法程序所需要的时间 （ B）算法程序的长度 （ C）算法执行过程中所需要的基本运算次数 （ D）算法程序中的指令条数 6 已知数据表 A中每个元素距其最终位置不远 ,为节省时间 ,应采用的算法是 （ A）堆排序 （ B）直接插入排序 （ C）快速排序 （ D） B)和 C) 7 栈底至栈顶依次存放元素 A、 B、 C、 D,在第五个元素 E入栈前 ,栈中元素可以出栈 ,则出栈序 列可能是 （ A） ABCED （ B） DCBEA （ C） DBCEA （ D） CDABE 8 数据库设计包括两个方面的设计内容 ,它们是 （ A）概念设计和逻辑设计 （ B）模式设计
3、和内模式设计 （ C）内模式设计和物理设计 （ D）结构特性设计和行为特性设计 9 关系表中的每一横行称为一个 （ A）元组 （ B）字段 （ C）属性 （ D）码 10 设有表示学生选课的三张表 ,学生 S(学号 ,姓名 ,性别 ,年龄 ,身份证号 ),课程 C(课号 ,课名 ),选课 SC(学号 ,课号 ,成绩 ),则表 SC的关键字 (键 或码 )为 （ A）课号 ,成绩 （ B）学号 ,成绩 （ C）学号 ,课号 （ D）学号 ,姓名 ,成绩 11 窗体文件的扩展名是 （ A） .bas （ B） .cls （ C） .frm （ D） .res 12 设 y是整形变量 ,能判断 y为
4、奇数的表达式是 （ A） Not(y Mod 20 （ C） (y-1)Mod 21 13 下面说法不正确的是 （ A）变量名的长度不能超过 255个字符 （ B）变量名可以包含小数点或者内嵌的类型声明 字符 （ C）变量名不能使用关键字 （ D）变量名的第一个字符必须是字母 14 定义有 5个整数型元素的数组 ,正确的语句是 （ A） Dim a(4) As Integer （ B） Option Base 1:Dim a(5) （ C） Dim a 一个计时器控件 ,名称为 Timer1。要求每一秒在文本框中显示一次当前的时间。程序为 : Private Sub Timer1_ _( )
5、TxtTime.text=Time End Sub 在下划线上应填入的内容是 （ A） Enabled （ B） Visible （ C） Interval （ D） Timer 23 要使文本框获得输入焦点 ,则应采用文本框控件的方法是 （ A） GotFocus （ B） LostFocous （ C） KeyPress （ D） SetFocus 24 假定有如下的窗体事件过程 : Private Sub Form_Click() a$=“MicrosoftVisual Basic“ b$=Right(a$,5) c$=Mid(a$,1,9) MsgBox a$,34,b$,c$,5 E
6、nd Sub 程序运行后 ,单击窗体 ,则在弹出的信息框的标题栏中显示的信息是 （ A） Microsoft Visual （ B） Microsoft （ C） Basic （ D） 5 25 下面程序段执行结果为 x=Int(Rnd()+4) Select Case x Case 5 Print“excellent“ Case4 Print“good“ Case 3 Print“pass“ Case Else Print “fail“ End Select （ A） excellent （ B） good （ C） pass （ D） fall 26 设 A=“123456“,则表达式 V
7、al(Left(A,4)+Mid(A,4,2)的值为 （ A） 123456 （ B） 123445 （ C） 5 （ D） 6 27 在窗体上画一个通用对话框 ,其名称为 CommonDialog1,然后画一个命令按钮 ,并编写如下事件过程。 Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter= “All Files(*.*) |*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.S
8、howOpen MsgBox CommonDialog1.FileName End Sub 程序运行后 ,单击命令按钮 ,将显示一个 “打开 “对话框 ,此时在 “文件类型 “框中显示的是 （ A） All Files(*.*) （ B） Text Files(*.txt) （ C） Batch Files(*.bat) （ D） All Files(*.*) |Text Files(*.txt) 28 如果要将窗体中的某个命令按钮设置成无效状态 ,应该设置命令按钮的哪个属性 （ A） Value （ B） Visible （ C） Enabled （ D） Default 29 函数过程 F
9、un1的功能是 :如果参数 b为奇数 ,则返回值为 1,否则返回值为 0。 Function Fun1(b As Integer) if _ Then Fun1=0 Else Fun1=1 End If End Function 使该功能完整 ,应在空行处填入以下哪条语句 （ A） b Mod 2 Max Then Max=a(i) Next Fun=Max End Function 在窗体上添加一个命令按钮 ,然后编写如下事件过程 : Private Sub Command1_Click() ReDim m(1 To 4) As Integer m(1)=20: m(2)=30: m(3)=
10、50: m(4)=100 c=Fun(m) Print c End Sub 单击命令按钮 ,其输出结果为 【 】。 44 有如下 SUB过程 : Sub s(x As Single,y As Single) t=x x=t / y y=t Mod y End Sub 在窗体上添加一个命令按钮 ,然后编写如下事件过程 : Private Sub Form_Click() Dim a As Single Dim b As Single a=5 b=4 s a,b Print a,b End Sub 则程序运行后 ,单击命令按钮 ,输出的结果为【 】 。 45 下面运行程序后 ,单击命令按钮 ,输出
11、的结果是 【 】 。 Private Sub Command1_Click() Dim a%(1 To 5),i%, s# For i=1 To 5 a(i)=i Next s=Fun(a) Print “s=“; s; End Sub Function Fun(a() As Integer) Dim t#, i% t=1 For i=LBound(a) To UBound(a) Next Fun=t End Function 46 下列程序弹出对话框中按钮的个数为【 】。 MsgBox确认 !,vbAbortRetryignore+vbMsgBoxHelpButton+vbInformation,提示 ; 47 在 KeyPress事件过程中 ,KeyAscii是所按键的 【 】 值。 48 下面程序的功能是统计字符串中 “i“的个数 ,请填空。 Sub COU( ) Dim n As Integer a$=“ Beijing University of Technology“ n=Len(a$) For i=1 To n b$=【 】 If b$=“i“ Then x=x+1 Next Print“x=“ ; x End Sub VB笔试模拟试卷 185答案与解析
