Question

所以，我试图按照this指南从Visual Basic中的XML数据填充树视图，但它会抛出错误：

＆＃34;重载解析失败，因为没有可访问的＆＃39;项目＆＃39;可在没有缩小转换的情况下调用：＆＃39; Public Overridable ReadOnly默认属性项（键为字符串）As System.Windows.Forms.TreeNode＆＃39 ;:参数匹配参数＆＃39;键＆＃39; 来自“龙”的缩小to＆＃39; String＆＃39;。＆＃39; Public Overridable默认属性项（索引为整数）As System.Windows.Forms.TreeNode＆＃39 ;:参数匹配参数＆＃39; index＆＃39; 来自“龙”的缩小到＆＃39;整数＆＃39;。＆＃34;

经过一番搜索，我被告知将Option Strict设置为＆＃34; Off＆＃34;会解决错误，但它没有做到这一点。有没有人有这个错误的解决方案？

以下是相关代码：

 If inXmlNode.HasChildNodes() Then
     nodeList = inXmlNode.ChildNodes
     For i = 0 To nodeList.Count - 1
        xNode = inXmlNode.ChildNodes(i)
        inTreeNode.Nodes.Add(New TreeNode(xNode.Name))
        tNode = inTreeNode.Nodes(i)
        AddNode(xNode, tNode) //The code that throws the error.
     Next
  Else
     ' Here you need to pull the data from the XmlNode based on the
     ' type of node, whether attribute values are required, and so forth.
     inTreeNode.Text = (inXmlNode.OuterXml).Trim
  End If

Answer 1

将i定义为整数而不是长整数。它应该匹配过载。

 Private Sub AddNode(ByRef inXmlNode As XmlNode, ByRef inTreeNode As TreeNode)
      Dim xNode As XmlNode
      Dim tNode As TreeNode
      Dim nodeList As XmlNodeList
      Dim i As Integer


    If inXmlNode.HasChildNodes() Then
         nodeList = inXmlNode.ChildNodes
         For i = 0 To nodeList.Count - 1
            xNode = inXmlNode.ChildNodes(i)
            inTreeNode.Nodes.Add(New TreeNode(xNode.Name))
            tNode = inTreeNode.Nodes(i)
            AddNode(xNode, tNode) //The code that throws the error.
         Next
      Else
         ' Here you need to pull the data from the XmlNode based on the
         ' type of node, whether attribute values are required, and so forth.
         inTreeNode.Text = (inXmlNode.OuterXml).Trim
      End If

重载决议失败，因为没有可访问的项目＆＃39;可以在没有缩小转换的情况下调用

1 个答案: