When you do the column names set the allow custom data to true.
Then add following function
Private Sub grdCredit_OnSetCustomItemData(ByVal bstrColName As String, ByVal bstrFieldName As String, pvBookMark As Variant, bstrData As String, pAccpacDSFields As Object)
bstrData = Format(pAccpacDSFields.Item("TRANSAMT").Value, "###,###,###,##0.00")
End Sub
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.