Re: [VB6 ]一題問題
※ 引述《freeskyd (時間地雷)》之銘言:
: 我要寫出一個程式,可以算出
: 1! + 3! + ...+N!
: 我自己寫的程式碼如下
: 但是出來結果一直顯示堆疊空間不足
: 請問各位高手有哪裡出錯嗎?
: ---------------------------------------------------
: Private Sub Form_Load()
: Y = Val(InputBox("請輸入數值"))
: Call Product(Y)
: End Sub
: Sub Product(Y)
: X = F(Y)
: While Y > 0
: X = X + F(Y - 2)
當Y=1會呼叫F(-1)
我想這是主要的bug~~
至於有沒有其他的我就不知道囉~~~
: Y = Y - 2
: Wend
: Debug.Print X
: End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.48.243
推
10/03 15:58, , 1F
10/03 15:58, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):