請問各位先進，這是我來測驗for迴圈的一個小程式
條件就是只要輸入任意數字(小於100)，就從輸入數字開始加到100的總和
但我怎麼輸入其他數字結果總和都是101
我的邏輯概念不好，請各位指導一'二。。謝謝
Sub Main()
Dim i As Integer '輸入值
Dim z As Integer '總和
Console.Write("請輸入起始值:")
i = Console.ReadLine()
For i = i To 100 Step 1
z = i + 1
Next
Console.WriteLine("總和=" & z) '結果
Console.Read()
End Sub
條件就是只要輸入任意數字(小於100)，就從輸入數字開始加到100的總和
但我怎麼輸入其他數字結果總和都是101
我的邏輯概念不好，請各位指導一'二。。謝謝
Sub Main()
Dim i As Integer '輸入值
Dim z As Integer '總和
Console.Write("請輸入起始值:")
i = Console.ReadLine()
For i = i To 100 Step 1
z = i + 1
Next
Console.WriteLine("總和=" & z) '結果
Console.Read()
End Sub