The following code is not getting the screen resolution for me.

Dim lWidth As Long
Dim lHeight As Long

Private Sub CommandButton1_Click()
getScreenResolution lWidth, lHeight
MsgBox lWidth & " x " & lHeight, , "screen resolution"
End Sub

The error it is bringing up is sub or function not defined. The funny thing
is that it was working. All that is different is that I put my code into
another programmers file (we are both working on the same project - but doing
different parts)

Please if anyone can suggest the reason or another way to get the resolution
would be greatly appreciated

Steve S


--
SS