摘要：“真心劝大家不要再单纯为升级挂QQ了！”最近同类呼声频频在网上出现。据网友发帖反映，自从腾讯公司推出该项目以来，不少QQ迷都在为了升级而长期挂线。 “这样非常浪费电，我们国家本来就不富裕，不少省市年年缺电。希望大家不要再无谓地挂QQ了,就算你升到100级又有什么用呢？！”一位网友发帖感慨。 记者做了不完全调查以及咨询了部分专家后，得出了一个惊人的近乎恐怖的数字：QQ升一级，电量够宁波用一年。 盲目升级的QQ挂机族 吴小姐的工作离不开电脑和网络，她也是典型的QQ挂机族。她坦言自己下班从不关机，QQ也不下线，仅仅是隐身而已，目前她已经是28级了。她说，现在除了可以用自定义头像，好像... 阅读全文
今天晚上写了个获取当前Office版本的函数（原创！）
2005-04-29 21:33 by 电脑人生, 285 阅读, 0 推荐, 收藏,
摘要：获取当前Office版本的函数Private Sub Command1_Click() MsgBox GetInstalledOfficeVersion()End Sub'本函数运行不需要机器上安装过Office'经典的判断Office版本函数，原创！'支持到Office 2003Function GetInstalledOfficeVersion() As String On Error Resume Next Dim WD Dim OfficeVer As String OfficeVer = 0 GetInstalledOfficeVersion = " 阅读全文
写了个＂网络连接管理＂软件，以后做这事情方便了
2005-04-28 12:10 by 电脑人生, 138 阅读, 0 推荐, 收藏,
摘要：支持 Win2K,WinXp,Win2003,..'-------------------------------------------' 转载请注明出处' 作者：唐细刚' 邮箱：tanaya@163.com'------------------------------------------- 阅读全文
写了个二分法查找函数
2005-04-27 22:15 by 电脑人生, 390 阅读, 0 推荐, 收藏,
摘要：今日有csdn的网友问到这个问题，所以写了这个函数，如下：'二分法查找函数'功能：在数组中查找指定的值'返回：若查到指定值则返回相应的索引，否则返回-1'程序：by Tang 22:06 2005-4-27Function vbBinarySearch(vb_Array() As Long, ByVal vb_Find As Long) As Long Dim SearchMin As Long Dim SearchMax As Long Dim i As Long vbBinarySearch = -1 SearchMin = LBound(vb_Array) 阅读全文
判断数组是否被分配的VB函数
2005-04-21 13:01 by 电脑人生, 155 阅读, 0 推荐, 收藏,
摘要：Function IsReDim(ByRef MyArray() As Variant) As Boolean On Error GoTo Z Dim szTmp szTmp = Join(MyArray, ",") IsReDim = LenB(szTmp) > 0 Exit FunctionZ: IsReDim = FalseEnd FunctionIsReDim判断数组是不是被分配过，如果是动态数组被Erase了，将返回False使用例子：If IsReDim(uArray) Then 'uArray里面有数据Else 'uArray里面没有数据 阅读全文
用VB得到windows系统安装时的时间(for NT,2000,XP,..)
2005-04-21 11:27 by 电脑人生, 376 阅读, 0 推荐, 收藏,
摘要：Option ExplicitPrivate Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As LongPrivate Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal h 阅读全文
初恋的温度
2005-04-18 11:55 by 电脑人生, 172 阅读, 0 推荐, 收藏,
摘要：我用咖啡的旋转旋转着我的慌乱匙与杯的脆响代表了羞涩的答案当我终于肯让你理正我的红帽并把一缕长发掼在耳后你浅笑了我知道你心里一定在想这杯咖啡真没白喝!哼!!在送我的路灯下你亲了我活该! 烫着了吧那时我的脸上正燃烧着初恋的温度... 阅读全文
VB也玩自杀
2005-04-05 08:52 by 电脑人生, 198 阅读, 0 推荐, 收藏,
摘要：以前写过VC,Delphi和CBC的自杀程序,VB的自杀也写过,不过用的是批处理,今天又挖掘了下VB的自杀功能使用API实现,开发：VB6 阅读全文
VS6英文版下载
2005-04-01 23:28 by 电脑人生, 261 阅读, 0 推荐, 收藏,
摘要：速度大概 50K ~ 100K/秒，请使用单线程，建议使用 Flashget，注意设置＂不限制重复次数＂要是下载不了就多等会，肯定可以下载的．//---------------------------------------------------------------------------- 下载地址：http://mofile.com 16位提取码：8758741533712093 VS6英文版(包含vc6,vb6,vf6等) 此为RAR压缩，无密码，大小241.6M，解压后为一个ISO，总大小600M，可以刻光盘安装，也可以用虚拟光驱安装 //-----------------... 阅读全文
浙公网安备 33010602011771号