Format DataGridView Columns using script

Lennie · February 16th, 2010, 04:27 PM

Hi Guys,

I am was from VbNet2003 and new to VbNet2008. I am having problem trying to write script to format DataGridView columns like the way I did on VbNet2003.

Here is the sample of script that I used in VB.NET 2003. Does VB.NET 2008 works the same way ?

Code:

Private Function FFormatCustomerDataGridColumn()
    'format DataGrid Column
    Dim dgStyle As New DataGridTableStyle
    dgStyle.MappingName = "ordTbl"

    '----------------------------------------------
    'customerID
    Dim CustIDCol As New DataGridTextBoxColumn
    With CustIDCol
	.MappingName = "CustomerID"
	.HeaderText = "Customer ID"
	.Alignment = HorizontalAlignment.Center
	.Width = 100
	dgStyle.GridColumnStyles.Add(CustIDCol)
     End With

    '-------------------------------------------------
    ' Customer Name
     Dim CustNameCol As New DataGridTextBoxColumn
     With CustNameCol
	.MappingName = "CompanyName"
 	.HeaderText = "Customer Name"
	.Alignment = HorizontalAlignment.Left
	.Width = 250
	dgStyle.GridColumnStyles.Add(CustNameCol)
     End With

    ' ----------------------------------------------------
    'Add Table Style to datagrid -clear before formatting
	DataGrid1.TableStyles.Clear()
	dgStyle.ForeColor = Color.Black
	DataGrid1.TableStyles.Add(dgStyle)
	DataGrid1.ReadOnly = True
	DataGrid1.CaptionText = "Customer Listing Click on Line Item to    display Order Listing"

End Function

Please help me, I need your help.
Thank You