VB-showwindow函数可以隐藏窗口，但是不能显示

模块1Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongDeclare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As LongConst SW_HIDE = 0Const SW_RESTORE = 9Const SW_SHOW = 5form1Private Sub Command1_Click()Dim hw&, cnt&For i = 0 To List1.ListCount - 1hw& = FindWindow(vbNullString, List1.List(i)) ' ThunderRTMain under VB4rtn = ShowWindow(hw&, SW_HIDE)Next iEnd Sub'list中的内容为确切窗口在任务栏上的标题当隐藏后，再次使用rtn = ShowWindow(hw&, SW_SHOW)隐藏窗口不显示，无效。请问，如何使用可以使得隐藏的窗口重新显示。谢谢 字串2

网友解答：

rtn变量定义了么? 字串5

网友解答：

把显示窗口的具体代码也贴出来看看 字串1

网友解答：

Private Sub Command2_Click()Dim hw&, cnt&For i = 0 To List1.ListCount - 1hw& = FindWindow(vbNullString, List1.List(i)) ' ThunderRTMain under VB4rtn = ShowWindow(hw&, SW_SHOW)Next iEnd Sub显示窗口的代码

字串2

网友解答：

hw& = FindWindow(vbNullString, List1.List(i)) ' ThunderRTMain under VB4查看这个值是不是0

网友解答：

隐藏有效的,当然不是0

字串4

网友解答：

使用sw_show的因为无效所以是0

网友解答：

关键是隐藏的进程估计不能用标题栏的方法寻找句柄。

字串7

网友解答：

Public hw&, cnt&'定义为全局变量，显示时不用再FindWindow了。 字串5

网友解答： 还是不行,隐藏后句柄变了？hw&有值，但是sw_show为空值没有解决我也结贴，比起不给分，不结贴的垃圾好多了。还请以后大家多帮忙。老实说，我看你的代码没有任何问题，是不是你的list1中的窗口标题有问题啊


上一篇：“银花蒜宝”可信吗？
下一篇：有进面试的吗,你们成绩查询后真的都有Y吗 ?我没有哎 ,看来是真的没戏了.