SendKeysステートメントで日本語を送るには？

解決

AT 2003-01-10 10:44:34 No: 105823

SendKeysステートメントで日本語を送るにはどうしたらいいでしょうか
どうしてもわかりませんので、よろしく御願いします

AT 2003-01-10 10:47:43 No: 105824

追加ですが、送ることは出来ますが、文字化けします

Say 2003-01-10 16:04:06 No: 105825

「日本語」とはいわゆる全角文字のことですか？

SendKeysは文字コードを合成するステートメントではありません。
キーストロークを合成するステートメントです。

VBレスキュ-(花ちゃん) URL 2003-01-12 19:36:09 No: 105826

クリップボード経由でSendKeys "^C" ＆ SendKeys "^V" で送って下さい。

ムナ 2003-01-14 23:58:57 No: 105827

SendKey ってくらいだから keyコードしか送れません
日本語は key ではなく文字なので
SendKey で送るというのは根本的に間違っています

やりたいことを詳しく書けば
もっと良いコメントがもらえるものと思われ

AT 2003-01-19 01:42:12 No: 105828

どうもありがとうございます。
したいことはファイルから一行読み込んでテキストボックスに出力するという物です。
クリップボードにコピーする方法ってわからないのですが、教えていただけませんか？

Say 2003-01-19 03:14:33 No: 105829

それって、SendKeys関係ないのでは？
自FormのTextBoxなら、そのまま代入すればいいですし、
自作の別アプリなら、hwnd取得してSendmessageで流し込めばいいでしょう。
自作でない別exeだと、hwndの取得に苦労するかもしれませんが・・・。

hwnd持たないこともあるので、クリップボード経由も有力な方法です。
vbからの利用法なら、Clipboardオブジェクトについて調べてみてください。

ＶＢレスキュ−（花ちゃん） 2003-01-19 08:33:41 No: 105830

質問者の代弁になりますが
>SendKey ってくらいだから keyコードしか送れません

Private Sub Command1_Click()
    Dim Mystr As String
    Mystr = "あいうえお"
    Text1.SetFocus
    SendKeys Mystr
    SendKeys "かきくけこ"
End Sub

このような事も可能です。勿論 SendKeys ステートメントの事ですから
色々と問題はありますが！
結構便利なので昔よく使っていました。（他のアプリにデータを送るのに）

ムナ 2003-01-21 02:54:20 No: 105831

＞SendKeys "かきくけこ"
＞
(‾□‾；)
こいつは驚きです(実験してみてびっくり)
いったいどうなってるんだろう
"か" を送るには
半角/全角 k a 半角/全角と４回送る！？
まったくもって不明
なんか知らんが insartキーが何回か押された後が・・・
(わしのＰＣ insert 押されると画面が光るようにしてあるの
insert いつの間にか間違って押されててむかつくことあるから)

AT 2003-01-23 09:46:59 No: 105832

まずコピペの方ですが、こちらはどんな文字にも対応できました。
しかしクリップボードを使用するというのは汎用性の面でどうかと思いましたので、再びSendKeysでトライしてみたら、なんとかフォーカスをあわすことでできました。
自分はフォーカスを合わせていなかったから駄目だったのですね...
ただし英数字の場合はフォーカスを合わさなくてもOKでした。ややこしいですね。
こうやって考えていくと、日本語を表示するには色々と問題が生じてきます。hwnd取得してSendmessageをする方法についてはまだやっていませんが、またの機会に挑戦しようと思っています。
長い期間をもってレスしていただきありがとうございました。
ようやくスッキリです。
また何かあったらご教授くださいませ。では。

AT 2003-01-23 09:47:16 No: 105833

解決