游戏开发论坛

 找回密码
 立即注册
搜索
查看: 1483|回复: 3

各位前辈,指点一下。

[复制链接]

1

主题

2

帖子

8

积分

新手上路

Rank: 1

积分
8
发表于 2006-1-6 23:58:00 | 显示全部楼层 |阅读模式
        Dim hwnd As Integer
        Dim pid As Long
        Dim pHandle As Long
        Dim lpADDress As Long
        Dim ncnr As Long
        Dim s1 As String
        hwnd = FindWindow(vbNullString, "扫雷")
        GetWindowThreadProcessId(hwnd, pid)
        pHandle = OpenProcess(PROCESS_ALL_ACCESS, False, pid)
        ReadProcessMemory(pHandle, &H1005330, ncnr, 20, 0&)
        s1 = Chr(ncnr)
        CloseHandle(pHandle)
        MsgBox(s1)
为什么会在 ReadProcessMemory这里提示溢出啊。能帮我改改这个程序吗?

130

主题

2714

帖子

2714

积分

金牌会员

Rank: 6Rank: 6

积分
2714
发表于 2006-1-7 00:49:00 | 显示全部楼层

Re:各位前辈,指点一下。

&H1005330 这个值是做什么的?

1

主题

2

帖子

8

积分

新手上路

Rank: 1

积分
8
 楼主| 发表于 2006-1-7 12:56:00 | 显示全部楼层

Re:各位前辈,指点一下。

这个是雷的个数,不知道这个地址是不是正确的。

130

主题

2714

帖子

2714

积分

金牌会员

Rank: 6Rank: 6

积分
2714
发表于 2006-1-7 14:56:00 | 显示全部楼层

Re:各位前辈,指点一下。

好象是这个数据有问题,程序前面声明某些变量的问题吧?
&H1005330
你要VB的扫雷我可以给你代码。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

作品发布|文章投稿|广告合作|关于本站|游戏开发论坛 ( 闽ICP备17032699号-3 )

GMT+8, 2026-1-23 03:47

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表