2013年06月_miaozk2006

12月 11月 10月 09月 08月 07月 06月 05月 04月 03月 02月 01月

原创 VB编程实现关闭显示器

Option ExplicitPrivate Declare Function SendMessage _Lib "user32" _Alias "SendMessageA" (ByVal hWnd As Long, _ByVal wMsg As Long, _ByVal wParam As Long, _ByVal lParam As Long) As LongConst WM_SYSC...

2013-06-24 14:39:22 806

原创 VB 获取计算机的分辨率大小

Private Sub Form_Load() Dim x, y x = Screen.Width / Screen.TwipsPerPixelXy = Screen.Height / Screen.TwipsPerPixelY MsgBox "您电脑的分辨率为：" & x & " * " & yEnd Sub摘自：网络整理更多精彩>>&...

2013-06-24 14:39:15 340

VB 游戏外挂操作类包括：模拟按键、卸载进程、加载窗口、读取字符、读取内存、写入内存 (代码另存为aa.cls)Option Explicit'Dim T As New 游戏外挂类'Private Sub Command1_Click()' T.加载窗口 "植物大战僵尸中文版"'End Sub'Private Sub Form_Unload(Cancel As Integer)' T.卸载进程...

2013-06-19 19:34:27 642

原创 VB 子类化技术详解

1. 何谓子类化（subclassing）众所周知，Windows是一个基于消息的系统，消息在Windows的对象之间进行着传递。子类化和Windows的钩子机制存在于消息系统之中，我们可以利用这些机制来操纵、修改甚至丢弃那些在操作系统或是进程中传递的消息，以求改变系统的一些行为。子类化技术用来截取窗口或控件之间的消息，当然是消息在到达目的窗口之前完成的操作。这些被截获的消息既可以保留也可...

2013-06-19 19:34:17 706

原创 VB 域名转换IP地址函数

它可以将一个域名转换成对应的IP地址。调用FORM代码示例:Private Sub Form_Load() MsgBox DomainNameToIP("http://miaozk2006.blog.163.com")End SubModule:Option ExplicitPrivate Type HOSTENT hName As Long hAli...

2013-06-19 19:34:14 592

原创 VB 更换设置桌面背景图片函数

主要是通过使用Win32 API函数中的SystemParametersInfo函数来更换墙纸，墙纸图片貌似只能是bmp格式才能成功。Option ExplicitPrivate Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Lon...

2013-06-13 10:22:40 1751

原创 VB 断开指定进程网络连接函数

VB 断开指定进程网络连接函数，通过指定进程名字，断开该进程的网络连接。 Private Const PROCESS_QUERY_INFORMATION = 1024Private Const PROCESS_VM_READ = 16Private Const MAX_PATH = 256Private Const AF_INET6 = 23Private Const AF_IN...

2013-06-13 10:22:29 793

原创关于魔兽争霸的分辨率设置,WAR3分辨率设置

1、打开"开始"菜单-运行-输入Regedit 打开注册表编辑器 2、依次展开: HKEY_CURRENT_USER\Software\Blizzard Entertainment\Warcraft III\Video 3、然后选择右边的改变右边的 resheight （高）和reswidth（宽）的值(注意：要选择10进制，否则需要进行进制转...

2013-06-08 09:14:17 6394

原创 VB 全局Hook鼠标消息

VB 全局Hook鼠标钩子，获取鼠标单击左键、鼠标坐标位置等。以下是鼠标的按键消息：键按下释放按下（双击）左WM_NCLBUTTONDOWN=&HA1WM_NCLBUTTONUP=&HA2WM_NCLBUTTONDBLCLK=&HA3中WM_NCMBUTTONDOWN=&HA7WM_NCMBUTTONU...

2013-06-08 08:52:52 688

原创 VB 设置控件边框颜色(如：List、Text、Picture)

VB 设置控件边框颜色，比如：ListBox、TextBox、PictureBox、ComboBox等等….调用方法： 'setBorderColor (控件句柄,颜色值) setBorderColor Text1.hWnd, vbRedOption ExplicitPrivate Type RECTW Left As Long Top...

2013-06-08 08:50:34 3554

原创 VB shell执行程序，直到执行完毕

shell执行程序，直到执行完毕为止：MOD代码Option Explicit'# use to shell process #Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As...

2013-06-07 17:53:54 1103

原创一个VB数组指针类

顾名思义了，这个代码就是将指定的内存地址绑定到一个VB数组，即COM中的SafeArray上。所谓绑定，是指在使用该内存地址之前，并不需要申请相应的本地内存缓冲区，也不需要进行内存复制，只是根据该地址凭空构造一个VB数组，并将数组的真实数据地址指向该地址。当然，该类的功能完全可以用CopyMemory函数直接代替。为什么又写了这个类呢？主要还是为了进一步展示VB中数组的内幕，同...

2013-06-07 17:53:45 673

原创 vb 开机到现在的时间

代码如下： Private Declare Function timeGetTime Lib "winmm.dll" () As Long '该声明得到系统开机到现在的时间(单位：毫秒)Public Function Sleep2(T As Long) Dim Savetime As Long Savetime = timeGetTime '记下开始时的时间 Whi...

2013-06-07 17:53:36 423

原创 VB 判断当前是否连接网络API实现

代码如下：Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef dwFlags As Long, ByVal dwReserved As Long) As LongPrivate Sub Form_Load() If InternetGetConnectedState(0&,...

2013-06-04 07:41:37 1221

原创 VB封装excel chart

Dim objSet obj = createObject("ChinaaspChart.pie")obj.AddValue "男", 150obj.AddValue "女", 45obj.AddValue "不知道", 15obj.ChartName = "性别比例图"obj.FileName = "d:\123.gif"obj.SaveChart　　除了在vb里面可以调用，这段代码

2013-06-04 07:41:24 282

原创 VB SendKeys 语句

将一个或多个按键消息发送到活动窗口，就如同在键盘上进行输入一样。语法SendKeys string[, wait]SendKeys 语句的语法具有以下几个命名参数：部分描述 string 必需的。字符串表达式，指定要发送的按键消息。 Wait 可选的。指定等待方式的 BooleandefBooleanDataType@veendf98.chm 值。如果为 False（缺省值），则控件在按键发...

2013-06-04 07:41:16 155

原创如何使用自动化与分析工具库创建 Excel 直方图

本文提供了一个 Visual Basic 项目示例，该示例演示了如何使用分析工具库 (ATP) 生成直方图。本文还介绍了一些基本技术，使用这些技术可以实现并使用分析工具库外接程序库，以及具有自动化功能的分析工具库 Visual Basic for Applications (VBA) 模板外接程序。在 Visual Basic 中创建一个新的标准 EXE 项目。默认情况下，会创建...

2013-06-03 11:39:32 452

原创 VB 感染EXE 程序病毒源码

使大家清楚认识病毒程序的运行机理，提高自身程序的抵抗力。说明：1、本代码目前仅是实验模型，给新手讲解原理之用，不会失控，绝对安全。2、本代码仅实现了感染EXE的功能，其他的功能还须你自己加入。3、为了目前的安全，本病毒只是在病毒所在的目录下随机选一个文件感染，你可以利用此功能来调试；将来你可以修改，让它不断的循环搜索计算机上的所有文件。4、最重要的：不要搞恶意破坏，否则真进了监狱后果自负！...

2013-06-03 11:39:27 960

原创【转】关于VB中Shell及ShellExecute的总结与记录

shell 函数只可以执行.exe .com .bat 的可执行文件。ShellExecute 是个api函数，可以执行与Windows系统相关联的文件。比如： shell "c:\1.doc" 应该报错的，因为shell只能执行.exe .com .bat 应：ShellExecute Me.hwnd, "open", "C:\1.doc", "", "", 0ShellEx...

2013-06-03 11:39:20 3615

(原创) 大文本文件极速合并（sps文件合并）

１、普通文本文件的合并　　　　　　　　　２、大文件快速合并，空行及重复行删除等功能３、合并物探处理中使用的SPS文件

2017-01-13

VirtualBox-5.0.2

VirtualBox-5.0.2 虚拟机

2015-09-07

VirtualBoxSDK-5.0.2-102096开发包

VirtualBoxSDK 5.0.2-102096 SDK开发包

2015-09-06

Oracle_VM_VirtualBox_Extension_Pack-5.0.2-102096扩展包

2015-09-06

索尼录音笔SX1000程序与驱动For Mac&WIN

索尼录音笔 SX1000 程序与驱动提供Mac系统微软WINDOWS系统的软件和驱动程序有用得到的朋友可以下载

2015-07-27

打印机驱动HP2035 W32&WIN64

惠普打印机驱动 HP2035 驱动包括32位和64位系统产品名称：HP2035 产品型号为：CE461A 需要的朋友下载

2015-07-27

联想多媒体键盘驱动LXB-CH0507.rar

联想多媒体键盘驱动配置程序 FOR X86 WIN7系统测试通过键盘产品型号：LXB-CH0507 驱动盘上的文件名称：11000863.exe 请需要的朋友收藏

2015-07-27

Oracle_VM_VirtualBox_Extension_Pack-4.3.10

Oracle_VM 多平台扩展包 Oracle_VM_VirtualBox_Extension_Pack-4.3.10

2014-05-13

Oracle_VM_VirtualBox_Extension_Pack-4.2.16扩展包

Oracle_VM_VirtualBox_Extension_Pack-4.2.16扩展包支持所用多平台

2013-08-24

【原创】两线交点坐标批量计算

原来从事物探行业，经常遇到计算测线交点坐标的问题，根据已知的L1线两点(X1,Y1),(X11,Y11),和L2线上两点(x2,y2),(x22,y22)计算交点，在一般情况遇到，虽然通过解方程组便可得到，但对于我们使用较为频繁时，就显得无奈了，便写成代码制作成了软件方便个人使用。今日释放出来，有需要的朋友可以下载使用。功能简单介绍： 1.具体可以看软件帮助 2.支持批量和双线两计算方式 3.如果位置对应，可以直接从EXCEL表格中拷贝数据 4.两线交点计算时，可以一次性都由2个点的坐标，具体看帮助 5.批量的数据格式可以根据鼠标悬停看提示，按提示格式编写即可，具体还是看帮助。 6.增加了快捷键操作，不经常使用，此功能可以忽略。

2013-08-07

[原创]unix2dos dos2unix 批量 windows升级版

unix2dos批量转换工具（双向） MS桌面版前一版描述较不祥细，以至于很同朋友不知道可以选择多个文件拖放，故在此多啰嗦几句。注明：1、窗口支持拖放，单文件或多文件同时拖放均可 2、新版本添加文件列表窗口中点“右键”可以“添加”文件按钮 3、窗口中有无文件列表均可调入“右键”菜单，以弹出待使用的功能老版本暂不删除，地址为： http://download.csdn.net/detail/miaozk2006/4470260 4、强列注明该软件非LINUX/UNIX版本，是纯WINDOWS(XP ,98,VISTA,WIN7，win8 下均可使用） 5、如果内置到其它程序，可能通过批处理调用，因为其支持DOS命令运行调用。具体看如下描述功能：DOS=>UNIX UNIX=>DOS 运行环境：MS-WINDOWS,及DOS下注：支持命令行参数调用

2013-08-07

[原创]unix2dos工具

unix2dos批量转换工具（双向） MS桌面版功能：DOS=>UNIX UNIX=>DOS 运行环境：ms-WINDOWS,及DOS下注：支持命令行参数调用

2012-08-02

unix2dos工具批量转换

unix2dos 批量转换纯绿色操作环境：Microsoft桌面操作系统/dos下操作使用方法：拖放要转换的文本文件至输入窗口中，选择要转换的方式（DOS2UNIX或UNIX2DOS），点转换即可直接转换注：支持命令提示符下参数操作功能： unix文本文件与dos文本文件相互转换 1、unix文本转DOS文本文件 2、dos文本转UNIX文本文件

2012-07-31

windows下UNIX2DOS

unix2dos 操作环境：Microsoft桌面操作系统/dos下操作使用方法：拖放要转换的文本文件至输入窗口中，选择要转换的方式（DOS2UNIX或UNIX2DOS），点转换即可直接转换注：支持命令提示符下参数操作功能： unix文本文件与dos文本文件相互转换 1、unix文本转DOS文本文件 2、dos文本转UNIX文本文件

2012-07-30

unix2dos 文本文件相互转换

2012-07-30

hp无线助手（boradcom无线助手）

2012-05-14

(1寸&2寸)照片生成器

如题：1寸照片生成器把原始照片压缩成1寸照片二寸照片生成器把原始照片压缩成2寸照片

2012-03-14

P2P搜索神器

2012-02-21

BeTwin2特别版

BeTwin2特别版, 一机多用必备软件，需要双显，不做过多介绍，你懂的

2012-02-21

外壳扩展工具包(ShellKit) 珍藏自用版

外壳扩展工具包(ShellKit) 不作介绍，windows右键SHELL菜单，方便操作

2012-01-23

软件运行库VBVC 201108精简版

绿色软件运行所必须的微软软件运行支持库,均为静默版 visual basic virtual machine (5.1) visual basic virtual machine (6.0) microsoft c runtime library (7.0) microsoft c runtime library (7.10) microsoft visual c++ 2005 sp1 (8.0.61001)（2011.05.14最新数字签名） microsoft visual c++ 2008 sp1 (9.0.30729.6161)（2011.04.19最新数字签名）

2012-01-23

微软核心模块shell32.dll的应用

2011-12-22

20款超酷VB皮肤控件源码

2011-12-22

批处理BAT转EXE

批处理BAT转EXE 把批处理文件转换成可以直接执行的EXE文件

2011-12-22

ppt幻灯片转EXE

ppt幻灯片转EXE 包括：简单模块和增强模式两种方式，生成时有很多详细的选项进行设置简单实用

2011-12-22

个人珍藏EmEditor实用加强版

个人珍藏EmEditor实用加强版文本编辑，程序编写个人感觉直超NOTEPAD++

2011-12-17

Segy查看 SegyView

查看地震数据格式Segy SegyView 简单实用

2011-12-17

虚拟机VirtualBox-4.1.6-74713-Win

2011-11-18

VirtualBox 4.1.6 Software Developer Kit (SDK) 软件开发工具包

2011-11-06

Oracle_VM_VirtualBox_Extension_Pack-4.1.6-74713.vbox-extpack

Oracle_VM_VirtualBox_Extension_Pack-4.1.6-74713.vbox-extpack 扩展包

2011-11-06

Oracle_VM_VirtualBox_Extension_Pack-4.1.4-74291

Oracle_VM_VirtualBox_Extension_Pack-4.1.4-74291 Oracle virtualbox虚拟机最新扩展包

2011-10-07

Qbasic 学习basic的最早必备软件

Qbasic 学习basic的最早必备软件，从早期的MS-DOS中提取，绿色运行版，学买BASIC的好软件，原老级软件，大家可以下载收藏

2011-09-28

虚拟机VirtualBox-4.1.2-73507-Win

虚拟机VirtualBox-4.1.2-73507-Win 另外还有对应的扩展包

2011-09-13

Oracle_VM_VirtualBox_Extension_Pack-4.1.2-73507.vbox-extpack

Oracle_VM_VirtualBox_Extension_Pack-4.1.2-73507.vbox-extpack Oracle virtualbox虚拟机最新扩展包

2011-08-31

VC2010sp1运行库(Visual C++ 2010)简体中文版

Microsoft Visual C++ 2010Redistributable Package (x86) 安装 Visual C++ 库的运行时组件，使用户能够在未安装 Visual C++ 2010 的计算机上运行使用 Visual C++ 开发的应用程序

2011-08-27

vc2005运行库x86&x64

Microsoft Visual C++ 2005 Redistributable Package (x86) 安装在未安装 Visual C++ 2005 的计算机上运行使用 Visual C++ 开发的应用程序所需的 Visual C++ 库的运行时组件. x86和x64双版本

2011-08-27

qtcore.dll 各版本打包下载下（ x64版）

qtcore.dll 各版本打包下载下（ x64版）在网上下载，发现很难下载到，到处理收集打包上传供需要的人下载版本包括： 4.1.0.0 4.2.3.0 4.3.3.0 4.3.5.0 4.4.0.0 4.4.3.0 4.5.0.0 4.5.1.0 4.5.2.0 4.5.3.0 4.6.0.0 4.6.2.0

2011-08-27

qtcore.dll 各版本打包下载上（ x86版）

qtcore.dll 各版本打包下载上（ x86版）在网上下载，发现很难下载到，到处理收集打包上传供需要的人下载版本包括： 4.1.0.0 4.1.2.0 4.1.3.0 4.1.4.0 4.1.5.0 4.2.0.0 4.2.1.0 4.2.2.0 4.2.3.0 4.3.0.0 4.3.2.0 4.3.3.0 4.3.4.0 4.3.5.0 4.4.0.0 4.4.1.0 4.4.3.0 4.5.0.0 4.5.0.15 4.5.1.0 4.5.2.0 4.5.3.0 4.6.0.0 4.6.1.0 4.6.2.0 4.6.3.0 4.7.0.0 4.7.1.0 4.7.2.0 4.7.3.0

2011-08-27

威刚 S102 8G 16g USB3.0量产工具 Innostor 902 MP Package v2.03.00.11

威刚 S102 8G 16g USB3.0量产工具最新版 Innostor 902 MP Package v2.03.00.11 量产工具，对于普通用户来说就是对U盘分区，制作加密盘，制作启动盘，过多的不说了，懂行的下载友情警示：量产是一项很危险的行为，U盘量产由于产品质量参差不齐等多种因素可能会使U盘量产失败。所以要有量产失败的心理承受力。另外S102 是一款较新的USB3的主控，量产工具等目前来说大家积累的参考经验还比较少，所要量产之前要慎重啊！把自己刚入手的威刚 S102 16G分为两个区，第一个区分为光盘启动盘。有兴趣的可以参阅我的博文：http://miaozk2006.blog.163.com/blog/static/38247058201172412458459/

2011-08-22

VB MSDN 简体中文版

VB MSDN 简体中文版 VB帮助文件安装版

2011-08-20

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人