text1.text= 1323.32 不过val(text1.text ) 却对小数点四舍五入,得到的总是整数而非小数

来源：学生作业帮编辑：大师作文网作业帮分类：综合作业时间：2024/11/10 23:37:30

text1.text= 1323.32 不过val(text1.text ) 却对小数点四舍五入,得到的总是整数而非小数,下面是全部代码
Private Sub Command12_Click()
.我在此行用print 输出text1.text = 123.4
a = Val(Text1.Text) .然后在此行print输出a = 123 而不是123.4 ,这是怎么回事?
d = "+"
Text1.Text = ""
End Sub

说明变量a是整型或长整型的.当变量为整型或长整型时得到的结果是这个数小数部分四舍五入后的整数也就是123.
如果变量是单精度、双精度或货币型的话输出的就是123.4 .

text1.text= 1323.32 不过val(text1.text ) 却对小数点四舍五入,得到的总是整数而非小数在VB 语句中 x = Val(Text1.Text) Val Private Sub Command1_Click() A = Val(Text1.Text):B = Val(Tex If text1.text"" then... VB奇数求和Private Sub Command1_Click()vl = Val(Text1.Text)vj = V a(i) = Mid(Text1.Text,i, If Text1.Text = "" Then s_id = "%" Else s_id = Text1.Text En 在VB当中 1.Text1.Text = Text1.Text & x & "+" & y & "=( )" & Chr VB编程If Len(Text1.Text) = Len(Text1.Text) - 1 Then len(Text2. VB中Text1.text=text1.text+CStr(a(i))+" " If i=4 then text1.te VB b=val(text1.text)-1 dim a(b) as Integer 这样写出现要求常数表达式 VB判断相关的问题思路是这样的,判断TEXT1.TEXT里的内容,当TEXT1.TEXT=111,则执行Timer1.I