can anyone translate this to VB.NET...

private void DataGrid1_ItemCreated(object sender, System.Web.UI.WebControls.DataGridItemEventArgs e)
{
switch(e.Item.ItemType)
{
case ListItemType.Item:
case ListItemType.AlternatingItem:
case ListItemType.EditItem:
case ListItemType.SelectedItem:
WebControl c = (WebControl)(e.Item.Cells[2].Controls[0]);
c.PreRender += new EventHandler(this.DataGridDeleteButton_PreRender);
c.Attributes["itemId"] = ((DataRowView)(e.Item.DataItem))["CategoryID"].ToString()! ;
break;
}
}

private void DataGridDeleteButton_PreRender(object sender, System.EventArgs e)
{
WebControl c = (WebControl)sender;
c.Attributes["onclick"] = String.Format("ConfirmDelete('{0}',this.itemId);",c.UniqueID);
}