'dr1.Show '''非自定义纸张，可以预览后打印,打印方向也正确 。
dr1.PrintReport 'False '''自定义纸张不要预览直接打印，否则出现横向打印怪事。false不显示打印机对话框
'dr1.PrintReport True '''显示打印机对话框
''''说明：自定义纸张不要预览直接打印。比如22*14，如果预览后再打印就变成横向打印的怪事。
''''因为VB默认宽度小的为报表头。正常的22*28，22是报表头；自定义的22*14，VB就会默认14为报表头，所以预览打印就会变成横向！！！
