66.Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性。( )
A.对 >B.错67.在默认状态下,Visual Basic窗体设计器中布满了网格点,主要是方便用户布局。( )
A.对 B.错68.函数MsgBox的3个参数分别是输入对话框的提示信息、默认值以及标题。( )
A.对 B.错69.将变量声明放在标准模块的通用声明段,并使用Public关键字就可以声明一个全局变量。( )
A.对 B.错70.使用单选按钮控件数组时,它们响应同一个Click事件,由Index值来区分不同的按钮。( )
A.对 B.错71.决定对象是否可见的属性是Enabled属性,决定对象可用性的属性是Visible属性。( )
A.对 >B.错72.在Do循环结构中,While和Until关键字的作用是相反的。( )
A.对 B.错73.在程序运行中,标签和文本框都可以用来输出数据。( )
A.对 B.错>74.窗体Form的Enabled属性为False时,窗体上的按钮、列表框、文本框等控件不会对用户的操作做出反应。( )
A.对 >B.错75.函数过程与SUB过程必须用关键字Private或Public声明。( )
A.对 B.错76.一个VB工程文件包含窗体文件、标准模块文件、类模块文件等。( )
A.对 错二、多选题(每题6分,共4题)
1.输入10个整数,将绝对值大于100的数值求和,请将程序补充完整。
Private Sub Command1_Click()
Dim i As Integer,Num As Integer,Sum As Long
Sum= _______1_______
For i=1 to 10
Num =Val(InputBox("Enter Number:"))
Sum=Sum+ _____2_____
Next i
Print "Sum=";Sum
End Sub
Private Function Abs1(ByVal m As Integer) As Integer
If m < 0 Then m=-m
If m > _____3_____ Then
m = m
_____4_____
End If
End Function( )
M.m:abs1=m
N.abs=m O.abs(m) P.abs1=m2.编程实现:利用输入对话框不断输入数字,直到输入-1结束,然后显示它们的总和。程序代码如下,请在空白处选择最佳答案。
Private Sub Form_Load()
Dim value
Dim sum As Integer
___1___
Do
Value=InputBox(“输入数字:”)
If IsNumeric(value) Then
Value=CInt(value)
___2___
End If
Loop ___3___
___4___
MsgBox“总和是:”& sum
End Sub( )
E. value= sum
F. sum=value
G. value=value+sum
>H. sum=sum+value I. Until value<>-1 J. While value <>-1 K. Until value=1 L. While value=-1 M. sum=sum+value N. sum=sum+1 O. sum=sum-1 P. sum=value3.求π的近似值,可利用公式π/4=1 - 1/3 + 1/5 - 1/7 + ??,计算到最后一项的绝对值小于0.00001时为止,代码如下,请在空白处选择最佳答案。
Private Sub Command1_Click()
/>Cls
Dim pi, p, n As Single
n = 1
___1___
p = 1
Do Until ___2___
___3___
p = -p
___4___
Loop
Print "π的值是:"; 4 * pi
End Sub( )
E. 1 / n < 0.00001
F. 1 / n >=0.00001 >G. 1/(2*n+1) < 0.00001 H. 1/(2*n-1) <0.00001 I. pi=pi+1/(2*n+1) J. pi=pi+1/(2*n-1) K. pi=pi+p/n L. pi=pi-p/n M. n=n+1 N. n=n+2O. 1/n=1/n+1/2
P. n=-n4.变量a是Single型,a=-1.23456,b=Int(a), c=Sgn(a),d=Abs(a),e=Fix(a)
则:b= _______1_______ ,c=_____2_____,d= _____3_____ ,d=_____4_____。( )
C.-1.23456
D.0 E.-1 F.-2 G.0>H.1.23456
I.-2 J.-1K.-1.23456
L.0 M.-2 >N.0O.-1.23456
P.-1