VB的显示隐藏Start按钮

*模块名称:Start_Module
*模块文件名:Start . bas
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *[br/]私有声明函数FindWindow Lib "user32 "别名" FindWindowA" (ByVal lpClassName为String，ByVal lpWindowName为String)Long

私有声明函数FindWindowEx Lib“user 32”别名“FindWindowExA”(ByVal hwnd 1为Long，ByVal hWnd2为Long，ByVal lpsz1为String，ByVal lpsz2为String)为Long

私有声明函数show window Lib“user 32”(ByVal hwnd为Long，ByVal nCmdShow为Long)为Long

public Function hideStartButton()
'该函数隐藏开始按钮'
our parent & = FindWindow(" Shell _ tray wind "，" ")
our handle & = FindWindow ex(our parent &，0，" Button "，vbNullString)
show window our handle &，0
End函数

public Function show Start Button()
'该函数显示开始按钮'
our parent & = FindWindow(" Shell _ tray wind "，" ")
our handle & = FindWindowEx(our parent &，0，" Button "，vbNullString)

ShowWindow OurHandle&，5
End函数