“过程声明与同名事件或过程的描述不匹配”该怎么解决啊??看了半天的帮助文档还是搞不懂啊!请高手指点!谢谢!!

解决方案 »

  1.   

    是一个计算器的部分程序代码,望高手指教!' 小数点 (.) 按钮的 Click 事件过程
    ' 如果上一次按键为运算符,初始化 readout 为 "0.";
    ' 否则显示时追加一个小数点。
    Private Sub Decimal_Click()
        If LastInput = "NEG" Then
            Readout = Format(0, "-0.")
        ElseIf LastInput <> "NUMS" Then
            Readout = Format(0, "0.")
        End If
          DecimalFlag = True
          LastInput = "NUMS"
    End Sub