The mouse pointing shape (i.e., when the mouse is moved to the label, the value of the mouseicon is hand shape, and the mousepointer is set to 99-Custom) for the palm. After setting the control properties, you can write the program code.
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private sub label1_click () Call Shellexecute (Form1.hWnd, "Open", "http://shadanet.com", vbnullstring, vbnullstring, & h0) Call shellexecute (Form1.hwnd, "Open", "Mailto: WQRZ @ 163. COM ",", app.path, 1) end sub