Convert this C# to VB

[Dave]

Can someone tell me how to write this in VB:

void RadGrid1_ItemCreated(object sender, GridItemEventArgs e)
{
    if (e.Item is GridNestedViewItem)
    {
        (e.Item.FindControl("InnerGridId") as RadGrid).NeedDataSource += new GridNeedDataSourceEventHandler(_Default_NeedDataSource);
    }
}

I tried using the converter and got:

    Private Sub gridActivities_ItemCreated(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles gridActivities.ItemCreated
        If TypeOf e.Item Is GridNestedViewItem Then
            (TryCast(e.Item.FindControl("gridInvoices"), RadGrid)).NeedDataSource += New GridNeedDataSourceEventHandler(_Default_NeedDataSource)
        End If
    End Sub

But I get a syntax error on the first parenthesis of the try cast line.  Thanks.

Sam

[Princy]

Hello Sam,

Here's the Vb translated code for the above snippet. Hope this helps.
vb:

Sub RadGrid1_ItemCreated(sender As Object, e As GridItemEventArgs)
    If TypeOf e.Item Is GridNestedViewItem Then
        Dim grid As RadGrid = TryCast(e.Item.FindControl("InnerGridId"), RadGrid)
                AddHandler grid.NeedDataSource, AddressOf _Default_NeedDataSource
    End If
End Sub

Thanks
Princy.

[Dave]

Thank you Princy, you're a life saver.