国培论坛研讨怎么写:[在线等] :一个简单的vb程序

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 17:14:44
我想在vb6里实现如下功能:
传入一个数组a(),传出一个数组b()。
b(0) = a(0) + 2: b(1) = a(1) + 3
这样编写可以吗?

Public Sub test(a() As Double, b() As Double)
b(0) = a(0) + 2: b(1) = a(1) + 3
End Sub

在线等

不可以。
声明动态数组,
使用时要用redim制定数组元素数目,否则会出错。
可以这样:

Public Sub test()
Dim a(), b() As Double
ReDim a(2), b(2)
b(0) = a(0) + 2
b(1) = a(1) + 3