大学VB复习题目

1．下列符号不能作为VB变量名的是（ C ）。

A．xyz B．x2 C．8x D．xy
2．窗体的标题栏显示内容由窗体对象的（ B ）属性值决定。

A、boderstyle B、caption C、title D、name
3．表达式Val (“abc25a”)的值为（ B ）。

A、xyz25a
B、0
C、25
D、xyz
4表达式表达式5 mod 3+5^2\3的值为（ B ）。

A、4
B、10
C、2
D、4.5
5．设x=3 : y=4 : z=5，表达式x< y and y < z的值是（C ）
A、1
B、-1
C、TRUE
D、FALSE
6. 将单选按钮做到框架中，使成为框架内部的控件，正确的操作是（AD ）
A、先做框架，再做单选按钮到窗体上，然后将单选按钮拖到框架内
B、先做单选按钮到窗体上，再做框架到窗体上，然后将单选按钮拖到框架内
C、先做单选按钮到窗体上，再做框架到窗体上，使框架包容单选按钮
D、先做框架到窗体上，再做单选按钮到框架内
7．窗体的名称属性为form1,caption属性为myfrm时，则它的Click 事件过程名为（ A ）
A、form_Click
B、me_Click
C、myfrm_Click
D、form1_Click
8．“x是小于20的非负数”，用VB表达式表示正确的是（D ）。

A、0≤x<20
B、0<=x<20
C、0<=x Or x<20
D、0<=x And x<20
9．要在picturebox框中绘制一个圆，可使用其（ B ）方法来实现。

A、Circle
B、Line
C、Point
D、Pset 10．以下关于过程的叙述中，错误的是（ B ）
A、事件过程是由某个事件触发而执行的过程
B、函数过程可以有多个不同类型的返回值
C、可以在事件的过程中调用通用过程
D、不能在事件过程中定义函数过程
11、在Visual Basic中，工程文件的扩展名为（ A ）。

A．.vbp B．.frm (窗口文件)
C．.cls D．.bas
12、函数sqr(9)的结果是（3 ）
13、”23” &12, 结果是（2312 ）
14、函数int(9.9)的返回值是（10 ）
115、函数str(4) 的返回值类型是（''4'' ）
16、函数len(“abcd就h”)的返回值是（）
17、VB提供了结构化程序设计的三种基本结构，分别是顺序结构、_选择结构__和循环结构。

17. 表达式5 mod 3+5^2\3的值为________10________。

18. MsgBox()函数的返回值类型为_____整数型或Integer型______。

19.Print Spc(20);”Hello”语句表示在窗体的第____21__列输出字符串”Hello”。

20.若要将图片框中加载的图片删除，可以使用语句______Loadpicture ''________。

21.Dim A(1 To 4)定义的数组包含的元素的个数是______4__________。

22.定义数组时，若希望下标从1开始，可以在模块的通用部分使用___________语句将其设为1。

23．使用代码向VB6.0列表框添加项目，使用的方法是___ 。

24. 为了通过传值方式来传送过程参数，应使用的关键字为_____________。

25．假定程序中有以下语句：answer=InputBox(“hello”,”world”,”good”,30),执行该语句后，将显示一个信息框，此时如果单击确定按钮，则answer的值为____________。

26. 运行下面事件过程，输出的结果是
Private Sub Form_Click()
Dim x as integer
x=0
if x=-1 then
print x
else
print x+1
end if
End Sub
27. A=1
If A>0 Then A=A+1
If A>1 Then A=0
A的值为____________________
28. 执行下面的程序段后，s的值为_______。

n =2:s=0
Do While n > 0
s= s + n
n= n-1
Loop
Print s
29、Private Sub Form_Click()
score = Int(Rnd * 10) + 30
Select Case score
Case Is < 10
a$ = "F"
Case 10 To 19
a$ = "D"
Case 20 To 29
a$ = "C"
Case 30 To 39
a$ = "B"
Case Else
a$ = "A"
End Select
Print a$
End Sub
程序运行后，单击窗体，则在窗体上显示的是_________________ 30．
Option Base 0
Private Sub Form_Click()
Dim a, i As Integer
a = Array(1,2,3,4,5)
For i = 1 To 2
Print a(2 - i);
Next i
End Sub
运行上面的程序后，单击窗体，则在窗体上显示的是：
_______________
31、在窗体上放置一个名称为command1的命令按钮和一个名称为text1的文本框，并编写如下事件代码
Private Sub Command1_Click()
Dim j As Integer
j = 5
Call proc(j)
End Sub
Private Sub proc(n As Integer)
k = 1
For i = 1 To n Step 1
k = k * i
Next i
Text1.Text = k
End Sub
当单击该命令按钮时，文本框中显示的内容为______________。

32. 有如下事件代码：
Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = "4"
A(2) = "8"
A(3) = "12"
c = 1
For j = 1 To 3
c = c + Val(A(j))
Next j
Print c
End Sub
当单击窗体后程序运行时，窗体Form1上显示的结果为_______________。

33. 下面程序运行后的输出结果是___________。

x = “a”
y = “b”
z = “c”
For i = 1 to 2
x = y
y = z
z = x
Next i
Print x + y + z
34.VB采用了_________的程序设计思想，是结构化的高级程序设计语言。

35. 结构化程序设计的三种基本结构是顺序结构、选择结构和_________。

36．Print Format(12345．6 , “$##，##0．00”)语句运行在窗体上显示为_________。

37. 将线条控件（Line1）的颜色设置为绿色的语句是__________________。

1、设等差数列的乘积S = 1*4*7*10*….. *n ，求S不大于1000的最大n值？
2在窗体上建立两个文本框和两个按钮，名称分别为text1、text2、command1、command2、完成如下操作
（1）点击命令按钮command1将text1的内容复制到text2中（2）点击命令按钮command2清除两个文本的内容
3在窗体上建立一个文本框和一个命令按钮，名称分别为text1、command1完成如下要求：
（1）从文本框输入一个数据判断该数据是正数，负数，还是零（2）把判断结果通过消息框显示出来
4、求100到500之间所有的能被7整除的数之和。

将和放在long 型的s变量中，结果显示在窗体上。