#隐藏鼠标指针的VB脚本

#隐藏鼠标指针的VB脚本
#在网上搜的资料：但实际跑不起来。请大神指导。
“以下是隐藏鼠标的VB脚本代码：

Set objShell = CreateObject("WScript.Shell")
' 隐藏鼠标
objShell.SendKeys("{ESC}")
objShell.Run "rundll32.exe user32.dll,ShowCursor FALSE"
' 显示鼠标
' objShell.Run "rundll32.exe user32.dll,ShowCursor TRUE"

请注意，在代码中，隐藏鼠标和显示鼠标都有对应的代码。你可以根据需要将它们注释掉或取消注释。”

以下是VBScript代码，可以隐藏鼠标指针：

Set objShell = CreateObject("WScript.Shell")
objShell.Run "rundll32.exe user32.dll,ShowCursor 0", 0, True

这段代码使用WScript.Shell对象的Run方法运行rundll32.exe命令，该命令会调用user32.dll中的ShowCursor函数将鼠标指针隐藏。函数的参数0表示隐藏鼠标指针，非0的值表示显示鼠标指针。该命令的第二个参数0表示隐藏窗口，第三个参数True表示等待命令执行完成后再继续执行脚本。如果第三个参数为False，则不等待命令执行完成即立即继续执行脚本。

• 这有个类似的问题, 你可以参考下: https://ask.csdn.net/questions/243094
• 你也可以参考下这篇文章：vbs运行不了，显示中文乱码怎么办，最最最简单的方法
• 除此之外, 这篇博客: VB6.0中提示：该部件的许可证信息没有找到，在设计环境中，没有合适的许可证使用该功能”的解决办法中的 符号文件的作用 部分也许能够解决你的问题, 你可以仔细阅读以下内容或跳转源博客中阅读:
  

• 符号文件是反编译中比较有利的一个外挂，他可以在IDA反编译时，把所有函数的名称和参数对应到二进制中。方便分析人员快速定位。而vb6的这个dll我只找到了3个符号文件，必须配合非常旧的dll才能正确使用，所以最终也只用上了其中的一个叫做msvbvm60.dbg的文件。当你把他和dll挂接在一起后。IDA就可以进行自动分析，强大分析能力，简直让人佩服的五体投地。直接看截图吧：
  
  就这代码给你反编译的，你都不好意思说看不懂。哈哈。利用F5提供的C代码查看功能，发现有个叫做CalcValue的函数，这个函数居然可以算出来一个license key，然后和你注册表里面的key，一个字一个字的判断，如果相等那么就可以使用这个控件。当我发现这里时，我激动地拿出ollydbg调试了一下，发现果真如此。这个算法咋形容呢？你还能再不负责任一点吗。