大神们这个类要怎么写啊?

[ZhongCool]

大神们这个自定义类关联控件,类要怎么写啊?
Form1_Load()
a = FindWindow(vbNullString, "无标题 - 记事本")
b = FindWindowEx(a, vbNullString, "Edit", vbNullString)
t1.IsHandleCreated = b
AddHandler t1.TextChanged, AddressOf Notepad_TextChanged
End Sub
Private Sub Notepad_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
TextBox1.AppendText("嘿嘿得了！" & vbCrLf)
End Sub

[zj_zwl]

t1是什么?这么屌!

[ZhongCool]

引用 1 楼 zj_zwl 的回复:

t1是什么?这么屌!

因为t1就是条指向叼所以好叼！