Εκτύπωση Φόρμας στην access

[jamespr]

Καλησπέρα σε όλους. Θα ήθελα τη βοήθειά σας σε ένα πρόβλημα της access Που αντιμετωπίζω. Ξέρει κανείς πως μπορώ να εκτυπώσω μία φόρμα όπως είναι με ένα κουμπί σε αυτή;; Θέλω να φτιάξω μία σειρά εντολών όπου ουσιαστικά θα κάνει Print screen και αυτό που βλέπει θα το εκτυπώνει. 

 

Σας ευχαριστώ πολύ εκ των προτέρων για το χρόνο σας

[masteripper]

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal _
  bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_SNAPSHOT = &H2C
Private Const VK_MENU = &H12

Sub AltPrintScreen()
    keybd_event VK_MENU, 0, 0, 0
    keybd_event VK_SNAPSHOT, 0, 0, 0
    keybd_event VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0
    keybd_event VK_MENU, 0, KEYEVENTF_KEYUP, 0
End Sub