Imports Infragistics.Win.UltraWinTree
Private Sub ultraTree1_BeforeCheck(ByVal sender As Object, ByVal e As Infragistics.Win.UltraWinTree.BeforeCheckEventArgs) Handles ultraTree1.BeforeCheck
Dim sb As New System.Text.StringBuilder()
sb.Append("Node: ")
sb.Append(e.TreeNode.Key)
sb.Append(" check state is about to change from ")
sb.Append(e.TreeNode.CheckedState)
sb.Append(" to ")
sb.Append(e.NewValue)
Debug.WriteLine(sb.ToString())
' 注: この操作が以下のコード行によってキャンセルできます
'e.Cancel = True
End Sub