08计算机二级vb真题

来源:百度知道 编辑:UC知道 时间:2024/06/18 14:32:50
选择题 25题 为什么答案是 程序出错啊

题目我弄不上来 还多包涵啊
http://ti.51kaoshi.cn/itrz/jsj/200807/57060.html
地址在这里了
填空第8题也不会 可以告诉我答案吗?

弄不上来也要给一个网址呀,谁知道题目是什么!?

25 print form1.x.y 这里不能是form1.x.y .y是错误的,如果你把全部代码打上就提示错误,不过可以是这样 form1.x,y这样是可以的。

8:全部代码如下:执行是正确的
Public x As Integer

Private Sub Command1_Click()
Dim a(10) As Integer
For i = 1 To 10
a(i) = i
Next
Call swap(a())
For i = 1 To 10
Print a(i);
Next

End Sub
Sub swap(b() As Integer)
n = 10
For i = 1 To n / 2
t = b(i)
b(i) = b(n)
b(n) = t
n = n - 1
Next

End Sub