language: VB.NET (mono-2.4.2.3)
date: 793 days 0 hours ago
link:
visibility: private 
1
2
3
4
5
6
7
8
9

Module MyModule
    Sub Main()
        While Me.HaveTime
            Me.Read(NexDoNetsBlog)
            Me.Append(New Skill())
            Me.Satisfaction += 1
        End While
    End Sub
End Module