Loop

Hi! I have simple Do...Loop while program to print from 0 to 20. Let's have a look:

Private Sub Command1_Click()

Dim num As Integer
num = 0
Do
Print num
num = num + 1
Loop While num <= 10

End Sub

This program ouput 1 to 18 but after 18 numbers get disappear. How to restore those numbers? Thanks!