Dim grp As WinForm.GroupBox = e.Form.Controls("GroupBox1")
Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp)
doc.Preview()
Dim tb As WinForm.TabControl = e.Form.Controls("Label1")
Dim pg As WinForm.TabPage = tb.SelectedPage
Dim Doo As PrintDoc = e.Form.GernatePrintDoc(pg)
Doo.Preview()
Dim ta As WinForm.TabControl = e.Form.Controls("Button1")
Dim pa As WinForm.TabPage = tb.SelectedPage
Dim Doe As PrintDoc = e.Form.GernatePrintDoc(pa)
Doe.Preview()
无法将类型为“Foxtable.WinForm.Label”的对象强制转换为类型“Foxtable.WinForm.TabControl”。
[此贴子已经被作者于2014-8-23 11:03:05编辑过]