在窗口中加入一个WebBrowser控件,窗口的AfterLoad事件代码设置为:
Dim
wbr
As
WinForm.WebBrowser
= e.Form.Controls("WebBrowser1")
Dim
tmp
As
String = ProjectPath
&
"Attachments\资料卡.xls"
Dim
rpt
As
String = ProjectPath
&
"Reports\资料卡.xls"
Dim
Book
As
New
XLS.Book(tmp)
Book.Build()
Book.Save(rpt)
wbr.OfficeToolBar = True
'如果不需要显示工具栏,可删除此行代码
wbr.AddRess = rpt
请问如何打开窗口后,窗口最大化?