请问要怎么样才能在自己写的程序运行时让用户无法使用开始菜单？

Question

改 c:\windows\system.ini 中的
shell="yourapp.exe"

Answer 1

我有delphi的代码能够实现，可以vb我不用：（

Answer 2

先加入如下声明：
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function EnableWindow Lib "user32" (ByVal hwnd As Long, ByVal fEnable As Long) As Long
Dim GW As Long然后在需要隐藏开始菜单时执行如下代码：
GW = FindWindowEx(FindWindow("Shell_TrayWnd", ""), 0, "Button", "")
EnableWindow GW, 0而在需要显示开始菜单时执行如下代码：
EnableWindow GW, 1可以给我加分吗？

Answer 3

我试了，可以的给fanzai（帆仔）加分吧

Answer 4

to poweruser(天使的眼睛和魔鬼的心):
谢谢你！但是我怎么没有见到分数？是不是你不知如何加分？还是你在跟我开玩笑？…………$%@#$&@#

Answer 5

呵呵，给你一段delphi代码吧，它可以达到要求，可惜我不会vb：（
Procedure DisableStartButton;
begin
 ShowWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil), SW_HIDE);
 Windows.SetParent(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil), GetDesktopWindow);
end;

Answer 6

    fanzai(帆仔)你的代码我试过了，很感谢你的帮助，但是正如上面别的朋友说的一样，你的方法没有让热键也一起失效，所以用户还是可以使用开始菜单。我是希望用户完全没有办法使用开始菜单（包括热键的应用在内）。希望你帮我想一下，因为我想完全禁止开始菜单的应用！谢谢能帮助我的朋友了！等这个问题解决了后我会给你分的，一定！

Answer 7

是在抱歉，这是我的失误！以下是更正后的程序。
先加入如下声明：
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Const SW_HIDE = 0
Const SW_RESTORE = 9
Dim SW As Long, SB As Long然后在需要隐藏开始菜单时执行如下代码：
SW = FindWindow("Shell_TrayWnd", "")
SB = FindWindowEx(SW, 0, "Button", "")
ShowWindow SB, SW_HIDE
SetParent SB, Me.hwnd而在需要显示开始菜单时执行如下代码：
ShowWindow SB, SW_RESTORE
SetParent SB, SW这回应该不会有问题了。

Answer 8

wwsas(韩柏)，怎么见不到你了？去哪了？

Answer 9

    fanzai(帆仔)不好意思这两天比较忙没能来给你加分，谢谢你帮我的这个忙，十分的感谢，希望以后我们会在别的方面互相补助。