xml - textreader オブジェクトとデータセット オブジェクトを使用して 2 つの xml ドキュメントをマージできません

Question

何が間違っているのかわかりません。これはエラーです：'column' argument cannot be null. Parameter name: column

この XML ドキュメントを追加したい:

<?xml version="1.0" encoding="UTF-8"?>
<products>
    <product>
        <Name><![CDATA[G5]]></Name>
        <Type><![CDATA[44214]]></Type>
    </product>
    <product>
        <Name><![CDATA[G8]]></Name>
        <Type><![CDATA[44]]></Type>
    </product>
</products>

これに：

<?xml version="1.0" encoding="UTF-8"?>
<products>
    <product>
        <Name><![CDATA[G5]]></Name>
        <Brand><![CDATA[Sim]]></Brand>
        <Price><![CDATA[14]]></Price>
        <Price><![CDATA[8]]></Price>
    </product>
    <product>
        <Name><![CDATA[G8]]></Name>
        <Brand><![CDATA[Sim32]]></Brand>
        <Price><![CDATA[143]]></Price>
        <Price><![CDATA[84]]></Price>
    </product>
</products>

最終的な XML は次のようになります。

<?xml version="1.0" encoding="UTF-8"?>
<products>
    <product>
        <Name><![CDATA[G5]]></Name>
        <Brand><![CDATA[Sim]]></Brand>
        <Price><![CDATA[14]]></Price>
        <Price><![CDATA[8]]></Price>
        <Type><![CDATA[44214]]></Type>
    </product>
    <product>
        <Name><![CDATA[G8]]></Name>
        <Brand><![CDATA[Sim32]]></Brand>
        <Price><![CDATA[143]]></Price>
        <Price><![CDATA[84]]></Price>
        <Type><![CDATA[44]]></Type>
    </product>
</products>

私が使用しているコードは次のとおりです。

    Dim objTextReaderOriginal As XmlTextReader = New XmlTextReader("original.xml")
    Dim objTextReaderToAppend As XmlTextReader = New XmlTextReader("to_append.xml")

    Dim dsOriginal As DataSet = New DataSet()
    Dim dsToAppend As DataSet = New DataSet()

    dsOriginal.ReadXml(objTextReaderOriginal)
    dsToAppend.ReadXml(objTextReaderToAppend)

    dsOriginal.Merge(dsToAppend)

    dsOriginal.WriteXml("complete.xml")

エラーは次の行で発生します。dsOriginal.Merge(dsToAppend)