コントロール配列

質問

VB6です。
TextBoxを１０個配列にし。オブジェクト名txtで、
txt(0)～txt(9)とします。
ここで、txt(0)をクリックしたらform2が表示、txt(9)をクリックしたらform2が表示としたいのですが配列にしてるため、
txt_clickのプロシージャ？でやったらどのtextboxをクリックしても表示になってしまます（当たり前ですが）
どうやったらtxt(0)だけを指定して表示とできるのでしょうか？
ご教授お願い致しますm(__)m

回答No.4

NYOI

他のTextBoxにも機能を持たせるなら、If文よりもSelect文の方がいいかもね～。

Select Case Index
Case 0
Form2.Show
Case 1
：
Case 9
End Select

みたいな。

回答No.3

pen_pen_pen

Clickイベントの引数に「Index」がありますよね？
これが配列のIndexです。
今、質問者さまは0番か9番の時だけ、form2を表示したいとのことですので、
form2を表示する時に「Indexが0か、Indexが9の場合」と付け加えられたら良いです。

Private Sub txt_Click(Index As Integer)
If Index = 0 Or Index = 9 Then
form2.Show
End If
End Sub

・・ん？よく見たらtxt(0)だけ？ならNo.1さんの通りですね。

回答No.2

QiYoCiLi

プログラミングが得意でないようですので、見積もりを取って業者に発注してください。

回答No.1

noname#187541

こんばんは。

Private Sub Mytxt_Click(Index As Integer)
If Index = 0 Then form2.Show
End Sub

VB6の環境にないので上手く動くか分かりませんがこんな感じで出来ると思います。