Module Program
Sub Main(args As String())
Console.WriteLine("我在编程中国学VB.NET")
Console.WriteLine()

'练习一下循环的使用
For i As Integer = 1 To 20
Console.WriteLine("我爱编程中国 {0} 次", i)
Next

Console.Write(vbLf & vbLf & "绘制一个心形图案：")

......................