[VBA ] 非陳述性結尾

[markbaseball (Mark)]

各位大大們，請問beta這行出現錯誤非陳述性結尾，但是我抓不出錯誤。
請各位幫忙除錯 謝謝

Sub ROA()
Dim f(v) As Double
Dim A As Integer
Dim v1 As Double
Dim v As Double
Dim beta As Double
Dim f(v) As Double
Dim apsi As Double
Dim eta As Double
Dim sigma As Double
Dim r As Double
Dim psib As Double
Dim theta As Double
A = 0.5
f(v) = (apsiv1 - A) * (v / v1) ^ beta
beta=0.5-eta/sigma^2+((eta/sigma^2-0.5)^2+2r/sigma^2)^0.5
apsi = psib - 1
psib = (beta * theta + beta + theta) / 2 * beta - 1

v1 = (beta / beta - 1) * (1 / apsi) * A

End Sub

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 163.22.18.73
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1445396395.A.B99.html
推 johnpage: 刪掉 f(v) = (apsiv1 - A) * (v / v1) ^ beta
推 manforwan: 換行？
推 johnpage: 語法錯誤
→ DVaicky: 2r → 2*r