看板 Visual_Basic 關於我們 聯絡資訊
※ 引述《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