帮忙做一下vb 的试题一．单项选择题（20X1.5=30分）

二．填空题（20分）
1．设置数组默认下标下界为1的语句是
2．要求变量声明的语句是
3．将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是
4．有时需要暂时关闭计时器，这可以通过 属性来实现。
5．菜单项控件只能触发一个事件，这个事件是
6．为了把一个窗体定义为子窗体，必须把它的 属性设置为True。
7．在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程, 该事件过程的功能是计算s=1!+2!+…+5!的值。请填空。
Private Sub Command1_Click()
Dim n As Integer , f As Integer , s As Integer
n = 5
f = 1
s = 0
For i = 1 To n
f = f
s = s + f
Next
Print s
End Sub
8.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序,下面程序的功能是：通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。请填空。
Private Sub Command1_Click()
Dim a(10) As Integer , I As Integer
For i = 1 To 10
a( i ) = i
Next
Call swap（ ① ）
For i = 1 To 10
Print a( i );
Next i
End Sub
Sub swap(b( ) As Integer)
Dim i As Integer , n As Integer
n = ②
For i = 1 To n / 2
t = b( i )

帮忙做一下vb 的试题一．单项选择题（20X1.5=30分） 网络管理员的试题，请哪位大哥帮忙做一下 有谁会做这个试题 VB的 VB试题,6/26之前要,有能力的帮忙做以下 vb编程,帮忙做一下 一题单项选择,请教一下气象不错的朋友 两个VB的小程序 ,帮忙做一下,谢谢哦! 帮忙出一下朝花夕拾的试题 大家帮忙做一下vb题 一个VB题目 帮忙做一下