Public df As StdDataFormat
Set df = New StdDataFormat
df.Format = "###,###,##0.00"
grd.Columns(5).Alignment = dbgRight
Set grd.Columns(5).DataFormat = df
Public df As StdDataFormat
Set df = New StdDataFormat
df.Format = "###,###,##0.00"
grd.Columns(5).Alignment = dbgRight
Set grd.Columns(5).DataFormat = df
Dim df As StdDataFormat
With DataGrid1
.Columns(0).Caption = "日期"
Set df = New StdDataFormat
df.Type = fmtCustom
df.Format = "yyyy/MM/dd"
Set .Columns(0).DataFormat = df
Set df = Nothing
End With
Dim df As StdDataFormat
With DataGrid1
.Columns(0).Caption = "日期"
Set df = New StdDataFormat
df.Type = fmtCustom
df.Format = "yyyy/MM/dd"
Set .Columns(0).DataFormat = df
Set df = Nothing
End With
Dim df As StdDataFormat
With DataGrid1
.Columns(0).Caption = "日期"
Set df = New StdDataFormat
df.Type = fmtCustom
df.Format = "yyyy/MM/dd"
Set .Columns(0).DataFormat = df
Set df = Nothing
End With