以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何实现单元格数据自动转换 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=127292) |
-- 作者:zyxhx -- 发布时间:2018/11/10 11:03:00 -- 如何实现单元格数据自动转换 老师您好!
想实现在年龄单元格输入字符如:1s , 1s2y ,1s2y3t .回车后自动转换成1岁,1岁2月,1岁2月3天。 总之就是想将字符后输入的s,y,t字母转换成岁,月,天。(如果只输入了1s 就显示1岁,后面的y,t没有输入就不显示。)
另外根据年龄列输入的内容在出生日期列生成对应的出生日期。
且如果在出生日期列直接输入后,年龄列自动根据出生日期列内容转换成某岁某月某天。
请老师指点一下,该如何写代码?
谢谢老师。 [此贴子已经被作者于2018/11/10 11:06:03编辑过]
|
-- 作者:有点蓝 -- 发布时间:2018/11/10 11:24:00 -- 参考:http://www.foxtable.com/webhelp/scr/0620.htm 例如 If e.Col.name = "年龄" Then \'如果正在年龄 If e.KeyChar = "s" Then \'如果输入的是s e.Cancel = True e.SelectedText = "岁" ElseIf e.KeyChar = "y" Then \'如果输入的是y e.Cancel = True e.SelectedText = "月" ElseIf e.KeyChar = "t" Then \'如果输入的是t e.Cancel = True e.SelectedText = "天" End If End If |
-- 作者:zyxhx -- 发布时间:2018/11/10 12:46:00 -- 谢谢老师指点!
|