我的计算器.docVIP

  • 1
  • 0
  • 约7.95千字
  • 约 8页
  • 2018-02-24 发布于河南
  • 举报
我的计算器

你编程的思路非常混乱,简直不知道你的程序在干什么。要进行计算,你必须先使用Val函数将字符型的Text属性转换为数字型,否则你进行“+”运算只能是字符串加法而不是你想要的数学运算。 ????下面是葡萄提供的一个例子: ????1、建立14个按钮,按钮的名字都要Command1,设置Index属性,0~9分别对应数字0~9,10为小数点,11为等号,12~14分别对应+、-、*和/。 ????2、输入如下代码: ????Dim Num1, Num2 As Single ????Dim StrNum1, StrNum2 As String ????Dim FirstNum As Boolean ????Dim PointFlag As Boolean ????Dim Runsign As Integer ????Dim SignFlag As Boolean ????Private Sub Command1_Click(Index As Integer) ????Select Case Index ???? Case 0 To 9 ???? If FirstNum Then ???? StrNum1 = Str(Index) ???? FirstNum = False ???? Else ???? StrNum1 = LTrim(StrNum1) +

文档评论(0)

1亿VIP精品文档

相关文档