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
            SolValue = SolValue + (SolValue + i)
        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
→ ankolee99:自己測試 1 2 3 都對= =沒有往下測試
推 ahchi80036:感謝大大~~XD