Imports System
Public Module Module1
Public Sub Main()
'PSEUDOCODE
'
'WHILE number =< 50
'DO OUTPUT "value of the number"
'ENDWHILE
dim number as integer = 0
while number <= 50
console.writeline("value of the number: " & number)
number += 1
End while
End Sub
End Module