一、列表简介 一款代替VB自带的ListBox列表控件，多种背景添加样式，改变背景透明度，鼠标热跟踪，指定显示文件夹下的子文件夹和文件，鼠标点开文件夹浏览下一个文件夹，支持撤销功能，自定义改变滚动条样式和颜色，显示项目图标及文件大小等功能。 二、源码 控件为开源控件，当中包含很多单独功能的函数，对VB初学者来有很大的学习价值，大到每一个函数，小到每一行代码，甚至一个变量，都以中文注释，清晰明了。

VB编写的游戏十步万度，百行不到的精简代码，可以随意更改长宽。

求圆周率，可以通过反正切公式来计算、利用割圆法等，也可以用频率估计概率的方法来求。 假设一个正方形的面积为4，则其内切圆面积为π，现向正方形内随机投掷米粒，可知米粒落在圆中的次数占总数的π/4。经过大量实验，用这个频率乘4可得π的近似值。 本程序使用这种方法，利用VB的随机数生成器来实现，并画出p*4的折线图，理论上会稳定在3.14159附近，图供参考。 附有VB源码，带注释。随机数生成器已经经过一些改良，如果可以更有随机性就更好了。

比网上其他版本(也包括之前在此发的两次)修正： 去除tab只有9页的限制 修正tab页宽度超过1万后，应该在其他页中的控件会留一部分在当前页 放多个没有left、top或WhatsThisHelpID的控件不会产生错误(只是不会随页变动) 修正tabstop不能保持原值错误 修正鼠标停在tab上会不断刷新占用系统资源甚至内存溢出错误(去除usercontrol_mouseover中refresh) tab标题头背景透明处理(美化了^_^) '-------------------------------------------- 修正后仍存在的不足 -------------------------------- 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大小的部分全部会被透明)!!! '---------------------------------------------------------比这个前一个版本的是没有用API的，可以在我的资源里找到前两次修改的版本，使用的话还是用这个版本 这几个控件有很多可学的地方， 比如其中的错误处理(网上的源码和我上一个修改版本的源码中错误处理的部分是不太合理的，虽然我和这个控件的其他修改者一样思路，但研究后最终还是用这次发布的这个版本) 比如上一版本中的无API绘图，这个版本有api，因此图大小可变 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- 测试.vbp那个是原先旧版的测试，没有跟着新版修改，所以不兼容，此楼新版是经过测试的，编译好的ocx可以直接使用(★必须使用编译好的ocx，原因一楼已经说了★) 对编译好的ocx有疑问或自己要改进的可以直接修改TabSwitch.vbp，再重新编译

对文件及文件夹进行隐藏、读取、重命名管理，可以多用户单独注册使用。

C/S结构最让人受不了的就是客户端多了以后的版本维护，我这个客户端自动升级程序帮你解决这个问题，这个程序是绿色、无第三方控件、开源的。

VB开源矢量绘图源码实例，VB6本身对于绘图的支持是非常弱的，因此一般直接通过其内置方法实现的绘图效率都成很大的问题。解决方法之一是采用Windows API来进行底层GDI的绘制，更好的方法是采用GDI 来绘图。 　　这款VB6矢量绘图控件源码支持直线、弧线、矩形、圆角矩形、椭圆、多边形、星形、文本和图片等的绘制，支持旋转、缩放、选择、排列等操作，总的说来功能还是不错的！

VB开源常用图标，有助于开发人员开发程序时使用

C/S结构最让人受不了的就是客户端多了以后的版本维护，我这个客户端自动升级程序帮你解决这个问题，这个程序是绿色、无第三方控件、开源的。