For #2, use the following code:
Code:
Private Sub Command1_Click()
    MsgBox "You pressed the button"
End Sub

Private Sub Form_Load()
    Command1 = True
End Sub