[smasak]

Καλησπέρα, μέσα στην εφαρμογή έχω δημιουργήσει μια φόρμα(frmPRINTER) για επιλογή εκτύπωτή πριν την εκτύπωση έκθεσης και πατώντας το εικονίδιο για εκτύπωση με το που πάει να ανοίξει την φόρμα frmPRINTER με πετάει έξω από την εφαρμογή.
Nα αναφέρω ότι ξεκίνησε να μου το κάνει από τη στιγμή που εγκατέστησα ένα νέο εκτυπωτή.
Καμία ιδέα για το τι μπορώ να κάνω; Σε άλλους 2 υπολογιστές που το δοκίμασα δουλεύει κανονικά.

Η φόρμα στηρίζετε στον παρακάτω κώδικα όπου επιλέγει τον default printer.
Private Sub Form_Load()
Dim i As Integer
Dim strDefaultPrinter As String
' List all available printers
For i = 0 To Printers.Count - 1
List1.AddItem Printers(i).DeviceName
Next i
strDefaultPrinter = Application.Printer.DeviceName
Me.List1 = strDefaultPrinter
'======================
Me.Move 0, 0
End Sub

Άλλαξα και τον προεπιλεγμένο εκτυπωτή αλλά δεν λύθηκε.

Ευχαριστώ εκ των προτέρων.