undefined

In the following VB.NET code there exists a set of syntax errors. Rewrite the code after you correct all of them. ( )

SUB Number_to_Text (ByValue number AS Integer) ' AS String

Dim textValue = Str(number) Dim len = textValue.Length Dim result AS String = "" For i = len; len < 1; Step -1

result &= textValue(i-1) + " And"

Next h

' Return result

END Fo