以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  日期如何取值,显示为“YYMM”的年月格式,如“1702”  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96066)

--  作者:szsmall
--  发布时间:2017/2/12 12:51:00
--  日期如何取值,显示为“YYMM”的年月格式,如“1702”
如何从时间列,取值,显示为“YYMM”的年月格式,如2017年2月,显示为“1702”


图片点击可在新窗口打开查看此主题相关图片如下:日期取值.jpg
图片点击可在新窗口打开查看




--  作者:wyz20130512
--  发布时间:2017/2/12 15:14:00
--  
代码写在DataColChanged事件里

If e.DataCol.Name = "日期" Then
    e.DataRow("会计期间") = Format(e.DataRow("日期"),"yyMM")
End If

--  作者:有点色
--  发布时间:2017/2/12 15:21:00
--  

If e.DataCol.Name = "日期" Then
    If e.newValue = Nothing Then
        e.DataRow("会计期间") = Nothing
    Else
        e.DataRow("会计期间") = Format(cdate(e.DataRow("日期")),"yyMM")
    End  If
End If


--  作者:szsmall
--  发布时间:2017/2/16 21:47:00
--  
二楼的会出现错误,3楼的答案才对,要加空值判断和cdate


图片点击可在新窗口打开查看此主题相关图片如下:error.jpg
图片点击可在新窗口打开查看


--  作者:szsmall
--  发布时间:2017/2/16 21:55:00
--  
月份是大写的MM!!

开始打了小写,怎样都是错的,弄了半天才注意到,这个细节。帮助应该要提醒一下,y和d都是小写,突然月份是大写。

而且很奇怪,就算你改成大写MM,Foxtable还是会改回小写mm,不知道为什么。要整块删掉,才会改过来。




图片点击可在新窗口打开查看此主题相关图片如下:225.gif
图片点击可在新窗口打开查看

[此贴子已经被作者于2017/2/16 21:58:00编辑过]

--  作者:有点色
--  发布时间:2017/2/17 1:06:00
--  
 如果只是修改大小写,是不会认为你修改了代码的,你要额外修改一下其它地方,才行。