用VisualBasic6类模块打造控件