【请教】求VB中打印输出EXCEL报表方法

小弟不才，自己编写一小程序，查询到的结果用ListView1控件显示出来。
现在我想打印到纸上。不知道怎么办，在网上查询了一下，大概知道了一点，就是要想实现打印到纸上，控制最方便的好像要配合EXCEL了。所以，

小弟想求助，把VB中查询到ACCESS数据的值打印到纸上。更急于想知道怎么控制格式。

小弟在网上查找了一些，但看不太明白。
谢谢亲爱的网友提供的帮助，试了一下，看到了效果。

若再能有点明确的注释（SET后边的内容分别代表何意义）加上格式控制（列宽，行高，字体，字号，颜色等）就更完美了。

如果格式不是太复杂，用Printer比较好，调用EXCEL不方便。

以下演示了用 VB 打开excel，并将第2行，第3列的值设为“test”

Dim ExlApp As Object
Dim ExlBook As Object
Dim ExlSheet As Object

Set ExlApp = CreateObject("Excel.Application") '创建Excel的应用程序实例
Set ExlBook = ExlApp.WorkBooks.Add '创建Excel的工作簿
Set ExlSheet = ExlBook.WorkSheets(1) '创建Excel的一张表

ExlSheet.Columns(3).ColumnWidth = 15 '第3列的列宽=15
ExlSheet.Rows(2).RowHeight = 33 '第2行的行高=33

ExlSheet.Columns(3).Rows(2).Font.Name = "楷体_GB2312" '第2行第3列的字体
ExlSheet.Columns(3).Rows(2).Font.Size = 20 '第2行第3列的字号
ExlSheet.Columns(3).Rows(2).Font.Color = vbRed '第2行第3列的前景颜色

ExlSheet.Columns(3).Rows(2).Interior.Color = vbBlue '第2行第3列的背景颜色

ExlSheet.Cells(2, 3).Value = "Test" '第2行第3列的值