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

タイトル Re: イベント命令の受け渡しの件
投稿日: 2012/07/29(Sun) 18:49
投稿者VBレスキュー(花ちゃん)
> よろしく、お願いします。
> 現在VB6でプログラムを組んでいますが、command1 ボタンを押したら
> Form_MouseMove内のイベントを発生させるようにしたいのですが、何か
> 良い方法はあるでしょうか。お教え下さい。
> 例えば、Form_MouseMove内に記述された「円」をcommand1ボタンを押す事で
> 表示したいのです。よろしく、お願いします。

なにがやりたいのかがよく解りませんが、通常のForm_MouseMove イベントは無視して
Command1_Click したら、Form_MouseMove イベントを有効にしたいと言うことなら
下記のようにフラグを設定すればできるのでは。

Private frgCircle As Boolean

Private Sub Command1_Click()
   frgCircle = Not frgCircle
End Sub

Private Sub Form_MouseMove(Button As Integer, _
                            Shift As Integer, X As Single, Y As Single)
   If frgCircle Then
      Debug.Print "円を描く"
   End If
End Sub

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

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