Search found 47 matches

by aamii
06 Aug 2018, 22:02
Forum: 请求帮助
Topic: 如何获取VBE中的, 鼠标选中文本?
Replies: 5
Views: 4020

Re: 如何获取VBE中的, 鼠标选中文本?

第一个问题: ^c 第二个问题: F9:: ControlFocus ,VbaWindow3,ahk_class wndclass_desked_gsk ControlSend ,VbaWindow3,{CtrlDown}a{CtrlUp}{Delete},ahk_class wndclass_desked_gsk return 第二个问题是可行的,实际上,你还可以借助vba自身的sendkeys #IfWinActive Microsoft Visual Basic for Applications F9::excel_get().Application.SendKeys( "^g ^a ...
by aamii
06 Aug 2018, 18:50
Forum: 请求帮助
Topic: 如何获取VBE中的, 鼠标选中文本?
Replies: 5
Views: 4020

Re: 如何获取VBE中的, 鼠标选中文本?

建议你插入代码的时候
使用

Code: Select all

Example
by aamii
06 Aug 2018, 18:46
Forum: 请求帮助
Topic: 如何保存Scite的指定的标签( 非激活标签)
Replies: 3
Views: 3427

Re: 如何保存Scite的指定的标签( 非激活标签)

你的意思是: 当前scite打开了10个文件,其中5个是你想要保存的(其中1个是当前激活,4个非激活),另外5个是不相干的。 我有几个建议: 1、当你运行时,所有的都保存一遍,可能误打了另外5个非相关的。 ;运行时保存所有文件 save.all.for.build=1 2、实际上你还得告诉代码,哪些是相关文件(虽然通过查询#include【或者还有include中的include文件】可以获取到) 所以, 你首先要获得一份“相关文件列表” 再看哪些文件需要save,就save一下。(可能scite有支持后台save指定文件)。 即使没有,也很简单:代码循环一遍tabs,如果打开的文件是属于“相...
by aamii
06 Aug 2018, 18:21
Forum: 请求帮助
Topic: 如何直接运行Excel的一段代码?
Replies: 4
Views: 4691

Re: 如何直接运行Excel的一段代码?

cgx5871 wrote:
aamii wrote:在回答你这个问题之前,我比较好奇
debug是vba内置的调试语句,把结果输出到“立即窗口”,假如ahk能调用,你想把结果输出到哪里去呢?
我是想知道ahk调用vbe的格式.
正常调用即可,如:
MsgBox % ox.Application.VBE.ActiveCodePane.TopLine

但是Debug这个可能比较特殊,够呛。
by aamii
06 Aug 2018, 00:04
Forum: 请求帮助
Topic: 如何获取VBE中的, 鼠标选中文本?
Replies: 5
Views: 4020

Re: 如何获取VBE中的, 鼠标选中文本?

第一个问题:
^c
第二个问题:
F9::
ControlFocus ,VbaWindow3,ahk_class wndclass_desked_gsk
ControlSend ,VbaWindow3,{CtrlDown}a{CtrlUp}{Delete},ahk_class wndclass_desked_gsk
return
by aamii
05 Aug 2018, 23:39
Forum: 请求帮助
Topic: 如何保存Scite的指定的标签( 非激活标签)
Replies: 3
Views: 3427

Re: 如何保存Scite的指定的标签( 非激活标签)

虽然不懂什么group add 怎么在scite下用的
我想说,如果你是想“保存当前scite打开的各个tab的文件信息”的话,
你可以试试
scite -savesession:topath.txt
by aamii
05 Aug 2018, 23:38
Forum: 请求帮助
Topic: 如何直接运行Excel的一段代码?
Replies: 4
Views: 4691

Re: 如何直接运行Excel的一段代码?

在回答你这个问题之前,我比较好奇
debug是vba内置的调试语句,把结果输出到“立即窗口”,假如ahk能调用,你想把结果输出到哪里去呢?
by aamii
12 Jul 2018, 00:38
Forum: 请求帮助
Topic: Ahk语法如何在excel中创建一个名称
Replies: 1
Views: 2563

Re: Ahk语法如何在excel中创建一个名称

转用vba的函数方式添加。

Code: Select all

oExcel.ActiveWorkbook.Names.Add("pic", "=" oExcel.range("B1:C5").address())
by aamii
12 Jul 2018, 00:21
Forum: 请求帮助
Topic: 新人求助,为什么这个简单的命令用sendinput就不行?
Replies: 1
Views: 2609

Re: 新人求助,为什么这个简单的命令用sendinput就不行?

sendinput 与send都没有问题吧
不过,上面的代码,最好避免alt组合热键
by aamii
12 Jul 2018, 00:08
Forum: 请求帮助
Topic: 如何多条规则合并
Replies: 1
Views: 1991

Re: 如何多条规则合并

合并为一条代码,不行
如果是多个类似的定义组,比如j k h l之类的进行统一定义,可以试试,意义也不大,还不如直接写

Code: Select all

keyarray:={"!":"","j":"{left down}","k":"{right down}","+":"{shift down}","^":"{ctrl Down}"}
!j::
!+j::
!^+j::
!^j::
!k::
!+k::
!^+k::
!^k::
what2send:=""
loop,parse,A_ThisHotkey
	what2send .=keyarray[A_LoopField]
SendInput % what2send
by aamii
30 Dec 2016, 09:59
Forum: 脚本函数
Topic: 善用ahk,让strokeit在win10下起死回生
Replies: 6
Views: 15429

Re: 善用ahk,让strokeit在win10下起死回生

听说StrokesPlus很强大。
我还在坚持用storkeit,说起来还是因为ahk,我需要一个简单轻便的手势软件就可以。Strokeit很符合我的需求。
by aamii
18 Dec 2016, 01:30
Forum: 脚本函数
Topic: 善用ahk,让strokeit在win10下起死回生
Replies: 6
Views: 15429

善用ahk,让strokeit在win10下起死回生

作为一款优秀的手势软件,Strokeit不再开发,有点小遗憾。 win8、win10下面,Strokeit会在每次划动手势的时候,在任务栏闪动一个“任务栏标签”,基本无法继续用下去。大部分人转向了其他同类软件,比如Strokeplus。 其实最为ahker,可以简单的解决这个。 DetectHiddenWindows,on ;这个也要加上 ^+#s:: ;隐藏Strokeit的闪动任务栏,作者:妖 Process,exist,strokeit.exe WinSet, ExStyle, +0x80, ahk_pid %errorlevel% return 或者你可以做一个Strokeitload...
by aamii
28 Apr 2016, 01:21
Forum: 请求帮助
Topic: 宣告
Replies: 2
Views: 2303

Re: 宣告

这只是规定,

变量名可以含有多达 253 个字符, 并且可以由字母, 数字以及后面的标点组成: # _ @ $

是不能包含空格的。
by aamii
28 Apr 2016, 01:19
Forum: 请求帮助
Topic: DropDownList
Replies: 2
Views: 2273

Re: DropDownList

其他的不说,,,,

Code: Select all

ButtonOutput:
if 
else
return

if 
else
return
代码的结构有问题,
在这个标签下,第一个 if else 结构已经非此即彼,并且return掉了。
第二个if else写等于没写。

这个不属于代码问题,而是一个逻辑顺序的问题了。再琢磨下就ok。
by aamii
23 Apr 2016, 19:48
Forum: 请求帮助
Topic: DropDownList
Replies: 8
Views: 4350

Re: DropDownList

的确是版本的问题,个人建议可以试试新版

Code: Select all

A := "1"
B := "2"
APPLE := "3"
SAMSUNG := "4"
out:=%card1% * %card2%
Send %out%
或者,干脆

Code: Select all

send  % %card1% * %card2%
以上写法在L版上通过,未在v1.0.48.05 Basic版测试。
by aamii
23 Apr 2016, 09:37
Forum: 请求帮助
Topic: DropDownList
Replies: 8
Views: 4350

Re: DropDownList

正常来说,

Code: Select all

obj:={"A":1,"B":2,"Apple":3,"Samsung":4} 
前面的引号,是不需要的。但即使加了,在我的电脑上,也没有显示错。
你试试下面的写法。

Code: Select all

obj:={A:1,B:2,Apple:3,Samsung:4} 
另外,我也不知道你当前在用的ahk版本,或者其他的问题,我建议,你提取官方帮助上面的一段测试一下,看有没有什么错误提示。

Code: Select all

array := {ten: 10, twenty: 20, thirty: 30}
For key, value in array
    MsgBox %key% = %value%
by aamii
23 Apr 2016, 02:08
Forum: 请求帮助
Topic: DropDownList
Replies: 8
Views: 4350

Re: DropDownList

没有明白“出现什么讯息错误”。下面以“输出到Excel”为例。 Gui +AlwaysOnTop ;Gui, +E0x08000000 ;WS_EX_NOACTIVATE = 0x08000000 Gui, Font, S10 C000000 , Tahoma Gui, Show, x131 y91 h153 w321,Test Gui, Font, S09 cFF0000 , Tahoma Gui, Add, Tab, x-2 y0 w325 h153 , Home Gui, Font, S12 c000000 , Verdana Gui, Add, Button, x98 y120 w62...
by aamii
22 Apr 2016, 23:48
Forum: 请求帮助
Topic: DropDownList
Replies: 8
Views: 4350

Re: DropDownList

在代碼頭部做好定義,按您的需求,感覺用兩個數組更閤理

Code: Select all

obj:={"A":1,"B":2,"Apple":3,"Samsung":4} 

Code: Select all

ButtonOutput:
	Gui, Submit, NoHide
	ToolTip % "輸出 = " obj[card1] * obj[card2]
	return
by aamii
17 Apr 2016, 06:56
Forum: 教程资料
Topic: H-TLS分支 - 使用 TLS 实现的多线程
Replies: 2
Views: 15066

Re: H-TLS分支 - 使用 TLS 实现的多线程

严重关注……
by aamii
17 Apr 2016, 06:55
Forum: 请求帮助
Topic: Logoff
Replies: 3
Views: 3439

Re: Logoff

ahk内置了一个命令。

关闭、重启或注销系统。
Shutdown

Go to advanced search