※ 引述《karta2506968 (天冷心更冷)》之銘言：
: 請輸入專案類型(網站專案或者應用程式專案)：vb2005
: 我剛學vb沒多久，
: 老師要我寫1^1+2^2+.....+n^n的程式
: 而且要用到sub和Function來寫出副程式
: 請各位大大告訴我思路
: 並交我該如何把程式寫出來
: 謝謝
很抱歉無法直接告訴你答案..會害了你..
不過不知道這樣寫老師會怎樣...
Text1.Text = nn(1, 10)
Function nn(m, n)
If (n > 1) Then
nn = nn(m + 1, n - 1)
Else
nn = ""
Sum = 0
For i = n To m
If (i = m) Then
mchar = "="
Else
mchar = "+"
End If
nn = nn & i & "^" & i & mchar
Sum = Sum + i ^ i
Next i
nn = nn & Sum
End If
End Function
...有遞迴..有Function..@@
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 125.233.95.121