Question

vb中把文本框的值赋给一个变量的困惑

各位大侠看看我这是什么问题？为什么我不能把文本框的值赋给一个变量啊？？？
dim a as integer
dim b as integer
a = cint(text1.text)
b = 2*cint(text2.text)
***************************
我在text1中添的是2
在text2中添的是10

为什么无法赋值
调试的时候显示a=0 b=0啊
请各位大侠帮帮忙吧。急啊！

Answer 1

泥的代码运行结果无错，如果是在它处引用a,b的值，则需申明为全局变量或窗体变量：
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a = CInt(Text1.Text)
b = 2 * CInt(Text2.Text)
Print a
Print b
End Sub

Answer 2

Dim是过程级的声明
如果你是在别的过程里调用这个过程中声明的变量，就会出错的

Answer 3

public a as integer
public b as integer
a = cint(text1.text)
b = 2*cint(text2.text)

Answer 4

TEXE里的是字符，要用VAL函数转换一下，写成a = cint(val(text1.text))
应该就没问题了

Answer 5

如果只有这点代码，那肯定是对的（我已运行过）
是不是有其它 的代码？你在其他的过程中调用ab就必然被系统重新给ab赋值默认的0

Answer 6

使用以下的语句就可以了。
dim
s
as
string
s=text1.text