第1个回答 2009-10-07
Private Sub Command1_Click()
MsgBox Val(Text1.Text) * 2
End Sub
每次都是提示我未找到方法或数据成员
那只能说明你控件没添加正确
第2个回答 2009-10-08
详细点,是作为一个变量,还是存入数据库。
改为:
Private Sub Command1_Click()
MsgBox (Val(Text1.Text) * 2)
End Sub
第3个回答 2009-10-07
dim a as single
a = val(text1.text)
这样就把TEXT1.TEXT的值传给a 了,以后直接用就行了.比如说text2的值等于TEXT1 * 4 就可以这样写:
text2.text = a * 4