以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]将日期自动转换为小写中文格式  (http://foxtable.net/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编辑过]