'1)
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, _
                                              ByVal bScan As Byte, _
                                              ByVal dwFlags As Long, _
                                              ByVal dwExtraInfo As Long)
        keybd_event vbKeySnapshot,  0 ,  0 ,  0 
        'изображение будет в буфере
'2)
Declare Function RegisterHotKey Lib "user32" (ByVal hwnd As Long, _
                                              ByVal id As Long, _
                                              ByVal fsModifiers As Long, _
                                              ByVal vk As Long) As Long
'3) по моему нужны сторонние библиотеки
'4)
Declare Function FtpPutFile Lib "wininet.dll" Alias "FtpPutFileA" (ByVal hConnect As Long, _
                                              ByVal lpszLocalFile As String, _
                                              ByVal lpszNewRemoteFile As String, _
                                              ByVal dwFlags As Long, _
                                              ByVal dwContext As Long) As Boolean
'1)
Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, _
                                              ByVal hModule As Long, _
                                              ByVal dwFlags As Long) As Long
'2)
Public Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias "Shell_NotifyIconA" ( _
                                              ByVal dwMessage As Long, _
                                              lpData As NOTIFYICONDATA) As Long
' 3 ) если не сможете сами ответить на этотт вопрос то наврятли, что то у вас получится в ближайшее время.