以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]将日期自动转换为小写中文格式  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91191)

--  作者:jyh7081
--  发布时间:2016/10/2 13:03:00
--  [求助]将日期自动转换为小写中文格式

一个表的 "日期"列,用“内置输入器”输入后,自动转行成中文小写格式,如"二〇一六年七月二十日"。

我在表的DataColChanged事件中写如下代码,出现错误:

Select Case e.DataCol.Name

    Case "日期"

        If e.Value IsNot Nothing Then

            e.Value = CLDate(e.Value).substring(0,4)

        End If

End Select



--  作者:狐狸爸爸
--  发布时间:2016/10/3 8:51:00
--  
日期不能存储字符,只能存储日期。
这样的问题,可以用DrawCell事件解决。

Select Case e.Col.Name

    Case "日期"

        If e.row.Isnull("日期") = False

            e.Value = CLDate(e.row("日期"))

        End If

End Select


--  作者:jyh7081
--  发布时间:2016/10/3 11:04:00
--  
提示:Value不是DrawCellEventArgs成员



Value改成text就行了,谢谢狐爸!
[此贴子已经被作者于2016/10/3 11:24:58编辑过]