Hide Cursor

[DS]

I have this in a module.

Public Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As
Long

Public Sub HideTheCursor()
Call ShowCursor(0)
End Sub

Public Sub ShowTheCursor()
Call ShowCursor(-1)
End Sub

And on load of the Startup form
Dim TU as Boolean
TU =Dllokup("TerminalTouch","tblTerminal","TerminalName =
Environ(""ComputerName"")")
If TU = True Then
Call HideTheCursor()
Else
End If

This isn't hiding the cursor. Any help is appreciated.
Thanks
DS

 

[DS]

Ok it's not te code for the actual hiding of the cursor. It's the TU
Dlookup part.
Also when I leave Access do I have to make the cursor reapear. It seems to
be doing it on it's own.
Thanks
DS

 

[Paolo]

Hi DS,
it doesn't work because there's a typo. The function isn't called Dllokup
but dlookup so try in this way

TU =Dlookup("TerminalTouch","tblTerminal","TerminalName =
Environ(""ComputerName"")")

HTH Paolo

 

[DS]

Thanks,
I guess I should wear my glasses!
DS