《VB程序设计》试卷(汉a)08091

  • 格式:doc
  • 大小:59.00 KB
  • 文档页数:7

1 教育科学学院2011–2012学年第 1 学期期末考试 《Visual Basic程序设计》试卷(A) 姓名__________ 学号__________

一、 填空题(共20分,每空2分) 1、在用Visual Basic开发应用程序时,一般需要创建应用程序界面、设置属性和( )3步。 2、一个控件在窗体上的位置由Left和Top属性决定,其大小由Width和( )属性决定。 3、随机生成一个1~6的随机整数的表达式是( ) 4、与下列数学式子对应的Visual Basic表达式是( )

x+y*5+(x+y)2/y

5、窗体、图片框或图象框中的图形通过对象的( )属性来设置。 6、下列Visual Basic表达式有错误,其正确的形式是( ) (x+y)+z×80[x-5(c+d)] 7、 根据所给条件,列出逻辑表达式为( )。 闰年的条件是:年号(year)能被4整除,但不能被100整除;或者能被400整除。 8、 设置计时器控件只能触发( )事件。 9、执行下面的程序段后,s的值为( ) Private Sub Form_Click() Static s As Integer s = 5 For i = 1.4 To 2.1 Step 0.6 s = s + 1 Next i

题号 一 二 三 四 总分 得分 2

Print s End Sub 10、在窗体中添加一个命令按钮,然后编写如下代码: Private Sub Command1_Click() a = InputBox("请输入一个整数") B = InputBox("请输入一个整数") Print Val(a) + Val(B) End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入21和45,输出结果为( )。

二、 单项选择题(共40分,每题2分) 1、Visual Basic窗体设计器的主要功能是( ) A)建立用户界面 B)编写源程序代码 C)画图 D)显示文字 2、通过( )窗口可以在设计时直观的调整窗体在屏幕上的位置。 A.代码窗口 B.窗体布局窗口 C.窗体设计窗口 D.属性窗口 3、如果在立即窗口中执行以下操作(是回车键) a=8 b=9 print a>b 则输出结果是( ) A.-1 B.0 C.False D.True 4、下列可以作为Visual Basic中所允许的形式的数是( ) A)10^(1.256) B)D32 C)2.5E D)12E3 5、在窗体(Name属性为Form1)中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() a = Text1.Text + Text2.Text 3

Print a End Sub Private Sub Form_Load() Text1.Text = "" Text2.Text = "" End Sub 程序运行后,在Text1和Text2中分别输入12和34,然后单击命令按钮,则输出结果为( ) A.12 B. 34 C.46 D.1234 6、在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a = InputBox("dsfsdfds"):b = InputBox("sdakfdhjdf"):Print a + b End Sub 程序运行后,单击命令按钮,先后在两个对话框中输入456和123,则输出结果是( ) A)579 B)123 C)123456 D)456123 7、InputBox函数返回值的类型为( ) A)数值 B)字符串 C)变体 D)数值或字符串(视输入的数据而定) 8、当窗体最小化时缩为一个图标,设置这个图标的是窗体的( )属性 A)MouseIcon B)Icon C)Picture D)MousePointer 9、假定在图片框Picture1中装入了一个图形,为了清除图片框中的图形,应采用的正确方法是( ) A)选择图片框,然后按Del键 B)执行语句Picture1.picture=LoadPicture(“”) C)执行语句Picture1.picture=“” D)选择图片框,在属性窗口中选择Picture属性条,然后按回车 10、设a=6,则执行x=IIf(a>5,-1,0)后,x的值是( ) A)5 B)6 C)0 D)-1 4

11、滚动条控件的LargeChange属性所设置的是( ) A. 单击滚动条和滚动箭头之间的区域时,滚动条控件value属性值的改变量 B. 滚动条中滚动块的最大移动位置 C. 滚动条中滚动块的最大移动范围 D. 滚动条控件无该属性 12、在Visual Basic应用程序中,以下正确的描述是( ) A)过程的定义可以嵌套,但过程的调用不能嵌套 B)过程的定义不能嵌套,但过程的调用可以嵌套 C)过程的定义和过程的调用均可以嵌套 D)过程的定义和过程的调用均不能嵌套 13、要使列表框中的列表项显示成复选框形式,则应将其Style属性设置为( )A.0 B.1 C.True D.False 14、将字符串“hello”添加到列表框的最后,可使用( )请语句。 A). List1.AddItem“hello”,List1.ListCount-1 B). List1.AddItem“hello”,List1.ListCount-2 C). List1.AddItem“hello”,List1.ListIndex D). List1.AddItem“hello” 15、要清除已经在图片框P1中打印的字符串而不清除图片框中的图像,应使用语句( ) A).P1.Cls B).P1.picture=LoadPicture(“”) C).P1.Print”” D).P1.piture”” 16、不具有输入数据功能的控件是( )控件 A).文本框 B).选项按钮 C).列表框 D).窗体 17、要在命令按钮控件上显示图像应( ) A)设置Picture属性 B).实现不了 C).先将Type设置为1,然后再设置Picture属性 D).以上都不对 18、下列( )程序段能删除列表框List1中的所有项。 A).Private Sub Command3_Click( ) B).Private Sub Command3_Click( ) For I=0 To List1.ListCount-1 For I=0 To List1.ListCount-1 List1.RemoveItem 1 List1.RemoveItem 0 5

Next I Next I End Sub End Sub C).Private Sub Command3_Click( ) D)Private Sub Command3_Click( ) For I=0 To List1.ListCount For I=0 To List1.ListCount List1.RemoveItem 1 List1.RemoveItem 0 Next I Next I End Sub End Sub 19、为了能在列表框中利用Ctrl和Shift键进行多个列表项的选择,则应将列表框的Multiselect属性设置为( ) A).0 B)1 C)2 D)3 20、要使一个标签透明且不具有边框,则应( ) A. 将其BackStyle属性设置为0,BorderStyle属性设置为0 B. 将其BackStyle属性设置为0,BorderStyle属性设置为1 C. 将其BackStyle属性设置为1,BorderStyle属性设置为0 D. 将其BackStyle属性设置为1,BorderStyle属性设置为1

三、判断题(共10分,每题1分,在括号内打√或×) 1、为了使一个控件在运行时不可用,应将控件的Visible属性设为False. ( ) 2、属性是用来描述和反映对象特征的参数,不同对象具有不同的属性,对象的所有属性都可以在属性窗口中设置。 ( ) 3、方法是面向对象程序设计语言为编程者提供的用来完成特定操作的过程和函数。( ) 4、If语句中的条件表达式只能使用关系或逻辑表达式。 ( ) 5、Do-Loop Until语句实现循环时,只要条件为假,循环将一直进行下去。( ) 6、在VB中使用数组必须遵循“先定义,后使用”的原则。 ( ) 7、使用ReDim语句既可以改变数组的大小,也可以改变数组的类型。( ) 8、定义一个过程有几个参数,则调用该过程时就必须提供几个实参。( ) 9、在过程中用Dim 和Static定义的变量都是局部变量。 ( ) 10、计时器控件在VB应用程序启动后自动计时,无法暂停或关闭。 6

四、编程题(共30分,每空3分) 1.以下程序段是采用冒泡法对数组a进行排序的子过程。请将程序补充完整。注意:不得增行或删行,也不得更改程序的结构! Private Sub Sort(a() As Integer) ' 排序子过程 Dim i%, j%, p%, n%, ,k%,temp! n = UBound(a): k=LBound(a) For i = k To n - 1 For j = k To If a(j) > a(j+1) Then temp= : : End if Next j Next i End Sub 2.在窗体中添加一个名称为Textl的文本框,两个名称分别为Commandl和Command2的命令按钮。要求程序运行后,当用户向文本框中输入字符时,当前窗体标题栏中显示文本框中字符的个数;当单击Commandl按钮,则文本框中字母全部转换为大写;当单击Command2按钮,则文本框中字母全部转换为小写。请将程序补充完整。注意:不得增行或删行,也不得更改程序的结构! Private Sub Textl Change() Me.Caption= End Sub Private Sub Commandl Click() Textl.Text= End Sub Private Sub Command2 Click() Textl.Text= End Sub 3、以下程序的功能是:每隔0.1秒在当前窗体上(位置随机)画一个随机大小的