UWSCで変数をキー入力

質問

UWSCで変数に応じたキー入力をしたいのですが、
どうすればいいのでしょうか？

たとえば
変数Aが 1 の場合は 01 とキー入力
変数Aが 25 の場合は 25 とキー入力
という感じで、変数Aは１～84までの値を取ります。

これをSELECT文で試してみたのですが、
１～５くらいまでならうまくいくのですが、
さすがに84まであるとエラーがでてしまいます。

SELECT A
CASE 1
KBD(VK_0,CLICK,40)
KBD(VK_1,CLICK,40)
CASE 2
KBD(VK_0,CLICK,40)
KBD(VK_2,CLICK,40)
・
・
CASE 84
KBD(VK_8,CLICK,40)
KBD(VK_4,CLICK,40)
SELEND

↑エラー
二桁目と一桁目で分けて入力すればよさそうですが、
どう処理すればいいのかわかりません。

また、仮に変数が文字列を値として取る場合も、
その文字列をそのままキー入力させるにはどうしたらよいでしょうか？

回答No.1

noname#194317 · ベストアンサー

そういう目的のために、SendStr関数が使えます。そうすれば、いちいちSelect文で切り分ける必要はなくなります。

変数Aが文字列の場合：
SendStr(GETID(GET_ACTIVE_WIN),A)

変数Aが数値の場合：
SendStr(GetId(GET_ACTIVE_WIN),Copy("0"+A,Length(A),2))

とすると、変数Aの内容がアクティブウィンドウに送信されます。ただし一つ注意があって、入力先のエディットボックスなりメモが選択されていないと空振りに終わるので、あらかじめBtn関数で入力したい場所をクリックさせておく必要があります。

お礼

回答ありがとうございます。
とりあえずIF文でうまくいきました。
お教えいただいた方法も試してみたいと思います。