用VB做算术计算器,在两个文本框中输入数值,加,减,乘都没有问题,可是除法的时候有点小问题.

如果输入一个被除数小于除数,例如5除以10,答案就是.5,而不是0.5,请高手指点这是什么原因?

第1个回答  2006-09-27
在 VB 中 .5 就是 0.5
你可以在显示的时候加个判断

if 值 < 1 then
值 = '0' & 值本回答被提问者采纳
第2个回答  2006-09-27
你可以使用下面这样来转换(假设value为要显示的浮点数):

Dim strValue As String
strValue = Str(value)
strValue = Mid(strValue, 1, 1) & IIf(Mid(strValue, 2, 1) = ".", "0", "") & Mid(strValue, 2)

这样输出strValue即为想要的显示结果。
第3个回答  2006-09-27
在 VB 中 就是这样的
你可以在显示的时候加个判断

if 0 < 值 < 1 then
text3.text = "0" & 值

else
text3.text = 值

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网