上一篇：考試
下一篇：網頁
Private Sub Command1_Click() Sum = 0 For a = 1 To 10 Step 1 Sum = Sum + a Next a Print Sum End Sub Private Sub Command2_Click() Sum = 0 b = 0 While b <= 10 Sum = Sum + b b = b + 1 Wend Print Sum End Sub
省到累積：Bal b/f TW$17,155+早餐TW$160+午餐+TW$160+晚餐TW$160+當天不買超過三餐吃喝TW$160+不買茶啡TW$160=TW$17,155 Bal c
形同陌路擦肩過， 沒打招呼為什麼， 之前相比差很多， 彷彿好像在躲我， 勉強苦笑裝灑脫， 其實內心好落寞。
主啊！求祢使詐團，尤其是福建老闆「五哥」被仇恨矇蔽，引致失常，沒法信祢，最後永死，以上禱告奉主耶穌基督聖名，阿們
聖誕禮物是沒強求
https://tw.news.yahoo.com/%E8%A9%90%E5%9C%98%E5%97%86%E8%81%B2%E4%BA%86-20%E6%AD%B2%E6%AD%A3%E5%A6%B9-%E7%96%91%E8%A2%AB%E6%
Private Sub Command1_Click()
Sum = 0
For a = 1 To 10 Step 1
Sum = Sum + a
Next a
Print Sum
End Sub
Private Sub Command2_Click()
Sum = 0
b = 0
While b <= 10
Sum = Sum + b
b = b + 1
Wend
Print Sum
End Sub