当前位置:首页 > VB

VB6获取电脑硬件信息

编程学习2022-02-1434790
VB6获取电脑硬件信息
VB6通过WIMI获取电脑硬件信息,可以查看电脑硬件配置信息。看效果上代码'获取系统信息 Private Function getSysInfo()     Dim Info, System, item     Set System = GetObject("winmgmts:")...

用vb模拟键盘

编程学习2008-11-1839610
用vb模拟键盘
键盘是我们使用计算机的一个很重要的输入设备了,即使在鼠标大行其道的今天,很多程序依然离不开键盘来操作。但是有时候,一些重复性的,很繁琐的键盘操作总会让人疲惫,于是就有了用程序来代替人们按键的方法,这样可以把很多重复性的键盘操作交给程序来模拟,省了很多精力,按键精灵就是这样的一个软件。那么我们怎样才能用VB来写一个程序,达到与按键精灵类似的功能呢?那就让我们来先了解一下windows中响应键盘事件的机制。...

VBScript 错误信息

编程学习2007-12-3041440
VBScript 错误信息
错误代码 信息5 无效的过程调用或参数6 溢出7 内存不够9 下标越界...

用VB类实现文件对话框

编程学习2007-11-0445130
用VB类实现文件对话框
用VB类实现文件对话框'类名:ComDlg.cls '作用:文件打开保存对话框 ' ' ' 'By:Apull '2007-5-21 'http://www.apull.net Option Explicit Private Declare Function GetOpenFileName Lib "comdlg32.dll" Alias "GetOpenFileNameA" ( _ pOpenfilename As OPENFILEN...

VB/VB.net 只允许运行一个实例

编程学习2007-10-2962100
VB/VB.net 只允许运行一个实例
VB如何防止程序被重复加载,也就是只允许运行一个实例,一般有2种方法。一,直接用VB提供的APP对象的PrevInstance方法。PrevInstance的返回值为True则说明已经有一个实力在运行。If App.PrevInstance Then Msgbox "已经有一个实例在运行" End if...

VB连接SQLServer数据库操作代码

编程学习2007-10-0355430
VB连接SQLServer数据库操作代码
第一步,在ModConString模块中定义一系列变量'定义一个属性过程反映连接字符串Public Property Get conString() As Variant conString = "data source=.;initial catalog=Sims_four;user End Property...

MD5加密VB版

编程学习2007-06-0236450
MD5加密VB版
'MD5加密VB版 '调用方法:str=MD5("Apull",32),就能得到"Apull"的32位的MD5。 Private m_lOnBits(30) Private m_l2Power(30) Private Const BITS_TO_A_BYTE = 8 Private Const BYTES_TO_A_WORD = 4 Private Const BITS_TO_A_WORD = 32...

zDiary - 简易日记本

我的软件2007-06-0242020
zDiary - 简易日记本
软件名称:zDiary v 2.1.33================================运行环境:Vista (XP/2000/NT/ME/9X)软件类型:日记工具授权方式:免费软件...

GetIcon - 图标资源查看保存工具

我的软件2007-05-2241340
GetIcon - 图标资源查看保存工具
软件名称: GetIcon v1.3================================运行环境:Win2003 (XP/2000/NT/ME/9X)软件类型:图标工具授权方式:免费软件...

Notepad2 - 功能强大的记事本

我的软件2007-05-2040670
Notepad2 - 功能强大的记事本
Notepad2 - 功能强大的记事本有段日子没有关注Notepad2了,今天在一个下载网站上看到了最新版的Notepad2的英文版下载,第一时间汉化后发布上来给大家共享。Notepad2 v4.1.24 汉化版软件介绍这是一个用来取代Windows记事本的免费程序。将Notepad2.exe复制到x:\windows\system32 和 x:\windows下替代原有的记事本。...