タイトル : Re: CommandBottonイベント 投稿日 : 2008/05/19(Mon) 18:27 投稿者 : 魔界の仮面弁士
> vb6での質問なんですが、 > CommandButton1_()というプロシージャ内に、同じボタン(CommandBotton1)を (Command1 ではなく)CommandButton1 という事は、VB6 は VB6 でも、 Office 等に付属の VBA の事を指しているのかな…? > クリックさせたいのですがそれらしきプロパティ、メソッドが見つけきれません。 > それ以前に同じプロシージャ内でこのイベントは実行可能なんでしょうか? …あまり望ましい処理では無いような。 そもそも何故、そのような処理が必要になっているのでしょうか? 一応、ボタン(のValue)に True を代入するなどすれば Click イベントが発生しますが、 それによって、再度 Click のプロシージャ自身が呼び出される事になるので、 処理が無限に呼びされてしまう事が無いよう、気を付けてくださいね。 Private Static Sub CommandButton1_Click() Dim n As Integer If n = 0 Then ListBox1.Clear End If n = n + 1 ListBox1.AddItem "クリック! (" & CStr(n) & "回目)" If n >= 5 Then n = 0 Else '5回まで、自動的に再クリック CommandButton1 = True End If End Sub |