or
<telerik:RadGrid ID="RadGrid1" runat="server" AllowPaging="True" AllowSorting="false" DataSourceID="SqlDataSource1" ShowGroupPanel="True" Font-Size="3pt" Width="950px" Height="600px"> <ExportSettings FileName="ExportToExcel"> </ExportSettings> <ClientSettings AllowColumnsReorder="false" AllowDragToGroup="True" ReorderColumnsOnClient="True"> <Scrolling AllowScroll="True" UseStaticHeaders="false" /> <Resizing AllowColumnResize="false" AllowRowResize="false" ResizeGridOnColumnResize="false" ClipCellContentOnResize="False" EnableRealTimeResize="True" AllowResizeToFit="True" /> </ClientSettings> <MasterTableView DataSourceID="SqlDataSource1"> <CommandItemSettings ShowRefreshButton="false" ShowExportToCsvButton="True" ShowExportToExcelButton="True" ShowExportToPdfButton="True" ShowExportToWordButton="True" /> <Columns> <telerik:GridHyperLinkColumn UniqueName="Link" DataNavigateUrlFields="MasterID" DataNavigateUrlFormatString="JavaScript:openwindow('{0}');" Text ="View"> </telerik:GridHyperLinkColumn> </Columns> </MasterTableView> </telerik:RadGrid>Private Sub RadGrid1_ItemDataBound(sender As Object, e As GridItemEventArgs) Handles RadGrid1.ItemDataBound If TypeOf e.Item Is GridDataItem AndAlso e.Item.ItemIndex = 0 Then Dim dataItem As GridDataItem = TryCast(e.Item, GridDataItem) For Each col As GridColumn In dataItem.OwnerTableView.RenderColumns Dim numCol As GridNumericColumn = TryCast(col, GridNumericColumn) If numCol IsNot Nothing Then numCol.DataFormatString = "{0:C2}" numCol.ItemStyle.HorizontalAlign = HorizontalAlign.Right End If Next End IfEnd Sub






