主题：请教WeUI中Preview和Panel控制问题。

学一下css http://www.w3school.com.cn/css/index.asp

        With wb.AddPreview("","pv1","付款金额","￥2400")
            .AddItem("项目1","内容1")
            .AddItem("<b style='font-weight:normal;font-size:20px;color:red'>项目2</b>","<b style='font-weight:normal;font-size:20px;color:red'>内容2</b>")
            .AddItem("项目3", "电动打蛋机")
            .Addbutton("操作", "", 1, "")
       End With

上面是preview的，panel的也类似修改。

加上代码

wb.AppendHTML("<style>.weui-form-preview + .weui-form-preview {margin-top: 2px;}</style>")

参考

Select Case e.Path
    Case "test.htm",""
        Dim wb As New weui
        wb.AppendHTML("<script>var zj</script>")
        With wb.AddActionSheet("","menu2")
            .add("mAdd","增加").Attribute="" '调用ajaxform.js 中的新增函数
            .add("mEdit","编辑").Attribute="onclick=""alert(zj)"""
            .add("mDel","删除").Attribute=""
            .add("mCancel","取消","",True)
        End With
        Dim zhujian As String = "abcdefg"
        With wb.AddPreview("","pv1","付款金额","￥2400")
            .Attribute = "onclick = ""zj='" & zhujian & "';show('menu2')"""
            .AddItem("项目1","内容1")
            .AddItem("<b style='font-weight:normal;font-size:16px;color:red'>项目2</b>","<b style='font-weight:normal;font-size:16px;color:red'>内容2</b>")
            .AddItem("项目3", "电动打蛋机")
        End With
       
        wb.AppendHTML("<style>.weui-form-preview + .weui-form-preview {margin-top: 2px;}</style>")
        e.WriteString(wb.Build) '生成网页
End Select