Public Delegate Sub ExpandEventHandler( _
   ByVal sender As Object, _
   ByVal e As ExpandEventArgs _
) 

Dim instance As New ExpandEventHandler(AddressOf HandlerMethod)

public delegate void ExpandEventHandler( 
   object sender,
   ExpandEventArgs e
)

fpSpread1.Expand += new FarPoint.Win.Spread.ExpandEventHandler(fpSpread1Expand);

private void fpSpread1Expand(object sender, FarPoint.Win.Spread.ExpandEventArgs e)
{

}

Dim eh As FarPoint.Win.Spread.ExpandEventHandler = AddressOf FpSpread1Expand
AddHandler FpSpread1.Expand, eh

Private Sub FpSpread1Expand(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.ExpandEventArgs) Handles FpSpread1.Expand

End Sub