atom0s Moderator
Reputation: 205
Joined: 25 Jan 2006 Posts: 8587 Location: 127.0.0.1
|
Posted: Fri Nov 23, 2007 8:52 pm Post subject: |
|
|
| Code: | Option Explicit
Private Sub Form_Load()
Command1.Enabled = False
End Sub
Private Sub Check1_Click()
If Check1.Value = 1 Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub |
Using default function names and so on. Just add 1 button, 1 check. Rename them as needed.
_________________
- Retired. |
|