VB 专栏
cbm6666
现任浙江霸王衡器有限公司研发部专案总监
现任百度VB吧吧主, 雪原在线(Play78.com)VB编程版版主
其它简介如下:
*** 本人专利与获奖网上材料 **********
http://www.zhuanli369.com/zhuanli/A63D/list7517320508.htm 中国发明专利网 http://www.patent-cn.com/A63B/CN2370
展开
-
【CBM666 的动画分割】
VB编写的将一张图片分割, 并以透明背景动画显示. 下载地址: http://d.download.csdn.net/down/361295/cbm666原创 2008-02-24 12:47:00 · 1318 阅读 · 1 评论 -
【CBM666 的枚举子文件夹】
添加 Command1 Option ExplicitDim strrec$(), TFolders&Dim i&, fs, f, sPrivate Sub Command1_Click() s = GetFolders("e:/music") If TFolders Me.Cls For i = 0 To UBound(s) Print s(i) Nex原创 2008-03-08 12:50:00 · 1003 阅读 · 0 评论 -
【CBM666 的递归文件搜索】
下面代码是从我写的 Dll 里面的 .cls 抽出来的, 因此,下面代码,除了Command1事件是本地代码, 其它另两个Sub与Function你可以活用, 摆在你的 .cls里面*************** 本代码是在指定的文件夹中以 "递归" 方式搜索多媒体文件*.mp3;*.mid;*.wav;*.wma;*.dat;*.rm;*.rmi;*.rmvb添加 Command原创 2008-03-08 19:29:00 · 983 阅读 · 1 评论 -
【CBM666 的如何制作与使用 .RES 资源文件】
2007年04月30日 星期一 08:01 这是从资源文件里调用msvbvm60.dll 注册的代码 本代码是放在模块 Moudule1.bas 里面,不是放在Form1里面的. 要注册.dll .ocx最好是放在.ba原创 2008-03-08 13:11:00 · 1943 阅读 · 1 评论 -
【CBM666 的英文打字练习】
下载地址:http://download.csdn.net/source/368790原创 2008-03-04 22:53:00 · 935 阅读 · 2 评论 -
【CBM666 的RGB取色加渐变】
下载地址:http://download.csdn.net/source/362525原创 2008-02-27 23:50:00 · 1684 阅读 · 0 评论 -
【CBM666 爬满您桌面的甲虫】
下载地址: http://d.download.csdn.net/down/361095/cbm666原创 2008-02-26 15:07:00 · 1137 阅读 · 0 评论 -
【CBM666 的全局检测鼠标移动】
Option Explicit*********************** 得知鼠标位置的 API *******************************Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As LongPrivate Type POINTAPI X As Long Y原创 2008-02-26 12:43:00 · 835 阅读 · 0 评论 -
【CBM666 的最简单歌曲播放】
添加 Command1 Option ExplicitDim songnm$ Private Sub Command1_Click() songnm = "c:/test.mp3" Call playmusic(so原创 2008-02-26 12:37:00 · 636 阅读 · 1 评论 -
【CBM666 的自制开立方涵数】
Private Sub Form_Load() MsgBox Cubic(125)End SubPublic Function Cubic(Cval&) As Long 开4次方 1/4 ,开5次方 1/5 ....类推 Cubic = Cval ^ (1 / 3)End Function原创 2008-02-25 17:46:00 · 682 阅读 · 0 评论 -
【CBM666 的图片保存信息】
利用图片将你的信息保存起来, 随时可以调用或更新. 下载地址:http://download.csdn.net/source/374797原创 2008-03-09 23:53:00 · 971 阅读 · 0 评论