以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  数值型转换为字符型  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=116968)

--  作者:王明晨
--  发布时间:2018/4/3 16:23:00
--  数值型转换为字符型
您好!

一个数值型数据规定为4位数,例如其值显示是“0001”,当转换成字符型数据时其值显示为“1”,怎样设置才能让其转换后也显示“0001”?
以上谢谢!

--  作者:有点甜
--  发布时间:2018/4/3 16:28:00
--  

drawcell事件,写代码

 

If e.Col.Name = "第一列" Then

    e.Text = Format(val(e.text), "0000")

End If