In theo khổ giấy bất kỳ trong Visual Basic

In theo khổ giấy bất kỳ trong Visual Basic

Chẳng lẽ mấy bác cao thủ trong này không có bác nào giúp được em sao !?

===============================================
Chào các bạn,
Trong VB mình viết một ứng dụng muốn in dữ liệu ra máy in theo khổ giấy bất kỳ, mình đã viết là :

Printer.PaperSize = vbPRPSUser
Printer.ScaleMode = vbCentimeters
Printer.Orientation = vbPRORPortrait

Printer.Width = 21.1
Printer.Height = 14

Nhưng bị báo lỗi "Run-time error 380 : Invalid property value".

Vậy xin các anh chị hướng dẫn giùm mình cách nào để giải quyết được lỗi này, hoặc có giải thuật nào khác để in theo khổ giấy bất kỳ thì hướng dẫn giùm mình với !

Xin cảm ơn rất nhiều