7个开源VB基础控件，tab控件　美化按钮　选择框　XP风格frame等

Tab页可以属性页ActiveTab中选择，0为首页 比网上其他版本修正： 修正tab宽超过1万，控件会窜页问题 去除tab只有9页的限制 放多个没有left、top或WhatsThisHelpID的控件不会产生错误(只是不会随页变动) 修正tabstop不能保持原值错误 修正鼠标停在tab上会不断刷新占用系统资源甚至内存溢出错误(去除usercontrol_mouseover中refresh) tab标题头背景透明处理(美化了^_^) xBoutton设ico0时会自动设置ico1,ico2(仅当后两者为none时，所以改ico0要先删除ico1和2) FocusRect默认为false，按下按钮不会出现虚线框 '-------------------------------------------- 修正后仍存在的不足 -------------------------------- 1、控件必须编译后使用，否则一旦拖放出新的adodc等会让自定义控件变为不可用状态的控件，TAB则会跳页错乱! 2、tab控件中的WhatsThisHelpID属性被占用(-_-#，没办法，为了省系统资源，好在多数控件有这个属性且基本没人用，偷笑^^) 3、没有WhatsThisHelpID属性的控件不会随页变动 4、如果把本控件的BackColor设成&H00FF00DA& ，则所有放在Tab页上的控件将与背景一起被透明掉。 (本控件会重画放在其上的控件，所以控件也会被透明) 这个问题其实不算问题，没人必须把背景色设的和这个完全一样吧^^，哪怕差1也可以啊，点明这个问题只是要说明本控件的背景透明或任意形状控件的制作原理 原理： backstyle设为：0 maskColor设为：&H00FF00DA& (这个控件里UserControl的BackColor也要设为：&H00FF00DA&) 在Refresh方法中将在UserControl中重绘好的图作为maskPicture，即： Set UserControl.MaskPicture = UserControl.Image 这样maskpicture中背景没有被重绘的部分保持&H00FF00DA&(即与maskcolor指定的颜色相同色)，该颜色的部分即被透明 (注意，指定了backstyle=0及maskpicture后超出maskpicture大小的部分全部会被透明)!!! '---------------------------------------------------------之前发的tab控件比这个前一个版本的是没有用API的 这几个控件有很多可学的地方， 比如其中的错误处理(网上的源码和我上一个修改版本的源码中错误处理的部分是不太合理的，虽然我和这个控件的其他修改者一样思路，但研究后最终还是用这次发布的这个版本) 比如上一版本中的无API绘图，这个版本有api，因此图大小可变 把几个版本都放上来，大家比较 一：最新版，功能最全，错误比其他版本已全部修正(详见上述) 【使用请用这个】 链接:http://pan.baidu.com/s/1o8aRsiY 密码:tb9r 二：修正美化无API版 (不能自动对tabstop处理)，这个也可用，没有严重错误 链接:http://pan.baidu.com/s/1i4YZ7mP 密码:n2b5 三：美化，控件背景用API复制窗体或桌面的方法伪透明，没有修正的版本，会闪退，会溢出，会错乱。。。 链接:http://pan.baidu.com/s/1hrAEXqG 密码:nfhc 其他原vbgood,枕善居等原码都有问题，不建议直接用!