Re: [.NET] 再問一題
※ 引述《ankolee99 (黃小米)》之銘言：
: ※ 引述《ahchi80036 (勳a)》之銘言：
: : 請輸入專案類型(網站專案或者應用程式專案)：
: : 題目是利用副程式或函數寫一程式可輸入一數值N,得到
: : S=1+(1+2)+(1+2+3)+...+(1+2+3+...+N)
: : 感謝大大回答ORZ
: = =...這些東西應該是平常要練的!!
: 念在你要考試，所以打現成的給你!!
更正：
Private Function add(ByVal n As Integer) As Integer
Dim SolValue As Integer '累加的暫存變數
For i As Integer = 1 To n
'每次都做一次累加 1~i
Dim v As Integer = 0
For j As Integer = 1 To i
v = v + j
Next
SolValue = SolValue + v
Next
Return SolValue
End Function
: 在主程式呼叫 add(n) 就可以使用了!!(add為方法名稱可自行更改!!) i.e
: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
: TextBox2.Text = add(Integer.Parse(TextBox1.Text))
: End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.140.124.159
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 3 之 3 篇)：