showDialog函数

showDialog是是我们在文件"weui.me.js"定义的一个函数，专门用于显示对话框，而且可以修改显示的标题和内容，语法：

showDialog(id,Title,Content)

有了showDialog，我们可以用同一个对话框，显示不同的内容。

一个例子

HttpRequet事件代码：

Select Case e.Path
    Case "test.htm"
        Dim wb As New WeUI
        With wb.AddButtonGroup("","bng2",True)
            .Add("btn1","内容1").Attribute = "onclick=""showDialog('dlg1','恭喜','恭喜您抽中大奖,记得及时领奖哦!')"""
            .Add("btn2","内容2").Attribute = "onclick=""showDialog('dlg1','成功','增加记录成功,单击确定继续增加!')"""
        End With
        With wb.AddDialog("","dlg1", "","")
            .AddButton("btnOK","确定")
        End With
        e.WriteString(wb.Build) '生成网页
End Select

下图是通过手机访问的效果，我们只定义了一个对话框，分别单击两个按钮，会在这个对话框显示不同的内容：