以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  【求助】如何填位  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=94651)
--  作者：yeshuping5045
--  发布时间：2016/12/28 21:13:00
--  【求助】如何填位
有1列是日期（时间日期型），有1列是属期（表达式列，字符型，2位数），表达式为：SubString(Convert([收发日期],\'System.String\'),6,IIF(SubString(Convert([收发日期],\'System.String\'),7,1) In (\'-\',\'/\'),1,2))
结果不尽人意：比如，日期是2016年9月1日，表达式结果是9，如何让结果是09呢？或者如何编写代码呢？
--  作者：有点色
--  发布时间：2016/12/28 21:30:00
--  

 如果要做，写表达式太麻烦，还不如用代码处理，简单方便

 

 DataColchanged事件

 

If e.DataCol.Name = "收发日期" Then
    If e.NewValue = Nothing Then
        e.DataRow("属期") = Nothing
    Else
        e.DataRow("属期") = Format(e.DataRow("收发日期"), "MM")
    End If
End If
--  作者：yeshuping5045
--  发布时间：2016/12/28 21:33:00
--  
太感谢了！