請幫忙解釋VB程式的內容

Question

請問大家我有一個vb程式
老師要求我們要解釋其程式的意義
例如 dim i as integer
就是宣告i為整數的意思
(應該是這意思，我是聽朋友講的)
(請問真的是這樣嗎？)

其程式為下
Dim i, int1 As Integer

int1 = CInt(TextBox1.Text)

For i = 1 To int1 Step +1


If (int1 Mod i = 0) Then

TextBox2.Text &= i & ","

End If
Next i

End Sub

清除鍵:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

TextBox2.Text = " "
End Sub
End Class


麻煩大家囉@@
在此先謝過^^
小弟不勝感激^^

抱歉~~~
還有下面這個程式也需要解釋
麻煩大家@@


...................................

說我的字太多>0<

只好po上網址了

http://tw.knowledge.yahoo.com/question/question?qid=1506122300901

非常抱歉>"<
麻煩大家囉>"<

Answer 1

這個程式很簡單，建議你參考教科書的內容，說得會更詳細，下面的註解供你參考。
Dim i, int1 As Integer '宣告i,int1為整數變數
int1 = CInt(TextBox1.Text) '將text1的文字轉為整數
For i = 1 To int1 Step +1 '迴圈1到int1,每次遞增1
If (int1 Mod i = 0) Then '判斷int1除以i是否整除(餘數為0代表整除)
TextBox2.Text &= i & "," '如果整除，則將i的值添增 於text2內
End If
Next i '下一個i
End Sub

清除鍵:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

TextBox2.Text = " " '當你按下按鈕,則清除text2的內容。
End Sub

Answer 2

int1 = CInt(TextBox1.Text)
Cint 是將 Textbox1.Text的"數值"，小數第一位4捨6入，傳回integer資料型別。
如果Textbox1.Text內包含不屬於數字在裡面，就會出錯。

如果改成int1 = Val(TextBox1.Text) 會比較好
Val 是將具有字串型別的數字(文數字)轉換成數值型別。
例如 n = Val("2457") 'n=2457
n= Val("24 and 57") 'n=24 若有字串只取前面部分的數字

其它行的註解，另一位大大都說明了。