第1个回答 推荐于2016-11-10
添加一个时钟写下代码 时钟周期=100
.版本 2
.DLL命令 GetForegroundWindow, 整数型, , "GetForegroundWindow"
.DLL命令 GetWindowText, , , "GetWindowTextA"
.参数 Hwnd, 整数型
.参数 lpString, 文本型
.参数 cch, 整数型
.版本 2
.子程序 _时钟1_周期事件
.局部变量 hwnd, 整数型
.局部变量 窗口标题, 文本型
hwnd = GetForegroundWindow ()
窗口标题 = 取空白文本 (255)
GetWindowText (hwnd, 窗口标题, 255)
_启动窗口.标题 = 窗口标题
有什么不懂的加我QQ 821788778本回答被提问者采纳