Question

vb 禁用开始菜单

Private Sub Form_Load()

task = FindWindow("shell_traywnd", vbNullString)
win = FindWindowEx(task, 0, "button", vbNullString)
If Not bswap Then
setparent win, Me.hWnd
showwindow win, 0
'隐藏开始菜单
End If
bswap = Not bswap

End Sub
请问我用这段代码禁用了开始菜单，
可是我开启时遇到了问题private command_click()
if bswap then
setpsrent win ,task
showwindows win,1
end if
end sub
被禁用的开始菜单没有及时显示出来怎么办？还要重启吗？
谁能教我一个不用重启的方法.

问题2.
当 keyascii=91then '开始菜单键值
keyascii=97
当我测试的时候 开始菜单还是出来了！！！
请高手赐教
必须得重启才行！有不重启的办法吗？

Answer 1

尝试在程 式中,Showwindows win,1
以后的下一行中,

刷新一下desktop