tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル 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

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。