コントロール配列ボタンのクリック数を取得するには？

解決

通りすがりの初心者 2005-12-01 23:44:33 No: 128491

コントロール配列のボタンが合計８個あるのですが、
それぞれのボタンは何回でもクリックすることができます。
コントロール配列でない別のボタンをクリックしたときに、
コントロール配列のボタンがそれぞれ何回押されたか、表示させたいのですが・・・。わかりません。
どなたか、ご教授ください。

U 2005-12-01 23:49:52 No: 128492

グローバル変数に、値を保持し、
クリックイベントにインクリメントする処理を加えてください。

通りすがりの初心者 2005-12-02 00:29:15 No: 128493

Private Int_Goukei As Integer

Private Sub Command1_Click(Index As Integer)
Int_Goukei = Int_Goukei + 1
Command1(Index).Caption = Int_Goukei
End Sub

このように記述すると、index=0を2回クリックした後
index=1をクリックすると、index=1のCaptionには３となってしまいます。

そうでなくて、index=1は1回目のクリックなので、1にしたいのです。
どうか、よろしくお願いします。

Blue 2005-12-02 00:32:44 No: 128494

> Private Int_Goukei As Integer
も配列にする。

Private Int_Goukei(7) As Integer

でクリック時にインデックスの値だけインクリメントする。

KG 2005-12-02 00:38:34 No: 128495

配列を使うとかじゃだめですかね？

Private Sub Command1_Click(Index As Integer)
Int_Goukei(Index) = Int_Goukei(Index) + 1
Command1(Index).Caption = Int_Goukei(Index)
End Sub

など。

#定義部分は省略ということで|=_=;

KG 2005-12-02 00:40:04 No: 128496

さきに投稿されちゃってたかorz

#合わせ技一本って感じになってしまった・・（笑

通りすがりの初心者 2005-12-02 00:52:57 No: 128497

ありがとうございます。

解決いたしました。

皆さんすごいですね！！

また、分からないことが、あったら寄らせていただきます。