Updated VB.NET example