Re: [VB6 ] 計算機
※ 引述《fumizuki (小獅子)》之銘言:
: ElseIf op1 = "/" Then
: p = p - 1: GoSub SplitProc: Eval = Eval(op1) / Eval(op2): GoTo EndProc
: ElseIf op1 = "^" Then
: Else
: GoSub SplitProc: Eval = Eval(op1) + Eval("-" & op2): GoTo EndProc
^^^^^^^^^^^^^^^^^^^^^^^^^^^
發現Bug
: End If
如果2^2+3^3-4^2
依照原式:
會變成
2^2+3^3+(-4)^2=50
如果改成
Eval = Eval(op1) - Eval(op2)
則2^2+3^3-4^2=15正確
但是我擔心補這洞,破另一個洞
不知道還有沒有Bug
--
少年讀書,如隙中窺月;
中年讀書,如庭中望月;
老年讀書,如臺上玩月。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.141.159.236
討論串 (同標題文章)
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章