I have a datagrid that I define in code. The code looks like this:
'For colums in dgdDonHist
Dim colDonHistAcctNum As Column
Dim colDonYear As Column
Dim colDonAmt As Column
Dim colDonPostDate As Column
'Sets data source for dgdDonHist
Set dgdDonHist.DataSource = rsDonHist
'Sets columns to dgdSubHist's columns
Set colDonHistAcctNum = dgdDonHist.Columns(0)
Set colDonYear = dgdDonHist.Columns(1)
Set colDonAmt = dgdDonHist.Columns(2)
Set colDonPostDate = dgdDonHist.Columns(3)
'Changes captions
colDonYear.Caption = "Year"
colDonAmt.Caption = "Amount"
colDonPostDate.Caption = "Post Date"
'Changes column widths
colDonYear.Width = 705
colDonAmt.Width = 1200
colDonPostDate.Width = 1005
I want to format the colDonAmt column (Columns(2)) to display a currecy value. Does anyone know how I can accomplish this?
Thank you in advance for any advice.
Timoteo
'For colums in dgdDonHist
Dim colDonHistAcctNum As Column
Dim colDonYear As Column
Dim colDonAmt As Column
Dim colDonPostDate As Column
'Sets data source for dgdDonHist
Set dgdDonHist.DataSource = rsDonHist
'Sets columns to dgdSubHist's columns
Set colDonHistAcctNum = dgdDonHist.Columns(0)
Set colDonYear = dgdDonHist.Columns(1)
Set colDonAmt = dgdDonHist.Columns(2)
Set colDonPostDate = dgdDonHist.Columns(3)
'Changes captions
colDonYear.Caption = "Year"
colDonAmt.Caption = "Amount"
colDonPostDate.Caption = "Post Date"
'Changes column widths
colDonYear.Width = 705
colDonAmt.Width = 1200
colDonPostDate.Width = 1005
I want to format the colDonAmt column (Columns(2)) to display a currecy value. Does anyone know how I can accomplish this?
Thank you in advance for any advice.
Timoteo