Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
inkeditで全て英語に認識させたい。
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=30592#CommentId84408
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
snowmansnow
 (社会人)
投稿日時
2021/2/23 18:34:10
こんばんは、
普段は、るきお様達に教えてもらっている者です。
IMEをインストールしていると、それらの言語で認識できますが、
日本語環境では、英語も自動でインストールされてると、何かで見た事があります。
参考までに、自分の環境の認識エンジンを列挙されると宜しいと思います。
Dim recto As String
Dim recos As New InkRecognizers
For i = 0 To recos.Count - 1
recto = recto & vbCrLf & recos.Item(i).Name
Next
MsgBox recto
ユニコードで???の表示になるものは、セルにコピーすると読めると思いますし、
ユニコード表示のMSGBOXで検索すると、解決方法があると思います。
次にインストールされている各種言語の指定は、上記で確認したインデックス指定か、
LCIDという国別の数値の指定で、選択できます
Dim recosj As IInkRecognizers
Set InkEdit2.Recognizer = recos.Item(0)
Set InkEdit3.Recognizer = recos.GetDefaultRecognizer(&H409)
MsgBox InkEdit2.Recognizer.Name
MsgBox InkEdit3.Recognizer.Name
'https://www.kanaya440.com/contents/script/vbs/others/lcid.html
よかったら試してみて下さい。