vb做的exe鼠标消失是咋回事

vb6.0生成的 vb.exe，在一般窗口中操作没问题，但是在游戏程序运行时，鼠标移动到 vb.exe的窗体form上时就看不见鼠标指针了，移出form就又显示鼠标指针，这是怎么回事？vb.exe里面有注册热键，启动计时器，发送posetmessage等代码。没有关于控制鼠标的代码

---

启动计时器，发送posetmessage
加上doevents语句

---

加了好多doevents还是不行。这个游戏叫倚天剑与屠龙刀。不开这游戏的话我的vb.exe是正常的

---

看看这个对你有用不
VB code:
Option Explicit
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
'【操作系统】
'Win9X: Yes
'WinNT: Yes
'【说明】
' 控制鼠标指针的可视性
'【返回值】
' Long，显示计数（参考注解）
'【其它】
' windows维持着一个内部显示计数；倘若bShow为TRUE，那么每调用一次这个函数，计数就会递增1；反之，如bShow为FALSE，则计数递减1。只有在这个计数大于或等于0的情况下，指针才会显示出来
'【参数表】
' bShow ---------- Long，TRUE（非零）显示指针，FALSE隐藏
Private Sub Command1_Click()
Dim intP As Integer
If Command1.Caption = "隐藏鼠标" Then
intP = ShowCursor(False) '隐藏鼠标
Command1.Caption = "显示鼠标"
Else
intP = ShowCursor(True) '显示鼠标
Command1.Caption = "隐藏鼠标"
End If
End Sub

---

这是游戏程序在作怪。当其未得到焦点时HIDE鼠标。

---

有可能是游戏与你程式冲突。

---

ShowCursor　　函数功能：该函数显示或