哪位VB大神幫我看看這道題吧（我不知道哪里出錯了）只要輸入大一點的數就會出錯
uj5u.com熱心網友回復：
幫我看看吧(??﹏??)uj5u.com熱心網友回復：
寫好了,你看看對不對:
Public Class Form1
Function GetSum(ByVal n As Long)
Dim dblA As Double = 2
Dim dblB As Double = 1
Dim dblSum As Double = 0
For i As Long = 1 To n
dblSum += dblA / dblB
dblA = dblA + dblB
dblB = dblA - dblB
Next
Return dblSum
End Function
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
MsgBox(GetSum(TextBox1.Text))
End Sub
End Class
下載地址:
鏈接：https://pan.baidu.com/s/1DhdtKJFGG3C6pSnOufpuDQ
提取碼：tec0
運行示例:
uj5u.com熱心網友回復：
也就是說我只要把之前的Fa和Fb定義為Double就可以了，請問是這個意思嗎？uj5u.com熱心網友回復：
你試試就知道了;轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/13509.html
標籤：VB基礎類