thanks guys:

p3pC: I'll have a go and let you know how I get on, thanks

Prankster

OK, this is what happened :

I added the top part of the code (declarations), into General Declarations.
The I created a button and put the "Code" part in between Private Sub Command1_Click() and End Sub.

I ran the program and got a "Compile Error" and the "Const" part of this line in the General Declarations was highlighted...

Public Const conSwNormal = 1

Thanks a lot for the help