Foxtable(狐表)用户栏目专家坐堂 → 如何快速输入


  共有2473人关注过本帖树形打印复制链接

主题:如何快速输入

帅哥哟,离线,有人找我吗?
13796361423
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:179 积分:1932 威望:0 精华:0 注册:2020/2/14 18:49:00
如何快速输入  发帖心情 Post By:2020/6/23 15:24:00 [只看该作者]

DataTables("初三中考").ReplaceFor("代码","汤93","学校名称='汤原县第一中学'")
DataTables("初三中考").ReplaceFor("代码","汤92","学校名称='汤原县第二中学'")
DataTables("初三中考").ReplaceFor("代码","汤91","学校名称='汤原县香兰镇中学'")
DataTables("初三中考").ReplaceFor("代码","汤90","学校名称='汤原县太平川乡学校'")
DataTables("初三中考").ReplaceFor("代码","汤9","学校名称='汤原县黑金河学校'")
DataTables("初三中考").ReplaceFor("代码","汤8","学校名称='汤原县永发乡学校'")
DataTables("初三中考").ReplaceFor("代码","汤7","学校名称='汤原县鹤立镇中学'")
DataTables("初三中考").ReplaceFor("代码","汤5","学校名称='汤原县吉祥乡学校'")
DataTables("初三中考").ReplaceFor("代码","汤4","学校名称='汤原县振兴乡学校'")
DataTables("初三中考").ReplaceFor("代码","汤6","学校名称='鹤立林业局第一中学'")
DataTables("初三中考").ReplaceFor("代码","汤2","学校名称='黑龙江省汤原农场学校'")
DataTables("初三中考").ReplaceFor("代码","汤1","学校名称='黑龙江省梧桐河农场学校'")
DataTables("初三中考").ReplaceFor("代码","汤3","学校名称='汤原县朝鲜族学校'")

 

 

以上这些命令,总是在命令窗口里输入, 能不能把这些命令放在表属性的某个位置,打开表时自动替换,不用我总输入了


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/23 15:46:00 [只看该作者]

到datacolchanged事件处理,比如:

if e.datacol.name = "学校名称" then
select case  e.newvalue 
case "汤原县第一中学" then
e.datarow("代码") = "汤93"
case "汤原县第二中学" then
e.datarow("代码") = "汤92"
end select
end if

比较合理的方法应该是建一个字典表,存储学校的编码,通过查表方式引用数据:http://www.foxtable.com/webhelp/topics/1451.htm

 回到顶部