vb2010中WPF动态添加控件后，响应事件为何没有反应，有代码，求助～～

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles Button1.Click

        Dim Thumb1 As New Thumb

        Thumb1.Name = "Thumb11"

        Thumb1.Margin = New Thickness(100, 100, 0, 0)

        Thumb1.Width = 145

        Thumb1.Height = 68

        Dim ct As New Windows.Media.SolidColorBrush(Windows.Media.Color.FromArgb(120, 0, 120, 255))

        Thumb1.Background = ct

        Thumb1.Opacity = 0.5

        Canvas1.Children.Add(Thumb1)

        AddHandler Thumb1.DragDelta, AddressOf Thumb_DragDelta

    End Sub

    Private Sub Thumb_DragDelta(ByVal sender As System.Object, ByVal e As System.Windows.Controls.Primitives.DragDeltaEventArgs)

        Canvas.SetLeft(sender, Canvas.GetLeft(sender) + e.HorizontalChange)

        Canvas.SetTop(sender, Canvas.GetTop(sender) + e.VerticalChange)

    End Sub

上面是在WPF中动态添加了一个控件，这个没有问题，下面是定义一个事件，想用在winform里的方法
AddHandler , AddressOf 来响应事件，这个方法在winform中使用没有问题，可是同样方法用到这里，就不行了，完全没有响应。不知道为何，代码要怎么改？
代码也没有提示什么错误。郁闷～～～肯请高手指点～～～
wpf vb2010 wpf事件 --------------------编程问答-------------------- 确认这个事件被触发了么？ --------------------编程问答-------------------- 我确认这个事件没有被触发～～希望得到未被触发的原因。不知为何。谢谢～ --------------------编程问答-------------------- 这个可能有点歧义，我说的这个方法在winform里面没有问题不是指上述代码直接用到winform里，是之前在winform里也弄过其它动态添加控件响应事件的方法，用的是这种方式，完全没有问题。 --------------------编程问答-------------------- 又试了几个方法依然无效～～～ --------------------编程问答-------------------- 没有相应？
断点进的来吗？ --------------------编程问答-------------------- [color=#FF0000][b]dfafsasba sfns[/b][/color] --------------------编程问答-------------------- 六楼老师看不懂谢谢，我用vb做的，5楼老师刚测试断点进不来～～～
AddHandler Thumb1.DragDelta, AddressOf Thumb_DragDelta 这一句就好像一点作用都没有一样。像是被它上上下下的代码给无视存在了 --------------------编程问答-------------------- 这是为什么，求答案 --------------------编程问答-------------------- 定义控件的时候需要WithEvent --------------------编程问答-------------------- 感谢，但还是没弄明白怎么定义，能否代码明示下了。谢谢～～ --------------------编程问答-------------------- 按钮控件是不是复制过来的，看看设计窗体的代码，与按钮的控件名字是否一样 --------------------编程问答-------------------- 谢谢老师，没有复制控件，控件就是普通的，并且不是现成的控件，而是动态添加上的。上面有代码，不是自定义类的控件，就是了一般控件的动态添加。 --------------------编程问答-------------------- 如何解决，坐等速结～～～ --------------------编程问答-------------------- 有没有回复～～～拜托各位～～

补充：.NET技术 ,  VB.NET