你定义一个变量,然后把文本框中的内容存储到变量中。
比如:
Dim a as Integer
a=val(Text1)
'以后a你就可以拿过来用了。
Private Sub Command1_Click()
MsgBox Val(Text1.Text) * 2
End Sub
每次都是提示我未找到方法或数据成员
那只能说明你控件没添加正确
详细点,是作为一个变量,还是存入数据库。
改为:
Private Sub Command1_Click()
MsgBox (Val(Text1.Text) * 2)
End Sub
dim a as single
a = val(text1.text)
这样就把TEXT1.TEXT的值传给a 了,以后直接用就行了.比如说text2的值等于TEXT1 * 4 就可以这样写:
text2.text = a * 4