葉嘉宇

葉嘉宇2021年1月期末考 現值 利率 期數 金流 終值

https://mail.google.com/mail/u/0?ui=2&ik=aba25ebccb&attid=0.1&permmsgid=msg-f:1685391198554189850&th=1763b65d9164701a&view=fimg&sz=s0-l75-ft&attbid=ANGjdJ-qb9bsWtLsOL1p83qGwTFu390QGPeMTrluVVb8VznIMgZECT466tc4QU5PjoARonQYy924RAShJLJ4AEwbqjKWOW3xIw-_hOB3CMJBBz3pgj3g0B2asvQYc9U&disp=emb&realattid=ii_kie1fay80https://mail.google.com/mail/u/0?ui=2&ik=aba25ebccb&attid=0.2&permmsgid=msg-f:1685391198554189850&th=1763b65d9164701a&view=fimg&sz=s0-l75-ft&attbid=ANGjdJ99ldMlXwa9v0QOzhRkDiv2zJERqLt5aZdS-nCSElil01TPGphrqOey6tSPybTnHgwcxJpHRkA2nb15IO0j3UYptQ1hGGRGwa9Zm89uf-Qe33tPOm8a4qLu10k&disp=emb&realattid=ii_kie1faye1 Dim n As Integer Dim spec As String Const period As Integer = 4 Const maxerror As Double = 0.0000001 Dim payment(period) As Double '廣域變數 4 維度的陣列 Private Sub CommandButton1_Click()   Dim a, b, c, f, gap As Double   Dim loopNumber As Integer   n = n + 1 '第幾次計算+1   a = 0     '報酬率0...