[問題] 請問一個副程式呼叫的問題

看板Programming作者 (Memory)時間14年前 (2009/09/05 12:34), 編輯推噓1(1012)
留言13則, 2人參與, 最新討論串1/1
我要寫一個求因數的函式,該函式傳回值為該整數的所有因數 然後在程式中呼叫此函式,則可以顯示所有該數的因數 我用VB語法寫的 以下這邊是副程式 <script language="vb" runat="server"> Function count(ByVal n As Integer) As Integer Dim i As Integer Dim k As String For i = 1 To 100 If n Mod i = 0 Then Response.Write(i & ".") End If Next End Function </script> 主程式呼叫 <% count(100) %> 這樣印出來的結果為 1. 2. 4. 5. ......100 請問我想要把response.write 寫在主程式呼叫 印出來的結果為 100的因數為1. 2. 4. 5. ........100 請問要怎麼寫 或者有其他的寫法 可以出現一樣的結果 感謝 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 122.117.117.58

09/05 13:01, , 1F
function回傳一個結果字串如何?
09/05 13:01, 1F

09/05 13:02, , 2F
主程式用一個變數接字串,由主程式印
09/05 13:02, 2F

09/05 13:03, , 3F
話說妳的Function根本沒有回傳嘛...
09/05 13:03, 3F

09/05 14:50, , 4F
對耶 提示說傳回值用字串 請問該怎麼寫
09/05 14:50, 4F

09/05 15:06, , 5F
首先呢,As Integer改成As String
09/05 15:06, 5F

09/05 15:06, , 6F
function後面的As xxx表示回傳xxx
09/05 15:06, 6F

09/05 15:07, , 7F
再來,宣告一個string,每次的輸出改成
09/05 15:07, 7F

09/05 15:08, , 8F
接在該串後面(不知ASP有無stringbuilder)
09/05 15:08, 8F

09/05 15:08, , 9F
最後離開程式前,用return xxx 或是
09/05 15:08, 9F

09/05 15:08, , 10F
count = xxx就可以回傳結果了
09/05 15:08, 10F

09/05 15:08, , 11F
感覺好基本,這些妳應該會吧?
09/05 15:08, 11F

09/05 15:09, , 12F
主程式拿到字串再看妳要怎麼輸出
09/05 15:09, 12F

09/05 15:33, , 13F
了解 非常感謝
09/05 15:33, 13F
文章代碼(AID): #1AeUfo_l (Programming)