[计算机类试卷]VB笔试模拟试卷120及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷120及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷120及答案与解析.doc(23页珍藏版)》请在麦多课文档分享上搜索。
1、VB笔试模拟试卷 120及答案与解析 1 下列叙述正确的是 ( )。 ( A)算法的执行效率与数据的存储结构无关 ( B)算法的空间复杂度是指算法程序中指令 (或语句 )的条数 ( C)算法的有穷性是指算法必须能在执行有限个步骤之后终止 ( D)以上 3种描述都不对 2 数据的存储结构是指 ( )。 ( A)数据所占的存储空间 ( B)数据的逻辑结构在计算机中的存放形式 ( C)数据在计算机中的顺序存储方式 ( D)存储在计算机外存中的数据 3 栈和队列的共同点是 ( )。 ( A)都是先进 先出 ( B)都是先进后出 ( C)只允许在端点处插入和删除元素 ( D)没有共同特点 4 有下列二叉
2、树,对此二叉树中序遍历的结果为 ( )。 ( A) ABCDEF ( B) BDAECF ( C) ABDCEF ( D) ABCDFE 5 对长度为 n的线性表进行顺序查找,在最坏情况下需要比较的次数为 ( )。 ( A) 125 ( B) n/2 ( C) n ( D) n+1 6 源程序的文档化不包括 ( )。 ( A)符号名的命名要有实际意义 ( B)正确的文档形式 ( C)良好的视觉组织 ( D)正确的程序注释 7 下列描述中正确的是 ( )。 ( A)软件工程只是解决软件项目的管理问题 ( B)软件工程主要解决软件产品的生产率问题 ( C)软件工程的主要思想是强调在软件开发过程中需
3、要应用工程化原则 ( D)软件工程只是解决软件开发过程中的技术问题 8 为了提高软件模块的独立性,模块之间最好是 ( )。 ( A)控制耦合 ( B)公共耦合 ( C)内容耦合 ( D)数据耦合 9 数据库系统的核心是 ( )。 ( A)数据模型 ( B)数据库管理系统 ( C)数据库 ( D) 数据库管理员 10 待排序的关键码序列为 (33, 18, 9, 25, 67, 82, 53, 95, 12, 70),要按关键码值递增的顺序排序,采取以第一个关键码为基准元素的快速排序法,第一趟排序后关键码 33被放到第 ( )个位置。 ( A) 3 ( B) 5 ( C) 7 ( D) 9 11
4、 在窗体中放置控件,对该控件的操作错误的是 ( )。 ( A)单击窗体上没有控件处,可把活动控件变为不活动控件 ( B)双击任一个控件内部,可激活该控件的代码窗口 ( C)双击一个控件内部,可把活动控件变为不活动控件 ( D)拖动一个活动控件四周的控制小方块可缩放控件 12 在随机文件中使用用户自定义数据类型时,要注意它的成员的要求,它的成员不能是 ( )。 ( A)定长字符串和数组 ( B)变长字符串和动态数组 ( C)货币型和日期型 ( D)变长字符串和货币型 13 语句 Y=Y+1的正确含义是 ( )。 ( A)变量 Y的值与 Y+1的值相等 ( B)将变量 Y的值存到 Y+1中去 (
5、C)将变量 Y的值加 1后赋值给变量 Y ( D)变量 Y的值为 1 14 设 “A=“87654321“”,则表达式 Val(Left(A, 4)+Mid(A, 4, 2)的值为 ( )。 ( A) 876543 ( B) 876554 ( C) 8 ( D) 6 15 已知代数式 eXSin(30)2x/(x+y)Lnx,则正确的 Visual Basic表达式为 ( )。 ( A) E*Sin(30*3.14/180)*2*X/X+Y*Log(X) ( B) Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X) ( C) Exp(x)*Sin(30*3.14/180)*2*x/(
6、x+y)*Log(x) ( D) Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(X) 16 下列程序的输出图形是 ( )。 For k=0 To 360 cr=Int(160 * RnD)ang=-1415926/180*k Circle(2000, 2000), 500, cr,0, ang Next ( A)一段彩色圆弧 ( B)一个彩色扇形 ( C)一个彩色空心圆 ( D)一个辐射状彩色圆形 17 在文本框控件中,将 Text的内容全部显示为用户所定义的字符的属性是 ( )。 ( A) PasswordChar ( B)需要编程来实现 ( C) Passwor
7、d ( D)以上都不是 18 在窗体上有一个文本框 Text1, Text属性值为空,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String, n As Integer str=UCase(Chr(KeyAscii) n=Len(str) Text1.Text=String(n, str) End Sub 程序运行 后,若在文本框中输入单字母 “p”,则在文本框 Text1中显示的内容为 ( )。 ( A) pp ( B) pP ( C) PP ( D) Pp 19 要清除已经在图片框 Pict
8、urel中打印的字符串而不清除图片框中的图像,应使用语句 ( )。 ( A) Picturel.Cls ( B) Picturel.Picture=LoadPicmre(“) ( C) Picturel.Pint“ ( D) Picturel.Picture“ 20 下列控件属性中,属性值的类型不相同的一项是 ( )。 ( A) Label控件的 Enabled属性与 TextBox控件的 Enabled属性 ( B) OptionButton控件的 Value属性与 CheckBox控件的 Value属性 ( C) Command控件的 Default属性与 Command控件的 Cance
9、l属性 ( D) Command控件的 Visible属性与 Form控件的 Visible属性 21 ( )属性用于设置组合框的风格。 ( A) Backstyle ( B) Borderstyle ( C) Style ( D) Sorted 22 某程序列表框 中有许多项,现在用 Timer控件控制时间, 0.1秒删除一项,直到删完为止,用一滚动条来显示删除的项目,请选择合适的语句,完成此程序 ( )。Private Sub Command2_Click() HScroll1.Min=0 HScroll1.Max=List1.ListCount HScroll1.Value=0 Time
10、r1.Interval= Timer1.Enabled=True End Sub Private Sub Timer1_Timern If List1.ListCount 0 Then List1.RemoveItem 0 HScroll1.Value=HScroll1.Max-Listl.ListCount Else Timer1.Enabled= MsgBox“全部删除 !“ End If End Sub ( A) 100 False ( B) 0.1 True ( C) 100 True ( D) 0.1 False 23 下列程序执行后,变量 x的值为 ( )。 Dim a, b, c
11、, d As Single Dim x As Single a=10 b=30 c=400 If b a Then d=a: a=b: b=d End If If b c Then x=b Else If a c Then x=c Else x=a End If ( A) 10 ( B) 30 ( C) 400 ( D) 430 24 在窗体上有文本框 Text1和命令按钮 Command1,并有如下事件过程: Private Sub Command1_Click() Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 If i 1
12、0 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮,程序运行后,在文本框中显示的值是 ( )。 ( A) 2 ( B) 3 ( C) 4 ( D) 5 25 下列程序的运行结果是 ( )。 Private Function myfun(m, n) Do While m n Do While m n:m=m-n:Loop Do While n m:n=n-m:Loop Loop myfun=m End Function Private Sub Command1_Click() Print myfun(9, 8) End Sub ( A) 2
13、 ( B) 1 ( C) 4 ( D) 3 26 在窗体上放置一个命令按钮 Command1,并编写下列单击事件的程序: Option Base 1 Private Sub Command1_Click() Dim c As Integer,d As Integer d=0 c=6 X=Array(2, 4, 6, 8, 10, 12) For i=1 To 6 If X(i) c Then d=d+X(i) c=X(i) Else d=d-c End If Next i Print d End Sub 程序运行后,单击命令按钮,则在窗体上输出的结果为 ( )。 ( A) 10 ( B) 12
14、 ( C) 16 ( D) 20 27 下列程序段的输出结果为 ( )。 Dim M(5, 5), S(5) For i=1 To 5 S(i)=0 For j=1 To 5 M(i, j)=i+j S(i)=S(i)+M(i, j) Next j Next i For Each x In S Print x; Next x ( A) 20 23 24 35 40 ( B) 20 25 30 35 40 ( C) 20 23 25 35 40 ( D) 20 25 35 40 45 28 在窗体上画 4个文本框,并用这 4个文本框建立一个控件数组,名称为Text1(下标从 0开始,自左至右顺序
15、增大 ),然后编写如下事件过程: Private Sub Command1_Click() For Each Text Box In Text1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后,单击命令按钮, 4个文本框中显示的内容分别 为 ( )。 ( A) 0 1 2 3 ( B) 1 2 34 ( C) 0 1 3 2 ( D)出错信息 29 Sub过程与 Function过程最根本的区别是 ( )。 ( A) Sub过程可以使用 Call语句或直接使用过程名调用,而 Function过程不可以 ( B) Function过程可以有参数,
16、 Sub过程不能有参数 ( C)两种过程参数的传递方式不同 ( D) Sub过程的过程名不能有返回值,而 Function过程能通过过程名返回值 30 窗体上有两个文本框 Text1、 Text2以及一个命令按 钮 Command1,编写下列程序: Dim y As Integer Private Sub Command1_Click() Dim x As Integer x=2 Text1.Text=p2(p1(x), y) Text2.Text=p1(x) End Sub Private Function p1(x As Integer)As Integer x=x+y: y=x+y p1
17、=x+y End Function Private Function p2(x As Integer, y As Integer)As Integer p2=2*x+y End Function 当单击 1次和单击 2次命令按钮后,文本框 Text1和 Text2内的值分别为 ( )。 ( A) 2 4 2 4 ( B) 2 4 4 8 ( C) 4 4 8 8 ( D) 10 10 58 58 31 下列叙述正确的是 ( )。 ( A)任何时候都可以使用标准工具栏中的 “菜单编辑器 ”按钮打开菜单编辑器 ( B)只有当代码窗口为 当前活动窗口时,才能打开菜单编辑器 ( C)只有当窗体设计窗口
18、为当前活动窗体时,才能打开菜单编辑器 ( D)任何时候都可以使用 “工具 ”菜单中的 “菜单编辑器 ”命令,打开菜单编辑器 32 下列程序的功能是:调用字体对话框来设置文本框中的字体,单击 Command1按钮弹出对话框,进行相应的字体、字号等的设置,然后单击。 “确定 ”按钮退出对话框,则将发生哪些变化 ( )。 Private Sub Command1_Click() CommonDialogl.CancelError=True CommonDialogl.Flags=3 On Error Resume Next CommonDialogl.ShowFont Textl.Font.Name
19、=CommonDialogl.FontName Textl.Font.Size=CommonDialogl.FontSize Textl.Font.Bold=CommonDialogl.FontBold Textl.Font.Italic=CommonDialogl.FontItalic Textl.Font.Underline=CommonDialogl.FontUnderline Textl.FontStrikethru=CommonDialogl.FontStrikethru Textl.ForeColor=CommonDialogl.Color End Sub ( A) Text1的字
20、体不发生变化 ( B) Text1的字体发生变化 ( C) Text1的字体和颜色发生变化 ( D)程序出错 33 Visual Basic根据计算机访问文件的方式将文件分成 3类,其中不包括 ( )。 ( A) 顺序文件 ( B) Unix文件 ( C)二进制文件 ( D)随机文件 34 下列程序的功能是:将数据 1, 2, , 8写入顺序文件 Num.txt中,请选择正确的程序段。 Private Sub Form_Click() Dim i As Integer Open “Num.txt“ For Output As #1 For i=1 To 8 Next i Close #1 En
21、d Sub ( A) print #1, i ( B) input #1, i ( C) print #1 ( D) input #1 35 有下列程序段,单击命令按钮执行程序后,输出结果为 ( )。 Option Base 1 Private Sub Command1_Click() Dim x x=Array(23, -5, 17, 38, -31, 46, 11,8, 5, -4) s1=0 s2=0 For k=1 To 10 If(x(k) 0)Then s1=s1+x(k) Else s2=s2+x(k) End If Next k Y=s1/Abs(s2) Print Y End
22、 Sub ( A) 148 ( B) 40 ( C) -40 ( D) 3.7 36 在程序设计阶段应该采取 _和逐步求精的方法,把一个模块的功能逐步分解,细化为一系列具体的步骤,继而用某种程序设计语言写成程序。 37 注释一般分为序言性注释和 _注释。 38 在面向对象方法中,类的实例称为 _。 39 某二叉树中度为 2的结点有 18个,则该二叉树中有 _个叶子结点。 40 数据流图的类型有 _和事务型。 41 函数 Str$(2536)的值是 _。 42 表达式 (73+1)*(18-1)的值是 _。 43 在 Visual Basic 0中, InputBox函数用于产生一个 _对话框。
23、 44 当列表框中的项目较多、超过了列表框的长度时,系统会自动在列表框边上加一个 _。 45 滚动条分为两种,即 _。 46 计算 For循环次数的公式是 _。 47 在窗体上画一个文本框 (其 Name属性为 Text1),编写如下事件过程,运行结果是 _。 Private Sub Form_Load() Show Text1.Text=“你好 !“ Text1.SetFocus For i=1 To 15 Sum=Sum+i Next i Text1.Text=Sum End Sub 48 下列程序的功能是:找出给定的 12个数中最大的一个 数,然后输出这个数以及它在原来 12个数中的位置
24、。请填空。 Option Base 1 Private Sub Form_Click() Dim x x=Array(57, -9, 17, 42, -31, 46, 11, 8, 6, -4, 3, 90) Max=1 For k=2 To 10 Step 1 If x(k) x(Max)Then _ End If Next k y=_ Print Max, y End Sub VB笔试模拟试卷 120答案与解析 1 【正确答案】 C 【试题解析】 算法的执行效率与数据的存储结构密切相关。算法的空间复杂度是指算法执行过程中所需的存储空间。 2 【正确答案】 B 【试题解析】 数据的存储结构,
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 120 答案 解析 DOC
