以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何输入日期只输入年月,输入具体日期?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113734)

--  作者:ziawxh
--  发布时间:2018/1/22 11:12:00
--  如何输入日期只输入年月,输入具体日期?
我想做一个日期输入列,比如“出生年月”,数据只输入到年和月即可,不要输入日期。
[此贴子已经被作者于2018/1/22 11:17:50编辑过]

--  作者:有点甜
--  发布时间:2018/1/22 11:40:00
--  

drawcell事件,写代码

 

If e.Col.name = "日期" AndAlso e.text > "" Then
    e.text = Format(cdate(e.text), "yyyy-MM")
End If