改变该窗口的标题
本题有两个command控件"执行"和"退出",两个label框"label1"和"label2",两个textbox "text1"和"text2"
已有一个模块module1其声明为:
Option Explicit
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
现要在form1命令按钮"执行"的Click事件编写代友,实现下述功能:
调用findwindow,查找指定标题名称的应用程序窗口的句柄:调用setwindowtext,改变该窗口的标题