Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教格式


  共有2230人关注过本帖树形打印复制链接

主题：请教格式
帅哥哟，离线，有人找我吗？
hbhb
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5055 积分：13047 威望：0 精华：0 注册：2014/5/15 21:34:00 		请教格式  发帖心情 Post By：2015/10/30 10:10:00 [只看该作者]

大师，好！
请问123,654.98  也就是format("123654.98","n")后的格式，为何参与计算时变成123？
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/30 10:16:00 [只看该作者]

先运算，在格式化啊。或者先把逗号,替换成空值""

 回到顶部
帅哥哟，离线，有人找我吗？
hbhb
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5055 积分：13047 威望：0 精华：0 注册：2014/5/15 21:34:00 		  发帖心情 Post By：2015/10/30 10:37:00 [只看该作者]

谢谢！
那如何实现单元格输入数字123456.88时，自动转换为带分号符，123,456.88？
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/30 10:45:00 [只看该作者]

1、你可以设置列的格式

 

http://www.foxtable.com/help/topics/1659.htm

 

2、你可以去写drawcell事件如

 

Dim d As Double

If Double.TryParse(e.Text, d) Then
    e.text = format(d, "n")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
hbhb
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5055 积分：13047 威望：0 精华：0 注册：2014/5/15 21:34:00 		  发帖心情 Post By：2015/10/30 11:46:00 [只看该作者]

谢谢！
按2的方式，如我输入的就是format(d, "n")格式，就不行了？为何如下改动一下，就错误？

Dim d As Double

If Double.TryParse(str(e.Text).replace(",",""), d) Then
    e.text = format(d, "n")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/30 11:49:00 [只看该作者]

Dim d As Double

If Double.TryParse(e.Text.replace(",",""), d) Then
    e.text = format(d, "n")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
hbhb
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5055 积分：13047 威望：0 精华：0 注册：2014/5/15 21:34:00 		  发帖心情 Post By：2015/10/30 12:02:00 [只看该作者]

经验主义不是害死人，而是经验主义乐傻人！

 回到顶部
帅哥哟，离线，有人找我吗？
hbhb
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5055 积分：13047 威望：0 精华：0 注册：2014/5/15 21:34:00 		  发帖心情 Post By：2015/10/30 12:42:00 [只看该作者]

大师：drawcell事件中，为何下面的代码错？

If e.text = "0" Or e.text = "0.00" Or e.text = 0 Or e.text = 0.00  Then
e.text = ""
End If
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/30 12:49:00 [只看该作者]

If val(e.text) = 0 Then

 

End If
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04102 秒, 4 次数据查询