[已解决]如何使窗体正常显示

向前650809

各位网友好
现有一窗体，窗体中一按钮，点击后使窗体最小化，现不想最小化，正常显示
控制最小化的代码可能是下面的代码
Dim hWndForm As Long
hWndForm = FindWindow("ThunderDFrame", Me.Caption)
CloseWindow hWndForm
这些代码，各行何意，要使运行后，窗体正常显示，如何修改代码
请指导
谢谢

是不是删去这些代码，点击按钮后，窗体仍正常显示。

最佳答案

月排行榜 / 总排行榜

zjdh

2012-1-2 16:41

给你一些我收集的例子：
窗体最大最小化.rar (25.86 KB, 下载次数: 30)

2012-1-2 16:41 上传

点击文件名下载附件

跳转到最佳答案楼层

zjdh

给你一些我收集的例子：
窗体最大最小化.rar (25.86 KB, 下载次数: 30)

2012-1-2 16:41 上传

点击文件名下载附件

qzc804030

zjdh 发表于 2012-1-2 16:41
给你一些我收集的例子：

学习了!谢谢朋友了!

happym8888

Dim hWndForm As Long
hWndForm = FindWindow("ThunderDFrame", Me.Caption)
CloseWindow hWndForm
其中CloseWindow hWndForm意思是关闭该窗体，把这句代码行前面加注释符“'”即可。（前面加单引号或直接删除）

ztccsj

zjdh 发表于 2012-1-2 16:41
给你一些我收集的例子：

学习