add VB.NET sample