Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
[COLOR=blue]Option Explicit
Public Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Public Const KEYEVENTF_KEYUP = &H2
Public Const KEYEVENTF_EXTENDEDKEY = 1
Public Const LWin = 91
public Sub ShowClipboard()
KeyDown LWin
KeyDown Asc("V")
KeyUp LWin
KeyUp Asc("V")
End Sub
Private Sub KeyDown(vKey As Byte)
keybd_event vKey, 0, KEYEVENTF_EXTENDEDKEY, 0
End Sub
Private Sub KeyUp(vKey As Byte)
keybd_event vKey, 0, KEYEVENTF_EXTENDEDKEY Or KEYEVENTF_KEYUP, 0
End Sub[/color]