自動化ツールuwsc使いよ集まれ

自動化ツールuwsc使いよ集まれ at SOFTWARE

246:名無しさん＠お腹いっぱい。
06/01/02 18:06:41 82Cnd7xG0
>>244

FukidasiI("ウィンドウを選んでアクティブにしてください")
id= GetID("GET_ACTIVE_WIN")
While id = GetID("GET_ACTIVE_WIN")
　Sleep(0.1)
　Wend
Fukidasi("行きます")
Sleep(1)
Fukidasi()

Dim NumKeytbl[10]=VK_0,VK_1,VK_2,VK_3,VK_4,VK_5,VK_6,VK_7,VK_8,VK_9
For i=1 to 20
　c0= i mod 10
　c1= int(i/10)
　If c1>0 Then kbd(NumKeyTbl[c1])
　Kbd(NumKeyTbl[c0])
　Next

次ページ

続きを表示

1を表示