Hide Cursor

  • Thread starter Thread starter DS
  • Start date Start date
D

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
 
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
 
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
 
Back
Top