此主题相关图片如下：12.jpg

此主题相关图片如下：11.jpg

发布前项目窗口运行正常，发布后的项目打开窗口会报错，其中的TimerTick代码：
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each nd As WinForm.TreeNode In trv.AllNodes
    Select Case nd.Level
        Case  0   \'组节点
            nd.Ic
        Case  1   \'用户名节点
            Dim name As String = nd.parentNode.name & "." & nd.Name
            If name <> user.group & "." & user.Name Then
                Dim bd As QQBuddy = QQClient.Buddies(name)
                If bd.Online Then
                    nd.Ic
                Else
                    nd.Ic
                End If
            Else
                nd.Ic
            End If
    End Select
Next

弹出各个值看看

Case  1   \'用户名节点
    Dim name As String = nd.parentNode.name & "." & nd.Name
    If name <> user.group & "." & user.Name Then
msgbox(name)
msgbox(QQClient.Buddies.Contains(name))
        Dim bd As QQBuddy = QQClient.Buddies(name)

弹出的全部是第一个子节点。

不要在timertick事件里测试。单独做一个按钮，输入代码，点击测试。

Case  1   \'用户名节点
    Dim name As String = nd.parentNode.name & "." & nd.Name
    If name <> user.group & "." & user.Name Then
msgbox(name)
msgbox(QQClient.Buddies.Contains(name))
        Dim bd As QQBuddy = QQClient.Buddies(name)

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=110958&authorid=0&page=0&star=2