高手请进－VB如何接收控件上的命令按钮的消息句柄

麻烦做个测试程序，谢谢
1.新建一个工程，Form1窗体，新建一个Active控件，名称：Active1，控件上有TEXT框和按钮。
2.控件Active1，有函数，可以返回接收TEXT框和按钮的消息的窗口句柄，用户自定义消息，都是LONG型。
3.问题：当点击按钮时，程序有个提示。就是说如何能接收到按钮的消息窗口。