配列についての質問

解決

若松 2003-12-13 19:50:44 No: 80896

現在
Private Sub Command1_Click()
Dim Y(100) As String
・
・
・
For z = 1 To 100
Y(z) = ・・・
Next z
というような宣言をして配列に値を代入していまして、

Private Sub Command2_Click()
Text1 = Y(50)
みたいに他のコマンドクリックで配列内の値を表示しようとしてるのですが、
「SubまたはFunctionが定義されていません」とエラーがでてしまいます。

これどうすればいいのでしょうか？
何か配列を他のところに渡すような良い方法とかあるのでしょうか？

初心者なのですみません。
ご指導のほうよろしくお願いしますm(＿)m

とろ 2003-12-13 20:55:48 No: 80897

Private Sub Command1_Click()
Dim Y(100) As String
...
End Sub

のように Y を宣言した場合 Y は Command_Click1 の中でしか使用できません。
（同じモジュール内の）他のプロシージャからも使用したい場合は、

Private Y(100) As String
Private Sub Command1_Click()
...
End Sub

のようにして下さい。

若松 2003-12-14 07:02:19 No: 80898

どうもありがとうございました！
おかげ様で作業が進むことができました。
本当に感謝です＾＾