1:如何判断TreeView中任一个Node是否有父节点?
2:如何在某个Text中输入完毕后,按Enter后相当于按了某个Command(并不影响其他Text输入完毕后按Enter没有任何操作)

解决方案 »

  1.   

    Private Sub Command1_Click()
        If TreeView1.SelectedItem.Parent Is Nothing Then
            MsgBox "没有父结点!", vbInformation
        Else
            MsgBox "有父结点!", vbInformation
        End If
    End Sub
      

  2.   

    Private Sub Text1_KeyPress(KeyAscii As Integer)
        If KeyAscii = 13 Then
            Command1.Value = True '相当于按Command1按钮
        End If
    End Sub
      

  3.   

    Private Sub Text1_KeyPress(KeyAscii As Integer)
        If KeyAscii = 13 Then
            call Command1_click'相当于按Command1按钮
        End If
    End Sub
      

  4.   

    KEYASCII = 13等于按了回车键(回车的ASCII码为13)
    然后调用按钮的点击事件,Command1.Value = True(相当于按Command1按钮)
    哪不明白啊~~