VB判断控件类型,压缩包内为工程代码均有注释等等