Re: [VB6 ] 關於陣列傳值..
實在看不懂你想做啥. 不過如果你想傳陣列到SUB 或FUNCTION
那大致上是這樣吧...
Sub aaa()
Dim y(1 To 5) As Integer
For i = 1 To 5
y(i) = i
Next
bbb(2, 1) = y(2) + 1
variable_cal y()
End Sub
Sub variable_cal(ByRef y() As Integer)
Dim cal() As Integer
For y(1) = 1 To 5
ReDim Preserve cal(1 To y(1)) As Integer
cal(y(1)) = bbb(2, 1)
a = a + cal(y(1))
Next y(1)
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 219.81.195.242
推
09/07 07:12, , 1F
09/07 07:12, 1F
推
09/07 21:02, , 2F
09/07 21:02, 2F
推
09/09 12:41, , 3F
09/09 12:41, 3F
討論串 (同標題文章)
以下文章回應了本文：
完整討論串 (本文為第 3 之 6 篇)：
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
