计算问题~~~

lengyang 2005-12-30 09:22:12
1.我使用seclect sum(je) from data 获得je列的和 但不能得到小数点后的两位 je列的内容为60.00 请问如何解决

2.如何使00010+1等于00011 直接加的结果是11

...全文
126 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
lengyang 2005-12-31
  • 打赏
  • 举报
回复
都是60.00 比如是2个60.00 得到的是120 而不是 120.00
northwolves 2005-12-31
  • 打赏
  • 举报
回复
1.我使用seclect sum(je) from data 获得je列的和 但不能得到小数点后的两位 je列的内容为60.00 请问如何解决
--------------
不会吧,是不是正好是60.00?
northwolves 2005-12-31
  • 打赏
  • 举报
回复
Text3.Text = Format(Val(Text1.Text) + Val(Text2.Text), String(Len(Text1.Text), "0"))
Summer006 2005-12-31
  • 打赏
  • 举报
回复
两个问题都可以用format 搞定

内部运算的时候不要用format, 一直到显示在界面上的时候,就用format就ok了。
Tiger_Zhao 2005-12-31
  • 打赏
  • 举报
回复
懒人,自己看一下 Format 函数的帮助,参照中的“用户自定义数值格式(Format 函数)”
Snoworld 2005-12-31
  • 打赏
  • 举报
回复
Format
mll5644 2005-12-31
  • 打赏
  • 举报
回复
关于这种格式化数据的问题,我们公司作公路试验软件中专门写这样一些函数。你把问题归纳一下,写个这样的函数
lengyang 2005-12-30
  • 打赏
  • 举报
回复
大哥可能理解成我的意思了
上面的 text1=001 text2=1 加后就是011了 而我想得到的是002

大哥帮我第一个问题也解决下 上午你给的round()执行不了
faysky2 2005-12-30
  • 打赏
  • 举报
回复
用户输入的也行:
Dim strL As Integer,ret As String
strL=IIf(Len(Text1.Text)>Len(Text2.Text),Len(Text1.Text),Len(Text2.Text))
ret=Format(Text1.Text+Text2.Text,String(strL,"0"))
lengyang 2005-12-30
  • 打赏
  • 举报
回复
不行,这样等于把数值固定了 而让用户输入成别的数据就不行了
faysky2 2005-12-30
  • 打赏
  • 举报
回复
2.用format函数
format(00010+1,string(len("00010"),"0"))

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧