以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  请教用户收藏行问题?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=94064)

--  作者：soulholy --  发布时间：2016/12/14 15:52:00 --  请教用户收藏行问题? AfterCheckRow事件: Dim nms As String = e.Row("收藏") If e.Row.Checked = True Then     nms  = nms & "," &  user.Name     If nms > "" Then         e.Row("收藏") = nms.Trim(",")     Else         e.Row("收藏") = Nothing     End If End If If e.Row.Checked = False Then \'去除收藏用户代码 End If 请教去除收藏代码这里要如何写?

--  作者：有点蓝 --  发布时间：2016/12/14 16:35:00 --   If e.Row.Checked = False Then nms  = ("," & nms & ",").replace("," & user.Name & ",",",").trim(",") End If

--  作者：soulholy --  发布时间：2016/12/14 16:55:00 --   感谢蓝老师!