複数Subから使用する配列変数の大きさを可変にするには? (ID:141875)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 たみとき様，うまくいきました。何と素晴らしいことか！ これまでReDimを使ったことがありませんでした。皆さんありがとうございました。 Public Class Form1 Private A() As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load ReDim A(5) End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click A(1) = 123 MsgBox(A(1)) End Sub End Class