Board logo

標題: [發問] 輸出資料換行 [打印本頁]

作者: edchen70    時間: 2015-7-6 15:55     標題: 輸出資料換行

下列是主控台應用程式,當我執行輸入數值為5時,顯示如圖1,當我執行輸入數值為10時,顯示如圖2,請問各位圖2的輸出如何像圖1一樣?程式碼紅色字部份要如何改呢?
Module Module1

    Sub Main()
        Dim sum, i, n As Integer
        Console.WriteLine("=求到100可以被n整除的整數=")
        Console.WriteLine()
        Console.Write("請輸入1到100的整數n:")
        n = CInt(Console.ReadLine())
        If n >= 1 And n <= 100 Then
            Do While sum + n <= 100
                sum += n
                Console.Write("{0},", sum)
                i += 1

                If i Mod n = 0 Then
                    Console.WriteLine()
                End If
            Loop
            Console.WriteLine()
        End If

        Console.ReadKey()
    End Sub

End Module




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)