10.在菜单编辑器中,菜单项后面4个小点的含义是 。 11.数学表达式sin2x+
1x2?y2写成等价的Visual Basic表达式为 。 212.设某个程序中要用到一个二维数组,要求数组名为A,类型为字符串类型,第一维下标从1到5,第二维下标从-2到6,则相应的数组声明语句为 。 13.事件就是在对象上所发生的事情,Visual Basic中的事件如 、 等。一个对象响应的事件可以有 个,用户不能建立新的事件。事件过程是指 。假设某一事件过程如下:
Private Sub cmd1_Click()
Form1.Caption=”VB示例” End Sub
则响应该过程的对象名是 ,事件名是 。
14.对象的方法用于 。当方法不需要任何参数并且也没有返回值时,调用对象的方法的格式为 ,例如,对窗体 Form1使用Show方法,应写成 。
15.标签框控件可通过设置其 属性为True使之可自动调整大小。 二、单项选择题
1.下列控件中没有Caption属性的是( )
VB综合练习题三 第 1 页(共 5 页)
A、标签 B、文本框 C、框架 D、命令按纽 2.除框架外,能对单选按纽分组的控件是( )。 A、窗体 B、标签 C、图形框 D、图像框 3.下列符号不能作为VB中变量名的是( )。
A 、 ABCDEFG B、 P00000 C、 89YWDDF D、xyz 4.下列对象不能响应 DblClick事件的是( )
A、文本框 B、标签框 C、窗体 D、命令按钮
5.若要求从文本框中输入密码时在文本框中只显示*号,则应用在此文本框的属性窗口中设置( )。
A、Text属性值为* B、Caption属性值为* C、Password属性值为空 D、Passwordchar属性值为* 6.表达式2*3^2+2*8/4+3^2的值为( )。
A、64 B、31 C、49 D、42 7.表达式5^2Mod25\\2^2的值是( ) A、0 B、1 C、6 D、4 8.数学式子Sin25?写成VB表达式是( )。
A、Sin25 B、Sin(25) C、SIN(25?) D、Sin(25*3.14/180) 9.Sub过程与 Function过程最根本的区别是( )。
A、Sub过程可以使用Call语句或直接使用过程名调用,而Function过程不可以。 B、Function过程可以有参数,Sub过程不可以。 C、两种过程参数的传递方式不同。
D、Sub过程的过程名不能返回值,而Function过程能够通过过程名返回值。 10.选拔身高T超过1.7米且体重W小于62.5公斤的人,表示该条件的布尔表达式为( ) A、T>=1.7 And W<=62.5 B、T<=1.7 Or W>=62.5 C、T>1.7 And W<62.5 D、T>=1.7 Or W<62.5 三、指出下列句中的错误,修改或者说明原因。 1.sum和int.sum都可以作为VB的变量名。 2.变量名的长度最长可达1024个字符。
3.在标准模块中用Public声明全局变量,使变量在整个应用程序中有效。 4.程序可以改变定长字符串的内容和长度。
5.Variant是一种特殊的数据类型,可以包含任何种类型的数据。 6.将焦点主动设置到指定的控件或窗体上应采用SetFocus方法 7.事件过程通常由事件驱动执行,而Sub过程通过过程调用执行。 8.可以在窗体的通用部分声明静态变量。
9.使用声明语句建立一个变量后,Visual Basic会自动对数值类型的变量赋初值0,变长的字符串被初始化为一个零长度的字符串“”””,定长字符串用空格填充,Variant变量被初始化为 Enpty,布尔型的变量被初始化为False。 四、读程序题,写出程序运行结果。
1.Private Sub Form_Click() 运行结果: For I = 1 To 9
VB综合练习题三 第 2 页(共 5 页)
For j = 1 To 30 - 3 * I Print \ Next j
For k = 1 To I Print k; Next k
For k = I - 1 To 1 Step -1 Print k; Next k Print Next I End Sub
2.Private Sub Command1_Click() 运行结果: Static S As Integer Dim i As Integer S = 1
For i = 1 To 5 S = S * i Next i Print S
End Sub
3. For X = 5 To 1 Step –1 运行结果: For Y = 1 To 6 - X
Print Tab(Y + 5); \ Next Y Print
Next X
4.S = 0: T = 0: U = 0 运行结果:
For X = 1 To 3 For Y = 1 To X For Z = Y To 3 S = S + 1 Next Z T = T + 1
Next Y U = U + 1
Next X Print S; T; U
5.Private Sub Command1_Click() 运行结果:
Dim b As Integer
VB综合练习题三 第 3 页(共 5 页)