在窗口显示Excel报表

如果还没有接触过窗口设计,可以暂时忽略本节的内容。

在默认情况下,Foxtable会直接启动Excel来显示生成的Excel报表。

借助WebBrowser控件,你可以在窗口中显示生成的Excel报表。

要在WebBrowser显示Excel报表,必须将生成的Excel报表保存为网页,有两个方法可以完成这个任务:

SaveToHTML生成的是常规的HTML文件文件,兼容性好,但会生成多个文件。

SaveToMHT只生成一个文件,使用更方便,但是并非所有的浏览器支持MHTML文件,兼容性差一些。

不过WebBrowser控件可以完美地显示MHTML文件,所以在窗口显示Excel报表时,通常使用SaveToMHT方法。

示例

新建一个窗口(建议使用模式窗口或独立窗口),在窗口中加入一个WebBrowser控件,窗口的AfterLoad事件代码设置为:

Dim tmp As String  = ProjectPath & "Attachments\资料卡.xls"
Dim
mht As String = ProjectPath & "Reports\资料卡.mhtml"
Dim
rpt As New XLS.Book(tmp)
rpt
.Build()
rpt
.Sheets(0).Rows(0).Visible = False '隐藏第一个空行
rpt
.SaveToMHT(mht)
e
.Form.Controls("WebBrowser1").Address = mht

这样一打开窗口,就会自动在窗口的WebBrowser控件显示生成的Excel报表。


本页地址:http://www.foxtable.com/webhelp/topics/1892.htm