请教诸位高手:vb如何在过程中传递数组

ghw1 2000-06-01 09:50:00
给个例子了,谢谢!
...全文
1153 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
liuhongwei90 2010-06-02
  • 打赏
  • 举报
回复
我也碰到了同样的问题。
传递 其他类型的数组就可以
把控件弄成数组就报错了
vb 啥意思了
mafangsan 2000-06-02
  • 打赏
  • 举报
回复
1.VB中的数组只能按地址传递
2。数组作为形参时,应为 “数组名()” 注意是空括号
3。数组作为实参时,应为 “数组名” 注意不要括号
4.下面是一个通过过程为一个数组赋值的例子,显示了传递数组
Private Sub Form_Click()
Dim a(1 To 3) As Integer
Call Assign(a)
Dim i As Integer
For i = 1 To 3
Print a(i)
Next
End Sub


Private Sub Assign(x() As Integer)
Dim i As Integer
For i = 1 To 3
x(i) = i
Next
End Sub
Chen_Lin 2000-06-01
  • 打赏
  • 举报
回复
'这个也可以
-----------From_Load---------
Dim nI(10) As Integer

For nCount = 1 To 10
nI(nCount) = nCount
Next nCount
Call SendMe(nI())


End Sub
---------函数中----------------------
Private Sub SendMe(ByRef nX() As Integer)
MsgBox nX(1)
End Sub
Chen_Lin 2000-06-01
  • 打赏
  • 举报
回复
----在Form_Load中---------
Dim a(3) As Integer
a(0) = 1
a(1) = 2
a(2) = 3
SendTO a
----在函数中--------------
Private Sub SendTo(a As Variant)
MsgBox Str(a(2))

End Sub
Pascal 2000-06-01
  • 打赏
  • 举报
回复
我帮你想想办法(pascal@sina.com)

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧