【コントロール配列のイベントを受け取る方法】宜しくお願いします。 (ID:116084)

名前

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

本文 VB6と仮定してお答えします。 こんな感じでだめですか？ もしクラスでやる場合は、コントロール配列はだめだったような… Private Sub Form_Load() Dim intIndex As Integer For intIndex = 1 To 4 Load Text1(intIndex) With Text1(intIndex) .Top = Text1(intIndex - 1).Top + Text1(intIndex - 1).Height + 50 .Visible = True End With Next intIndex End Sub Private Sub Text1_GotFocus(Index As Integer) MsgBox Index & "GotFocus" End Sub