سلام
من اين 3 تا پرينتر رو دارم
بعد اين كد رو اجرا ميكنم
Private Sub Command1_Click()
Printer.ScaleMode = vbMillimeters
Printer.PaperSize = vbPRPSA5
Printer.Orientation = vbPRORLandscape
Printer.EndDoc
End Sub
انتظار دارم وقتي اون صفحه رو ميارم به اون شكلي كه نشون دادم باشه اما نميشه
من اين تست رو روي هر سه تا پرينتر انجام دادم اما نشد
ميشه شما اگر پرينتر داريد تست كنيد ببينيد اين كدها روي پرينتر شما اين تغييرات رو اعمال ميكنه يا نه ؟؟؟