Re: [.NET] 再問一題

看板Visual_Basic作者 (黃小米)時間18年前 (2008/01/15 17:42), 編輯推噓1(101)
留言2則, 2人參與, 最新討論串2/3 (看更多)
※ 引述《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

01/15 17:48, , 1F
自己測試 1 2 3 都對= =沒有往下測試
01/15 17:48, 1F

01/15 17:54, , 2F
感謝大大~~XD
01/15 17:54, 2F
文章代碼(AID): #17Z80VgM (Visual_Basic)
文章代碼(AID): #17Z80VgM (Visual_Basic)