VB期末复习试题五~八有参考答案

上传人:飞*** 文档编号:47847337 上传时间:2018-07-05 格式:PDF 页数:35 大小:45.88KB
返回 下载 相关 举报
VB期末复习试题五~八有参考答案_第1页
第1页 / 共35页
VB期末复习试题五~八有参考答案_第2页
第2页 / 共35页
VB期末复习试题五~八有参考答案_第3页
第3页 / 共35页
VB期末复习试题五~八有参考答案_第4页
第4页 / 共35页
VB期末复习试题五~八有参考答案_第5页
第5页 / 共35页
点击查看更多>>
资源描述

《VB期末复习试题五~八有参考答案》由会员分享,可在线阅读,更多相关《VB期末复习试题五~八有参考答案(35页珍藏版)》请在金锄头文库上搜索。

1、试题五一、单选题(每题1 分,共 30 分)1、下列 _不是 Visual Basic程序的基本结构。A) 层次结构B) 分支结构C) 循环结构D) 顺序结构2、当文本框的内容发生变化时,必将触发_事件。A) LostFocus B) KeyPress C) Change D) Click 3、在 Visual Basic中,建立一个文本编辑区域,可采用下列_。A) 命令按钮B) 标签控件C) 文本控件D) 定时器控件4、在 Visual Basic中,下列 _表达式的值不等于4。A) int(4.1) B) int(4.9) C) Abs(int(-3.9) D) Abs(int(-4.5)

2、 5、代数表达式中的一元二次方和求根公式中的一个改成VB表达式是 _。A) (-b+sqr(b*b-4*a*c)/(2*a) B) -b+sqr(b*b-4*a*c)/(2*a) C) (-b+sqr(b*b-4*a*c)/2*a D) (-b+ (b*b-4*a*c)/(2*a) 6、在 Visual Basic中,下列 _程序行是符合语法的。A) X=Y=5 B) A+B=C3 C) Y=1 ;Y=Y+1 D) I=10X 7、假定 X是一个数值型变量,那么由函数组成的表达式INT( X/2)=X/2,作用是 _。A) 用于测试X是否偶数B) 返回一个整数C) 返回一个奇数D) 用于测试X

3、是否整数8、表达式Abs(-3.6)*sqr(100) 的值是 _。A) -360 B) 360 C) -36 D) 36 9、为了使一个窗体从屏幕消失但仍在内存中,所使用的方法或语句为_。A)Show B)Hide C)Load D)Unload 10、要改变新建对象的缺省名称,应使用属性_。A) Font B) ForeColor C) Name D) Height 11、要使一个命令按钮显示文字“确定”,正确的设置是把它的属性_设置为“确定” 。A) Font B) ForeColor C) Caption D) BorderStyle 12、在 Visual Basic 中,下列 _

4、单词用于注释语句。A) Rem B) End C) Else D) Loop 13、在 Visual Basic 中,设置控件的位置,可改变下列_属性。A) Height 与 Width B) height 与 Top C) Left 与 Top D) Left 与 Width 14、下列语句中 _定义了一个单精度型变量。A) Dim I As Integer B) Dim Sum As Single C) Dim Name As String D) wjm=“ 信息技术 “ 15、要使一个控件在运行时无效,正确的设置是_。A) 把属性 Enabled 设置为 True B) 把属性 Enab

5、led 设置为 False C) 把属性 Visibled 设置为 True D) 把属性 Visibled 设置为 False 16、下面叙述正确的是_。A)算法的执行效率与数据的存储结构无关B)算法的空间复杂度是指算法程序中指令(或语句 )的条数C)算法的有穷性是指算法必须能在执行有限个步骤之后终止D)算法的时间复杂度是指执行算法程序所需要的时间17、下面概念中,不属于面向对象方法的是_。A)对象、消息B)继承、多态C)类、封装D)过程调用18、下面描述中,不符合结构化程序设计风格的是_。A)使用顺序、选择和重复(循环 )三种基本控制结构表示程序的控制逻辑B)自顶向下C)注重提高程序的执行

6、效率D)限制使用 goto 语句19、可以同时删除字符前导和尾部空格的函数是_。A)Ltrim B)Rtrim C)Trim D)Mid 20、每一个控件都有的属性是_。A)Top B)Name C)Visible D)Interval 21、执行以下程序段后,变量c$的值为 _。a$=“Visual Basic Programming“ b$=“Quick“ c$=b$ For i = 2 To 5 x =_10_(“ 请输入第 “ If Abs(x - 100) _11_ Abs(Nu - 100) Then _12_ End If Next i Print vbCrLf “ 小写字符有

7、“ Next i For i = 1 To _16_ imin = i For j = i + 1 To n If ia(imin) ia(j) Then imin = j Next j t = ia(i) ia(i) = ia(imin) _17_ Print For j = 1 To n Print ia(j); Next j Next i Print 9、完善程序,输入x,求:Sin(x)=x/1-x3/3!+x5/5!-x7/7!+(-1)n-1*x2n-1/(2n-1)! 要求当第 N 项的精度小于10-5 时结束运算,自变量x 单位为弧度。提示: t 当前项= -1 * t 前一项

8、* x 2 / (i - 1) * i) Dim x! Dim Sx! Dim i%, t! x = Val(InputBox(“x=“) i = 1 t = x / 1 Do Until _18_ z) Or z Sqr(i) Then Print i Next i (A) 输出 n 以内的奇数(B) 输出 n 以内的偶数(C) 输出 n 以内能被j 整除的数(D) 输出 n 以内的素数29窗体中有4 个名为 Text1 的文本框,如图,下标从0 开始,从左到右顺序增大。单击命令按钮时,这4 个文本框从左向右分别显示_。Private Sub Command1_Click() For i =

9、 0 To 3 Text1(i).Text = Text1(i).Index Next i End Sub (A) 0 1 2 3 (B) 1 2 3 4 (C) 0 1 3 2 (D) 出错30窗体中有一个通用对话框CommonDialog1 和一个命令按钮Command1,并有以下程序。关于这段程序功能的描述错误的是 _。Private Sub Command1_Click() CommonDialog1.Filter = “All File|*.*|Word Documents|*.doc|Text Documents|*.txt“ CommonDialog1.InitDir = “D:

10、“ CommonDialog1.DialogTitle = “VBTest“ CommonDialog1.Action = 1 End Sub (A) 这段程序产生一个“打开文件”对话框(B) 这个对话框的标题是“VBTest ”(C) 对话框中初始的路径是D 盘的根目录(D) 在这个对话框中只能选择打开Word 文档或文本文件二、填空题( 50 分,每空2 分,请在答题纸上标明每个空的编号)1执行语句Print String(5, “ABC“) ,窗体中将显示_1_。2VB中数据文件根据对文件的访问方式分为3 类,即 _2_ 、随机文件和二进制文件。3执行下面这段程序后,窗体中显示_3_ 和

11、_4_ 。s = 5 For i = 2.6 To 4.9 Step 0.6 s = s + 1 Next i Print i, s 4单击命令按钮时希望将图片d:pic1.jpg 显示在图片框Picture1 中,完成下面的代码。Private Sub Command1_Click() _5_ End Sub 5下面这段程序要在窗体显示20 个100,200间的随机整数,每8 个数显示一行,请完成程序。For i = 1 To 20 _6_ Print x; If _7_ Next i 6下面的程序可建立一个含8 个元素的数组,显示该数组元素的最小值。完成程序。Dim arr, M As I

12、nteger, i% arr = Array(12, 43, 76, 24, 54, 86, 49, 55) _8_ = arr(0) For i = _9_ If arr(i) 0 Print s 10把数学式改写成 VB表达式: _20_。11窗体中有一个文本框Text1 和一个列表框List1。程序运行时在文本框中输入字符串并回车,如果该字符串内容在列表框中不存在,就把它添加到列表框中;如果该字符串内容在列表框中已存在就给出如右图的提示信息。填空完成下面的程序。Private Sub Text1_ _21_(KeyAscii As Integer) If KeyAscii = 13 Th

13、en For i = 0 To List1.ListCount - 1 If Text1.Text = _22_ Then _23_ “ 输入项已在列表框中“ Exit Sub _24_ Next i List1._25_ Text1.Text End If End Sub 三、编程题( 20 分,每小题10 分,请在答题纸上标明题号)1 国际象棋的棋盘有64 个格子,假如在第 1 格放 1 粒米, 第 2 格放 2 粒米, 第 3 格放 4 粒米, 第 4 格放 8 粒米, , ,依次类推,每格的米粒数是上一格的两倍。计算总共需要多少粒米。2窗体中有两个列表框List1 和 List2,还有

14、一个命令按钮Command1。启动窗体时List1 中显示广州大学城中十所大学的名称,用户可同时选中其中任意多个,单击按钮时将这些选中的项目移动到List2 中。编写完整的程序实现上述功能。(多選的話 .只需要把list1 的 multiselect 改為 1-simple)试题八一、单选题( 30 分,每小题1 分)1下列软件中 _是操作系统。(A) Windows (B) Internet Explorer (C) WPS (D) Visual Basic 2鼠标属于计算机中的_。(A) 中央处理器(B) 存储器(C) 输入设备(D) 输出设备3下列表示存储容量的数据中,_是最大的。(A)

15、20480 KB (B) 1.44 MB (C) 2.5 GB (D)4865723 Byte 4十进制数13 转换为二进制是_。(A) 1101 (B) 1011 (C) 1100 (D) 1010 5WINDOWS 中扩展名为 _的文件不是图形文件。(A) JPG (B) EXE (C) BMP (D) ICO 6在一个多窗体的工程中,如果有一个自定义函数需要被多个窗体调用,则此函数的定义可保存在一个_类型的文件中。(A) VBP (B) BAS (C) FRM (D) OCX 7下列 _可作为 VB的变量名。(A) A s 6下面的程序可根据用户所输入的数在一个数组中查找相应的下标,完成程序。Dim arr, i%, M As _9_ arr = Array(12, 43, 76, 24, 54, 86, 49, 55) M = Val(InputBox(“ 要查找的数 “) For i = _10_ If arr(i) = M Then _1

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 行业资料 > 其它行业文档

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号