Language Basics VisualBasic Script

Sub PrintNumbers() 
       Dim num As Integer 
       num = 0 
       Do 
           num = num + 1 
           Debug.Print num 
       Loop Until num = 27 
   End Sub