'Declaration
Public Sub SetParseFormat( _
ByVal As Integer, _
ByVal column As Integer, _
ByVal As String, _
ByVal As IFormatProvider _
)
'使用法
Dim instance As GeneralCellType
Dim row As Integer
Dim column As Integer
Dim formatString As String
Dim info As IFormatProvider
instance.SetParseFormat(row, column, formatString, info)