What am I doing wrong here?

  • Thread starter Thread starter dhstein
  • Start date Start date
D

dhstein

OK - I coded a subroutine from the book that looks like this:
Option Compare Database
Option Explicit
Sub BeepWarning()
Dim xBeeps As Integer
Dim nBeeps As Integer
nBeeps = 5
For xBeeps = 1 To nBeeps
Beep
Next xBeeps
End Sub



Then I selected the event to run and got this:

Private Sub btnBeep_Click()
BeepWarning()
End Sub

When I click the button I get:
Compile Error Syntax Error message

Any help would be appreciated
 
hi,
Private Sub btnBeep_Click()
BeepWarning()
End Sub

When I click the button I get:
Compile Error Syntax Error message
Click to expand...
You don't need the brackets. Remove them.

mfG
--> stefan <--
 
You probably meant "parentheses".

Private Sub btnBeep_Click()
BeepWarning
End Sub

Also, when in code view, you can select menu option Debug > Compile
which will point out exactly which line of code is the problem.

-Tom.
Microsoft Access MVP
 
Back
Top