24h購物| | PChome| 登入
2007-11-08 00:24:03| 人氣133| 回應3 | 上一篇 | 下一篇

(VB)迴圈

推薦 0 收藏 0 轉貼0 訂閱站台






Dim i As Integer
Dim sum As Integer = 0
Console.Write("計算 1+2+...+100=")
For i = 1 To 100 step 1
sum = sum + i
Next
Console.WriteLine(sum)
Console.ReadKey()








Dim i, n As Integer
Dim sum As Integer = 0
Console.Write("請輸入一個數字:")
n = Console.ReadLine
Console.Write("計算 1+2+...+" & n & "=")

For i = 1 To n step 1
sum = sum + i
Next
Console.WriteLine(sum)
Console.ReadKey()









Dim i, j As Integer
Dim star As String = ""
For i = 1 To 5
For j = 1 To i
star = star & "*"
Next
star = star & vbCrLf
Next
Console.WriteLine(star)
Console.ReadLine()













我要檢舉
台長： 孩子氣☻
人氣(133) | 回應(3)| 推薦 (0)| 收藏 (0)| 轉寄
全站分類: 不分類

我要回應
超級毛
這...
這是ㄕㄚ ㄏㄨㄟˇ...
2007-11-08 01:08:06
版主回應
程式語言
2007-11-11 16:11:51
阿空,, 是我**
大姐‵ 妳上程式設計上到報台唷 =口=


衛冕妳也太認真了吧‵


拜託 = =&quot 我也資訊科的欸 =__= 看到那個嚇到我`
2007-11-08 18:49:43
版主回應
哈哈

這東西很煩
2007-11-11 16:12:07
☆明★
這東西我會耶~
VB~
函數等等..的麻~一堆都英文啦!
怎個有複雜到!
真~假 TXX FXX
2007-11-11 21:06:12
否 是 (若未登入"個人新聞台帳號"則看不到回覆唷!)
* 請輸入識別碼：
請輸入圖片中算式的結果(可能為0) 
(有*為必填)
TOP
詳全文