两个数字相除后所得结果的问题

go_best 2006-04-21 10:17:40

各位大哥
我碰到个问题
就是当一个数值除以另外一个数值后的值在0-1之间时
现在显示出来的是
例如
1/10=.1
请问如何可以在进行 1/10 的运算后得到 0.1这种方式的显示呢
我用ccur,cdbl,round,format 等方法后还都是没法转变
有知道的请帮帮我吧

...全文

152 8 打赏收藏转发到动态举报

写回复

用AI写文章

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

Saytoyou 2006-04-21

打赏
举报

FormatNumber(1 / 10, , vbTrue)

of123 2006-04-21

打赏
举报

Format(你的数字, "standard")

Ninputer 2006-04-21

打赏
举报

再不济还可以Format(2345.2345, "0.#########")

Ninputer 2006-04-21

打赏
举报

这个比1大的或者比0小的也照样正确

go_best 2006-04-21

打赏
举报

谢谢这样是可以
但是现在的问题是
我是根据服务器那边去过来的数据然后成批做运算的
所以出来的数据进行运算后有的是大于1的数值
然后显示出来的数值中现在就是数值在0-1 区间的那部分显示
不正确
请帮忙解决

Ninputer 2006-04-21

打赏
举报

Format(1/10, "0.#")

lv1 2006-04-21

打赏
举报

根据小数点来剪开数据,这估计是比较笨的方法了,hoho
Private Sub Command4_Click()
Dim a As string
Dim i As Integer
a = 1234.12
For i = 1 To Len(a)
If Mid(a, i, 1) = "." Then
a = Format(Mid(a, i), "0.00")
Exit For
End If
Next
MsgBox a
End Sub

tangchuan2005 2006-04-21