VB修改内存用哪个API函数？具体用法是什么？

我觉得你可以调用API函数，比如CreateToolhelp32Snapshot这个方法就很不错

Dim pe As PROCESSENTRY32

Dim R As Long, i As Long

R = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0)

If R <> 0 Then

pe.dwSize = 1060

Process32First R, pe

If UCase(Left$(pe.szExeFile, 8)) = UCase("XXX.exe") Then

MsgBox "Perhaps you are XXX！"

End

End If

Do

i = Process32Next(R, pe)

If i > 0 Then

If UCase(Left$(pe.szExeFile, 8)) = UCase("XXX.exe") Then

MsgBox "You may now run XXX!"

End

End If

Else

Exit Do

End If

Loop

End If

win7 系统如何打内存补丁?大家都知道win7 32位最高支持的内存也就3G多一点，不可能达到4G的，而非要达到4G内存就必须要修改系统的设置在本文将为大家介绍下通过Ready For 4 GB让32位Win7突破4G内存限制，感兴趣的朋友可以了解下。

win7系统如何打内存补丁

我的电脑是酷睿双核CPU、4G内存，大家都知道win7 32位最高支持的内存也就3G多一点，不可能达到4G的，而要让我的4G内存完全发挥出来，就必须要修改系统的设置。也就是网上流行的一些win7技巧。而我今天被这个技巧给搞得郁闷了。

32bit win7突破4G内存限制补丁

目前来看，Win7的64位版本在兼容性上还是有所不足，然而32位版本不支持4G以上内存是众所周知的事情。但其实，vista/Win7自身完全支持超过4GB大内存，只是微软不让你使用而已。如果让你使用4G以上的内存，那64位的系统和服务器用的系统还怎么卖，要知道价格相差可是很悬殊的! 但其实在Win7上可以通过程序解除Windows PAE 内核文件 ntkrnlpa.exe，绕过Zw Query License Value API函数的许可限制，让32位的vista/Win7支持超过4GB物理内存。

看了上面的内存限制解除程序，对于拥有4G以上内存的用户，的确是个好消息，至少在Win7上是个好消息。与其使用Win7的64位版本带来诸多的不便，不如直接解除32位来的要容易的多。

已经升级Win7的玩家，如果为了支持更大的内存而去尝试Win7的64位版本是不明智的，因为在兼容上64bit还存在一些问题。其实通过解除软件，Win7的32位系统已经可以支持超过4G以上的内存，同理，在vista系统上也可以实现。

开始菜单→附件中找到“命令提示符”右键单击，选择以管理员身份运行。

输入以下内容按回车：

bcdedit -copy {current} /d "Windows 7 x86 [ 128GB with ntkr128g.exe ]"

命令符就会显示：

成功复制到 {********-****-****-****-************}

每个人的配置不同显示的内容也不同~~下面以我电脑为例~~我电脑显示的是：成功复制到{179d394f-3aa7-11de-8445-c7e15840a5ba}

以下请根据上面返回的内容依次输入：

bcdedit /set {179d394f-3aa7-11de-8445-c7e15840a5ba} testsigning on

回车后会显示“ *** 作成功”

bcdedit /set {179d394f-3aa7-11de-8445-c7e15840a5ba} pae forceenable

回车后会显示“ *** 作成功”

bcdedit /set {179d394f-3aa7-11de-8445-c7e15840a5ba} kernel ntkr128g.exe

回车后会显示“ *** 作成功”

3个命令都成功后重启电脑，会显示个双系统菜单。请选择Windows 7 x86 [ 128GB with ntkr128g.exe ]进入系统~~再看看你的任务管理器~是不是支持了~~

---