VB如何实现报表直接打印，而不显示选择打印机对话框

大侠们：
帮帮忙


VB如何实现报表直接打印，而不显示选择打印机对话框

[解决办法]
不显示打印对话框： DataReport1.PrintReport False


显示打印对话框：DataReport1.PrintReport True