以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 用datacolchanged事件进行计算,不执行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=110404) |
-- 作者:lzj -- 发布时间:2017/12/2 7:41:00 -- 用datacolchanged事件进行计算,不执行 这是我编辑的datacolchanged事件代码,保存成功,在"wan1"列输入数据后,"wan01"列不自动填入数据"amn" Dim bmn As String=e.DataCol.name \'变化所在的列 If bmn= "wan1" Then Dim amn As String="0123456789" Dim cmn As String=e.newvalue \'新值 Dim dmn As Integer =amn.IndexOf(cmn) \'新值所在位置变量 amn=cmn & left( amn,dmn-1) & right(amn,9-dmn) \'万位重新排序 e.DataRow("wan01")=amn End If 有请大神
|
-- 作者:有点蓝 -- 发布时间:2017/12/2 8:50:00 -- 代码没有问题,wan1和wan01不能是表达式列 |
-- 作者:lzj -- 发布时间:2017/12/2 8:57:00 -- 都是数据列啊 |
-- 作者:有点蓝 -- 发布时间:2017/12/2 9:09:00 -- 上传实例说明 |
-- 作者:lzj -- 发布时间:2017/12/2 10:39:00 -- 还是专家厉害,准备给专家传照片时才发觉两列的列名引用错了,写代码真的要一丝不苟啊!!! |