CURRENCYFMT 構造体

Type CURRENCYFMT
        NumDigits As Long '  number of decimal digits
        LeadingZero As Long '  if leading zero in decimal fields
        Grouping As Long '  group size left of decimal
        lpDecimalSep As String              '  ptr to decimal separator string
        lpThousandSep As String             '  ptr to thousand separator string
        NegativeOrder As Long '  negative currency ordering
        PositiveOrder As Long '  positive currency ordering
        lpCurrencySymbol As String          '  ptr to currency symbol string
End Type

Structure CURRENCYFMT
        NumDigits As Integer '  number of decimal digits
        LeadingZero As Integer '  if leading zero in decimal fields
        Grouping As Integer '  group size left of decimal
        lpDecimalSep As String              '  ptr to decimal separator string
        lpThousandSep As String             '  ptr to thousand separator string
        NegativeOrder As Integer '  negative currency ordering
        PositiveOrder As Integer '  positive currency ordering
        lpCurrencySymbol As String          '  ptr to currency symbol string
End Structure