关于treenode继承的问题,在线等

yuxingliu 2007-03-10 04:26:15
我继承的myTreeNode代码,实际就是添加了两个属性
Public Class myTreeNode : Inherits System.Windows.Forms.TreeNode
Sub New()
MyBase.new()
End Sub

Private mediaUrlValue As String
Private fileUrlValue As String

Public Property mediaUrl() As String
Get
mediaUrl = mediaUrlValue
End Get
Set(ByVal value As String)
mediaUrlValue = value
End Set
End Property

Public Property flieUrl() As String
Get
flieUrl = fileUrlValue
End Get
Set(ByVal value As String)
fileUrlValue = value
End Set
End Property

End Class


下面是我的一段应用代码
Public Sub addTree(ByVal xNode As Xml.XmlNode, ByVal tNode As myTreeNode)

Dim i As Integer
Dim xtNode As Xml.XmlNode
Dim ttNode As myTreeNode

If xNode.HasChildNodes Then
For i = 0 To xNode.ChildNodes.Count - 1
xtNode = xNode.ChildNodes(i)
ttNode = New myTreeNode(xtNode.Name)

‘上面代码使用的时候,myTreeNode(xtNode.Name)总是提示"public sub new()" 参数太多

ttNode.Text = xtNode.Name
Dim trnode As myTreeNode
tNode.Nodes.Add(ttNode)

addTree(xtNode, ttNode)
Next
End If

请各位帮忙看看问题处在哪呢?
...全文
78 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧