当前位置:首页 > 程序设计 > VB程序设计 > 游戏辅助 > 详细内容
VB 从零开始编辅助(十二)
发布时间:2009-6-29  阅读次数:3239  字体大小: 【】 【】【

--------------------------------------------------------------------------------------------------------------------------------------------------------

VB实现指针访问!DLL的访问

--------------------------------------------------------------------------------------------------------------------------------------------------------

CopyMemory函数提供了一个简单的方法来执行C++中见解访问运算符(*),这个运算符可以访问被一个指针变量所指向的变量的值。
即如有指针变量 P,在C++中可以简单的用 *P 来访问,那在 VB 中怎么访问呢?

在 VB 中,我们可以使用 CopyMemory函数别名。
Declare Sub VBGetTarget Lb "kernel32" Alias "RtlMoveMemory"(Target As Any,ByVal lPoint As Long,ByVal cbCopy As Long)

例子:
Dim Pointer As Long
Dim Target As Integer
Dim i As Integer
i=123
Pointer=VarPtr(i) 获得指针
VBGetTarget Target,Pointer,LenB(Target)
Debug.Print Target

--------------------------------------------------------------------------------------------------------------------------------------------------------

很长时间以来,都认为只能通过绝对路径引用标准DLL中的函数。其实,你也可以用相对路径。很简单的,现在就尝试一下吧。

   1)绝对路径方法

   比如你的DLL文件位于c:\testDLL\debug\testDLL.dll

   一般来说,你需要在VB中作如下声明

Declare Sub mytest Lib "c:\testDLL\dubug\testDLL.dll" (ByVal x As Long)

   另外的一个变通方法是把testDLL.dll放在windows的系统目录下,这样,你就可以直接引用文件名了。不过,需要把一个文件放到windows系统目录下,很是不爽!

   2)相对路径方法

   看看我们如何用相对路径,假设你的DLL文件位于c:\testDLL\debug\testDLL.dll,你的VB程序位于目录c:\testDLL\vbClient
你可以在VB程序中作如下声明:

Declare Sub mytest Lib "../dubug/testDLL.dll" (ByVal x As Long)

   如果直接运行你的VB程序,系统会提示错误:找不到../dubug/testDLL.dll.

   为了使上面的声明其作用,先暂时关闭你的VB工程。然后用一个文本编辑器(notepad,editplus,etc)打开工程文件(就是那个后缀是vbp的家伙),通常vbp文件由几个部分组成。

我要评论
  • 匿名发表
  • [添加到收藏夹]
  • 发表评论:(匿名发表无需登录,已登录用户可直接发表。) 登录状态:未登录
最新评论
所有评论[1]
    暂无已审核评论!
Web Lite SWeTE: Simple Website Translation Engine
 


设为首页 | 加入收藏 | 意见建议 | 友情链接 | 版权声明 | 管理登陆 | 编程论坛 | 给我留言

声明:本网站部分稿件来源的所有文字、图片和音视频稿件,来自互联网,若侵犯您的权利,请来信告知,我们将在第一时间内删除!


Copyright 2009-2015 redrose ( wgbcw.cn ) All rights reserved ICP备案编号:滇ICP备09007156号 Dict.cn


点击这里给我发消息
点击这里给我发消息
安全联盟站长平台