设为首页收藏本站Access中国
Office中国(www.office-cn.net),专业Office论坛

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 2213|回复: 10

[Access本身] [解决了]显示小数点前导0问题?

[复制链接]
发表于 2008-3-31 12:13:37 | 显示全部楼层 |阅读模式


看了资料,有说设置固定格式就好,怎么设置不来?
在文本框输入时0~1之间的数值显示为0.000的格式(如0.003 而不是显示.003)
很多人遇到的问题,请达人详细解答!

[ 本帖最后由 sunny-xie 于 2008-4-1 08:36 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点击这里给我发消息

发表于 2008-3-31 12:16:00 | 显示全部楼层
如果显示为.003,则与程序无关,则在控制面板 区域 设置中 数字格式中设置显示前导零
发表于 2008-3-31 13:59:54 | 显示全部楼层
也可以用代码来实现

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
 楼主| 发表于 2008-3-31 14:25:52 | 显示全部楼层

回复 4# 的帖子

可否在文本框里输入的时候就自动完成转换?
 楼主| 发表于 2008-3-31 14:27:43 | 显示全部楼层
控制面版里是可改,
哎,总不能让每个用到这个库的人去改的吧

还是能自动完成转换好
 楼主| 发表于 2008-3-31 17:08:20 | 显示全部楼层
Dim Buffer As String * 100
      Dim lngLocale As Long
      Dim GetLanguage As String
      lngLocale = GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_ILZERO, Buffer, 99)
      GetLanguage = LPSTRToVBString(Buffer)
      If GetLanguage = 0 Then SetLocaleInfo lngLocale, LOCALE_ILZERO, 1
能否让这个代码在窗体打开时自动把控制面版里的设置改为显示前导0?

[ 本帖最后由 sunny-xie 于 2008-3-31 17:11 编辑 ]
发表于 2008-3-31 18:07:26 | 显示全部楼层
原帖由 sunny-xie 于 2008-3-31 14:27 发表
控制面版里是可改,
哎,总不能让每个用到这个库的人去改的吧

还是能自动完成转换好

用代码的目的就是这样啊,放在启动窗体里就是喽。

点击这里给我发消息

发表于 2008-4-1 13:19:44 | 显示全部楼层
原帖由 sunny-xie 于 2008-3-31 17:08 发表
Dim Buffer As String * 100
      Dim lngLocale As Long
      Dim GetLanguage As String
      lngLocale = GetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_ILZERO, Buffer, 99)
      GetLanguage = LPSTRToVB ...


这个方法试过是否可以
 楼主| 发表于 2008-4-1 15:32:45 | 显示全部楼层

回复 9# 的帖子

写在窗体open事件里是可以
发表于 2008-7-21 10:55:28 | 显示全部楼层
调用了API,会被卡巴拦截,反而引起客户误会。还是让他自己到控制面板里改好。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2022-12-7 15:38 , Processed in 0.119983 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表