我Loop 不出來!!!(編號：6785)

為什麼我的loop 還是跳不出來?!
我再試著做 A+B= C 直到C = 10?!
我寫的程式是這樣
Dim A as integer
Dim B as integer
Dim C as integer

Text1.text = A
Text2.text = B
Text3.text = C
Do
A + B
Loop until C = 10
Label1.caption = "Good work"
不過不知道哪裡出錯..他還是一直在loop 打轉!
我真的受夠了!!!
請幫我吧!