为什么用vb编的计算器2+3=23,5+6=56????

来源:百度知道 编辑:UC知道 时间:2024/04/29 04:35:32
我按照书上说的编了个计算器,其他运算还正常,可就是加法有问题“2+3=23,5+6=56????”还有在“通用”里如何换行,我按回车不行?!!
等于的代码如下:
Private cunfangyunsuan As String: Private cunfangbei As String: Private cunfang As String: Private shifoushuru As String

Private Sub Command11_Click()
cunfang = Val(Text1)

If cunfangyunsuan = "/" Then
Text1 = cunfangbei / cunfang
ElseIf cunfangyunsuan = "*" Then
Text1 = cunfangbei * cunfang
ElseIf cunfangyunsuan = "+" Then
Text1 = cunfangbei + cunfang
ElseIf cunfangyunsuan = "-" Then
Text1 = cunfangbei - cunfang
End If

cunfangyunsuan = ""
shifoushuru = False
End Sub

在通用里换行,按回车后,要把行首的冒号去掉

Private cunfangbei As String: Private cunfang As String
改成
Private cunfangbei As Single: Private cunfang As Single

你将两个字符串相加了
必须将输入的字符串先转换为整数或小数,进行加减运算后,再转换成字符串,最后显示

贴代码,,,