VB考试题目 下载本文

内容发布更新时间 : 2024/11/20 20:18:05星期一 下面是文章的全部内容请认真阅读。

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(  )

A.0

B.1

C.Sum

D.Num

E.Num

F.Abs(Num)

G.Abs1(Num)

H.Sum

I.1

J.100

K.99

L.0

M.m:abs1=m

N.abs=m

O.abs(m)

P.abs1=m

2.编程实现:利用输入对话框不断输入数字,直到输入-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(  )

A. value=0

>B. sum=0

C. value=-1

D.sum=-1

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=value

3.求π的近似值,可利用公式π/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(  )

>A. pi=1

B. Pi=0

C. pi=-1

>D. pi=2

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+2

O. 1/n=1/n+1/2

P. n=-n

4.变量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_____。(  )

A.-1

B.-2

C.-1.23456

D.0

E.-1

F.-2

G.0

>H.1.23456

I.-2

J.-1

K.-1.23456

L.0

M.-2

>N.0

O.-1.23456

P.-1

Word文档下载:VB考试题目.doc
搜索更多:VB考试题目


最新浏览