主题：web页不显示

这个是个自定义函数，只显示前面的页面，点“查询”后，不显示，msgbox（）也能正常显示，请老师们支持一下，谢谢

'

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

点击浏览该文件:swfwtj.txt

修改红色代码

            With wb.AddTable("","Table1")               
                 .BooleanSymbol= "√×"
                .CreateFromTable(Tables("商务服务统计表"),True)
            End With
             With wb.AddButtonGroup("","bgt5")
                .Add("btn5" ,"返回").Attribute="onclick='history.back'"
            End With