用VB编一个简单的计算器程序

来源：百度知道 编辑：UC知道 时间：2024/05/14 16:57:56
各位帮帮我，学完VB了连计算器的简单程序都做不到。真是惭愧啊，
不要太复杂，只要能加减乘除就可以了关于小数点的就算了。还有加上注释就太好了！
在一次谢谢了！

看到你的问题临时用VB.NET做的可能会有不对有些code也可以再精简自己再检察一下吧
DimstrAAsString
DimstrBAsString
Dimdec1stNumberAsDecimal
Dimdec2ndNumberAsDecimal
DimdecResultAsDecimal
DimstrOprationAsString

PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
strB="0"
lbl1.Text=strB
strA=lbl1.Text
EndSub

PrivateSubbtn1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)Handlesbtn1.Click
IfstrB="0"Then
strB=btn1.Text
Else
Try
strB=strA&btn1.Text
Catch
EndTry
EndIf
lbl1.Text=strB
strA=lbl1.Text
EndSub

PrivateSubbtn2_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)Handlesbtn2.Click
IfstrB="0"Then
strB=btn2.Text
Else
Try
strB=strA&btn2.Text
Catch
EndTry
EndIf
lbl1.Text=strB
strA=lbl1.Text
EndSub

............."以此类推做0-9"

Priv