以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于复选列表项 的afterchecked 事件 要怎么写?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100892)

--  作者:ap9709130
--  发布时间:2017/5/20 11:50:00
--  关于复选列表项 的afterchecked 事件 要怎么写?
如题!
--  作者:有点蓝
--  发布时间:2017/5/20 11:58:00
--  
写什么?实现什么功能?
--  作者:ap9709130
--  发布时间:2017/5/20 12:03:00
--  
我想在实现,当选择 复选列表项 的选项后,文本框的 值 等于 所选的  复选列表项 的选项。
--  作者:有点蓝
--  发布时间:2017/5/20 12:08:00
--  
        With wb.AddCheckGroup("form1","rdg1","浏览器")
            .Add("bw1","Intenet Explorer", True) \'默认勾选
            .Add("bw2","Google Chorme").Attribute = "onclick=""document.getElementById(\'areacode\').value = this.checked"""
            .Add("bm3","FireFox").Attribute = "onclick=""alert(this.checked)"""
            .Add("bm4","Safari").Enabled = False \'此项不可选
        End With