以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个大问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=9884)

--  作者:jxkqf
--  发布时间:2011/5/12 10:43:00
--  这个大问题

我想在单元格中输入“0011025”时自动变为“陕财11025”,

        单元格中输入“1111025”时自动变为“国办11025”,

如何实现?

如0011025后五位是文号,是不固定的,前两位是代表发文单位,是固定的。

[此贴子已经被作者于2011-5-12 10:44:38编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/5/12 11:33:00
--  

陕财和国办,是根据什么得来的。


--  作者:lihe60
--  发布时间:2011/5/12 11:48:00
--  
用drawcell
--  作者:lihe60
--  发布时间:2011/5/12 11:49:00
--  

或用replacefor


--  作者:狐狸爸爸
--  发布时间:2011/5/12 12:04:00
--  

人家是要求输入的时候处理,不是事后处理


--  作者:czy
--  发布时间:2011/5/12 13:02:00
--  

这样?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.table


--  作者:blackzhu
--  发布时间:2011/5/14 16:11:00
--  
If e.Col.Name = "第七列" Then
    Dim s As String = e.text
    e.text = s.SubString(0,2)
    s = s.Trim(e.text)
       If e.text = "00" Then
        e.text =("国办" & s)
    ElseIf e.text = "11"
        e.text =("陕财" & s)
    End If
End If

在表属性的ValidateEdit中加入此代码



--  作者:czy
--  发布时间:2011/5/15 0:27:00
--  

这样应该是有问题的

如果单位很多,显示这样设置不合理

如果想修改后面的数字,修改后会被清空


--  作者:blackzhu
--  发布时间:2011/5/16 7:26:00
--  
给个思路而已.
--  作者:blackzhu
--  发布时间:2011/5/16 7:31:00
--  
但是修改倒必须要全部重输入,不能只修改后部的数据.不然会清空.