主题：[求助]showDialog可以独立运行么？

SelectCase e.Path
Case "test.htm"
Dim wb As NewWeUI
With wb.AddButtonGroup("","bng2",True)
.Add("btn1","内容1").Attribute = "FONT-FAMILY: 宋体; COLOR: brown">恭喜','恭喜您抽中大奖,记得及时领奖哦!')"""
.Add("btn2","内容2").Attribute = "FONT-FAMILY: 宋体; COLOR: brown">成功','增加记录成功,单击确定继续增加!')"""
End With
With wb.AddDialog("","dlg1","","")
.AddButton("btnOK","确定")
EndWith
e.WriteString(wb.Build)'生成网页
End Select