以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  符号替代  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=44827)
--  作者：yuyu060712
--  发布时间：2014/1/9 17:57:00
--  符号替代

Dim dic As New Dictionary(Of String,String)
dic.Add("_",".")
dic.Add("/","-")
Tables("表B").Cols("第三列").CodeDictionary= dic

老师，我想在表里设置某列输入的字符中包含有 _ 自然替代成 .    输入 /  变成 - 上面的代码不起作用
--  作者：Bin
--  发布时间：2014/1/9 18:02:00
--  
DataColChanged事件
if e.datacol.name="第三列" then
    e.datarow("第三列")=e.datarow("第三列").replace("_",".")
    e.datarow("第三列")=e.datarow("第三列").replace("/","-")
end if
--  作者：yuyu060712
--  发布时间：2014/1/9 18:05:00
--  
谢谢老师