回 帖 发 新 帖 刷新版面

主题:如何在text控件中取到int 数据?

Private Sub Command1_Click()
   Static t, a, b, m as integer

    a = Text1.Text
    b = Text2.Text
    m = a + b
    Text3.Text = m

End Sub
 

为什么  输入12 和12 在text3里得到1212,而不是24.
怎么样从text控件里把string数据读取成integer数据?

回复列表 (共3个回复)

沙发

因为声明格式不对。
Static t, a, b, m as integer声明的结果是:
t:变体
a:变体
b:变体
m:整型

a = Text1.Text
text本来就是字符串,所以a里的内容就是字符串类型
b = Text2.Text
同上。

解决的方法:
第一种、改变声明为:
Static t as integer, a as integer, b as integer, m as integer
就可以了。
第二种、改变赋值方法:
a = cint(Text1)
b = cint(Text2.Text)
也行。
第三种、改变求和的语句:
m = cint(a) + cint(b)
也能达到你的目的。

我推荐第一种。

板凳

推荐第一种的理由有以下几点:
1、除非必要,不轻易使用变体变量。这样减少内存开销。
2、清晰的声明,增加程序的可读性。这样利于程序维护。
3、减少函数的使用,提高程序的效率。

3 楼


非常清晰,明了。谢谢你!!!
您可真是高手!![em2]

我来回复

您尚未登录,请登录后再回复。点此登录或注册