关于打印的有关问题

关于打印的问题
各位高手       谁可以告诉我关于打印的代码啊???
谢谢了           我是刚学的VB   帮帮我啊!

------解决方案--------------------
建议用水晶报表,代码很简单的,只要会用水晶报表就行了,代码部分可以提供

'丢弃原有数据
crtBJXSMD.DiscardSavedData
'指定报表来源
crtBJXSMD.Database.SetDataSource rsXSPYXXST
CRViewer91.ReportSource = crtBJXSMD
'显示报表
CRViewer91.ViewReport
CRViewer91.Refresh