Правильная программа

Восстанови программный код

  
вставь нужные слова вместо пропусков
   Dim      End      For      Integer      Next      Text      Then      Val   
Неудачливый программист написал программный код "Выведи делители числа", но некоторые слова в ней были неправильно закодированы и поэтому не отобразились в тексте программы. Помоги бедолаге восстановить текст!
N, i As
N = (TextBox1.Text)
Label1.=""
i = 1 To N
If N Mod i = 0
Label1.Text = Label1.Text & Val(i) & ","
If
i
Hosted by uCoz