主题：打印窗口piao据

在窗口2中单击窗口1按钮会打印窗口1，点打印应打印窗口1的内容，但是为什么是空白的呢？  打印按钮的代码也按帮助中的设置了，为什么打印不了呢

Dim tb As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim pg As WinForm.TabPage = tb.SelectedPage
Dim doc As PrintDoc = e.Form.GernatePrintDoc(pg)
doc.Preview()

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目5.foxdb

我是按帮助里的说明做，怎么不行呀