コマンドボタンの設定

解決

カルル 2005-02-07 23:04:57 No: 88294

コマンドボタン１がクリックされるまで
コマンドボタン２をクリックさせないようにする処理を
教えてください＞＜

カルル 2005-02-07 23:08:25 No: 88295

VB6.0です

じゃんぬねっと URL 2005-02-07 23:15:11 No: 88296

Command1 の Enabled プロパティを False にしておき、
Command1 の Click イベントで、Command2.Enabled = True とする。

魔界の仮面弁士 2005-02-07 23:18:34 No: 88297

案1) クリックされても無視する。

  Private CanUse As Boolean
  Private Sub Command1_Click()
    CanUse = True
  End Sub
  Private Sub Command2_Click()
    If CanUse Then
      MsgBox "処理"
    End If
  End Sub

案2) あらかじめ、使用不可に設定しておく。

  Private Sub Form_Load()
    Command1.Enabled = True
    Command2.Enabled = False
  End Sub
  Private Sub Command1_Click()
    Command2.Enabled = True
  End Sub
  Private Sub Command2_Click()
    MsgBox "処理"
  End Sub

カルル 2005-02-07 23:20:02 No: 88298

ありがとうございますm(_ _)m

お早い返答でありがとうございます。

おかげでできました！！