[已解决]每执行一次hotkeyset改变粘贴板的内容

xuzhenjun130

有个数组 ["001#","002#","003#"]
怎么样才能设置一个快捷键，按第一次，粘贴板内容是 001#，第二次 002#……依此类推

大绯狼

Dim $a[10]
For $i=0 To 9
        $a[$i]=$i+1
Next

Dim $flag=1
HotKeySet('{f2}','clipchange')

While 1
Sleep(50)
WEnd



Func clipchange()
        If $flag>UBound($a) Then $flag=1
        ClipPut($a[$flag-1]);改变剪贴板
        MsgBox(0,0,ClipGet());剪贴板内容
        $flag+=1
EndFunc

xuzhenjun130

回复 2# 大绯狼


    十分感谢