Home > Visual Basic Language > I cannot change the number format in DataGridView

I cannot change the number format in DataGridView

I have the following code. When I use:

Fori = 3ToMaxColumnDataGridView

DataGridView.Columns(i).DefaultCellStyle.NullValue = 0

DataGridView.Columns(i).DefaultCellStyle.Format ="N5"

the columns format can’t be changed. I cannot change the number format whatever I do. How can I solve this problem?

iv_ski Monday, November 30, 2009 11:40 AM

Did you try "0" for default
and
"0.00000" for format?

Success
Cor

Cor Ligthert Monday, November 30, 2009 11:48 AM

Yes, but no success.

iv_ski Monday, November 30, 2009 12:57 PM

Yes, no success.

iv_ski Monday, November 30, 2009 3:05 PM

Sorry, it was already suggested by Cor

Not sure whats going through,
Are you fetching datatable from database with integer columns which you intend to change?

Is it possible to show some more code?

Does it work when you change those formats in designtime?

Arjun Paudel

Arjun Paudel Monday, November 30, 2009 3:39 PM

OK. Here is the code:

Private Sub ChangeListViewFormat()

Dim i As Short

For i = 3 To MaxColumnListView

ListView.Columns(i).DefaultCellStyle.Format =

"0,00000"

ListView.Columns(i).DefaultCellStyle.NullValue =

"0"

End Sub

Private Sub frmSimParam_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim Row As UInt16

LoadDatamap()

For Row = 0 To ListView.RowCount - 1

ChangeListView(Row, ListView.Rows(Row).Cells(2).Value, Color.FromArgb(255, 236, 233, 216))

ChangeListViewFormat()

End Sub

LoadDatamap is fetching datatable fromASCII filewith integer columns whichI intend to change.

iv_ski Monday, November 30, 2009 4:32 PM

Following is my simple test with text file and its fine

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim connection As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=""d:\temp\"";" & _
            "Extended Properties=""text;HDR=Yes;FMT=Delimited""")

        Dim adapter As New OleDb.OleDbDataAdapter("SELECT * FROM  data.txt", connection)
        Dim dt As New DataTable
        DataGridView.DataSource = dt
        adapter.Fill(dt)
        FormatColumn()
    End Sub

    Private Sub FormatColumn()
        Dim maxcolumns = 9
        For i As Integer = 3 To maxcolumns - 1
            DataGridView.Columns(i).DefaultCellStyle.NullValue = "0"
            DataGridView.Columns(i).DefaultCellStyle.Format = "N5"
        Next
    End Sub