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大话设计模式{//一...详情>>
答:'不需要任何控件,需要的是如下代码: '因为您的分值为0,并且考虑到您并不一定会采纳,所以请原谅小的不写注释.以下代码只帖出两天,若您觉得没用,那小的自会删除,...详情>>