vb问题,帮忙设计一个简单的程序

照抄啊幸的
把其中的CINT改为VAL更好点
Private Sub Command3_Click()
Dim a
If Text1 = "" Or Text2 = "" Or Text3 = "" Then
a = ""
Else
a = VAL(Text1) + VAL(Text2) + VAL(Text3) '转换成数据,如果是怕输入文本，就在输入时限制下
MsgBox a
End If
End Sub

原因在于
CINT只能是整数，clng(长整型）csng(单精度型，可以为小数）cdbl(双精度型） 这些都是他们的限制，使用VAL是告诉编译器这是个数字

这么简单的还要别人帮忙?
不是吧, 直接看教程都有这条的程序示例的.

简单的,不定义的数据类型，

Private Sub Command3_Click()
Dim a
If Text1 = "" Or Text2 = "" Or Text3 = "" Then
a = ""
Else
a = CInt(Text1) + CInt(Text2) + CInt(Text3) '转换成数据,如果是怕输入文本，就在输入时限制下
MsgBox a
End If
End Sub