高手啊,高手,现身吧!我快不行了!!

66i88 66i88 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
'以下是隐藏window开始按扭的代码
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Integer, ByVal nCmdShow As Integer) As Integer
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Integer, ByVal hWnd2 As Integer, ByVal lpsz1 As String, ByVal lpsz2 As String) As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim H, FindClass As Integer
FindClass = FindWindow("Shell_TrayWnd", "")
H = FindWindowEx(FindClass, 0, "Button", vbNullString)
ShowWindow(H, 1)
End Sub
问题:
1.如果不用API,上面的代码应该怎样修改?
2.ClassName 是怎么知道的?比如Shell_TrayWnd,Button.
3.你又是从什么书上知道以上1,2两个答案的?
...全文

相关推荐

评论 1
收藏 已收藏
分享
返回顶部
66i88
VB 16,718 成员 110,520 内容