1.
Code:
SendKeys 93 ' nisam siguran, ali mislim da je 93 ascii kod, proveri
2.
Code:
SendKeys vbKeySnapshot
3. Pogledaj top topic o FSO. Sve se svodi na kopiranje/kreiranje ili brisanje shortcutova (fajlova) u odredjenom folderu
4.
Code:
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, _
ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const VK_MENU As Byte = &H12
Const VK_SNAPSHOT As Byte = &H2C
Const KEYEVENTF_KEYUP = &H2
Private Sub Command1_Click()
Clipboard.Clear
keybd_event VK_SNAPSHOT, 1, 0, 0
DoEvents
keybd_event VK_SNAPSHOT, 1, KEYEVENTF_KEYUP, 0
Set Picture1.Picture = Clipboard.GetData
End Sub
Ako hoces da snimis u fajl, onda ovako nesto
Code:
SavePicture Clipboard.GetData, "C:\Screen.BMP"