关于xmlnode的clone问题出现了"未将对象的引用设置到对象的实例"错误.请各位帮帮忙!!

Question

关于xmlnode的代码如下: Dim node As XmlNode
        node = xmlNode
        'node = xmlNode.clone  有问题
        node.Item("ItemNumber").InnerText = ProperData.ItemNumbers
        node.Item("Point").Item("PointRow").InnerText = ProperData.Points.Row
        node.Item("Point").Item("PointColumn").InnerText = ProperData.Points.Column
        node.Item("FirstRead").InnerText = ProperData.FirstReads
        node.Item("iInsert").InnerText = ProperData.iInserts
        node.Item("Myinsert").InnerText = ProperData.Myinserts
        node.Item("MyItemsArrary").InnerText = ProperData.MyItemsArrarys
        node.Item("nEmptyRow").InnerText = ProperData.nEmptyRows
        node.Item("noPosInsert").InnerText = ProperData.noPosInserts
        node.Item("ReadAcrive").InnerText = ProperData.ReadAcrives
        node.Item("ReadTable").InnerText = ProperData.ReadTables
        node.Item("RowNum").InnerText = ProperData.RowNums
        node.Item("stContent").InnerText = ProperData.stContents
        node.Item("stInsertArrary").InnerText = ProperData.stInsertArrarys
        node.Item("stOrderSQL").InnerText = ProperData.stOrderSQLs
        node.Item("strSQL").InnerText = ProperData.strSQLs
        node.Item("stRule").Item("Change").InnerText = ProperData.Rule.Changes
        node.Item("stRule").Item("Direction").InnerText = ProperData.Rule.Directions
        node.Item("stRule").Item("NextPos").InnerText = ProperData.Rule.fNextPos
        node.Item("stRule").Item("starPos").Item("PosRow").InnerText = ProperData.Rule.fPos.Row
        node.Item("stRule").Item("starPos").Item("PosColumn").InnerText = ProperData.Rule.fPos.Column
        node.Item("stRule").Item("starPos").Item("PosContent").InnerText = ProperData.Rule.fPos.Contents
        node.Item("stRule").Item("Num").InnerText = ProperData.Rule.Nums
        node.Item("stRule").Item("Sign").InnerText = ProperData.Rule.Signs
        node.Item("stRule").Item("strRule").InnerText = ProperData.Rule.strRules
        '给stUnite结构赋值
        node.Item("stUnite").Item("Point").Item("PointColumn").InnerText = ProperData.stUnites.fStarPos.Column
        node.Item("stUnite").Item("Point").Item("PointRow").InnerText = ProperData.stUnites.fStarPos.Row
        node.Item("stUnite").Item("Point").Item("PointContent").InnerText = ProperData.stUnites.fStarPos.Contents
        node.Item("stUnite").Item("ColumnNum").InnerText = ProperData.stUnites.ColumnNums
        node.Item("stUnite").Item("RowNum").InnerText = ProperData.stUnites.RowNums
        node.Item("stUnite").Item("UniteRule").InnerText = ProperData.stUnites.UniteRules        'node.Item("stUnite").InnerText = ProperData.stUnites
        node.Item("UniteCell").InnerText = ProperData.UniteCells

Answer 1

主要是你的xmlNode怎么来得， 给node的代码不管用。你那个异常明显是xmlNode=null所致的。

Answer 2

node = xmlNode；//这个什么东西来的。xmlNode是类，还是什么其他的东西！！！

Answer 3

xmlnode不是null因为我可以看到值

Answer 4

Dim node As XmlNode
node = xmlNode
Console.WriteLine(xmlNode.OuterXml)
node = xmlNode.Clone()
Console.WriteLine(node.OuterXml)如果xmlNode有值，应该没有问题