以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  如何实现：想点击按钮，对话框消失  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170792)

--  作者：zhangjian222200 --  发布时间：2021/8/7 15:17:00 --  如何实现：想点击按钮，对话框消失                 Dim fubiaoti As String = "发布物品!或看看会员中心!" \'定义,副标题                 sb.AppendLine("<div class=\'weui_dialog_confirm\' id=\'dlg5\' name=\'dlg5\'>")                     sb.AppendLine("<div class=\'weui_mask\'></div>")                     sb.AppendLine("<div class=\'weui_dialog\'>")                         sb.AppendLine("<div class=\'weui_dialog_hd\'>")                             sb.AppendLine("<strong class=\'weui_dialog_title\'>物品不足补充示例物品展示</strong>")                         sb.AppendLine("</div>")                         sb.AppendLine("<div class=\'weui_dialog_bd\'>" & fubiaoti & "</div>")                         sb.AppendLine("<div class=\'weui_dialog_ft\'>")                             sb.AppendLine("<a id=\'btnn5-0\' name=\'btnn5-0\' Type=\'button\' class=\'weui_btn_dialog primary\' href=\'javascript:;\'>继续看看</a>")                             sb.AppendLine("<a id=\'btnn5-1\' name=\'btnn5-1\' Type=\'button\' class=\'weui_btn_dialog default\' href=\'/per_fabu.htm\'>发布物品</a>")                         sb.AppendLine("</div>")                     sb.AppendLine("</div>")                 sb.AppendLine("</div>") 想点击上述“继续看看”按钮，对话框消失。但是，上面代码在微信web开发工具，实际效果，并不会消失，点击后，而是始终在，不消失。 此主题相关图片如下：qq图片20210807151513.png

--  作者：有点蓝 --  发布时间：2021/8/7 15:24:00 --   sb.AppendLine("<a id=\'btnn5-0\' name=\'btnn5-0\' Type=\'button\' class=\'weui_btn_dialog primary\' href=\'javascript:;\' onclick=""hide(\'dlg5\')"">继续看看</a>") http://www.foxtable.com/mobilehelp/topics/0080.htm