'Declaration
Public Overloads Shared Function SerializeFontValue( _
ByVal As Object, _
ByVal As XmlTextWriter, _
ByVal As Boolean _
) As Boolean
'使用法
Dim o As Object
Dim w As XmlTextWriter
Dim shortXmlName As Boolean
Dim value As Boolean
value = Serializer.SerializeFontValue(o, w, shortXmlName)