The code of VB.NET