Option ExplicitDim blnStratrOperationFlag As Boolean '是否开始运算Dim lngOperationFlag As Long
'运算标志Dim dblFirstOperationValue As Double
'先前的操作数Private Sub cmdValuedDecimal_Click(Index As Integer) '数字及小数点
Select Case Index
Case 0
AddTextOperationValue "0"
Case 1
AddT...