• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:4.1.1
软件大小:45M
更新时间:2025-09-09

按键精灵iOS版
立即下载

软件版本:2.4.2
软件大小:29.2M
更新时间:2025-09-24

按键手机助手
立即下载

软件版本:4.4.1
软件大小:242M
更新时间:2025-09-09

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[已解决] 求助,如何让输入窗口显示在屏幕最前? [复制链接]

1#
SetSimMode 2

// 获取拆分数
Dim splitCount
splitCount = InputBox("请输入需要拆分成几单:", "拆分数量", "2")
If splitCount = "" Then
EndScript
End If

每次运行后都在任务栏那呆着,需要点击任务栏才能显示输入窗口,哪位高手帮看下,感谢。

2#

anjian.com官网右侧有各类群,欢迎加群后和其他用户一起交流。

3#

SetSimMode 2

// 获取拆分数
Dim splitCount
splitCount = InputBox("请输入需要拆分成几单:", "拆分数量", "2")
If splitCount = "" Then
EndScript
End If......
easecloud 发表于 2025/10/19 9:57:01
BeginThread ()
Dim splitCount
splitCount = InputBox("", "", "2")
If splitCount = "" Then
EndScript
End If
Sub ()
Do
Hwnd = Plugin.Window.Find(0, "")
TracePrint Hwnd
If Hwnd>0 then
Call Lib.API.(Hwnd)
Call Plugin.Window.Top(Hwnd, 0)
Exit Sub
End If
Delay 1000
Loop
End Sub

收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
4#

感谢超版,但是还是不行。可能我系统不对?

发新话题 回复该主题