vb简易计算器代码问题
Dim x, y As Integer
Private Sub Command1_Click()
Label1.Caption = Command1.Caption
x = Text1.Text
y = Text2.Text
Text3.Text = x y
End Sub
我是这么写的,为什么算出来的数字结果是取整的,没有小数
哪里错了,该怎么改。。
因为你在定义的时候已经把x y 定义成了整型,在将text1,text2的值赋值给x y的时候就会自动转化成整型数据。
要修改,你可以将Dim x, y As Integer这句改成:
Dim x, y As float
或者:
Dim x, y As Single
Dim x, y As Double
答:usingSystem;usingSystem.Collections.Generic;usingSystem.Text;namespace大话设计模式{//一...详情>>