正常に漢字が変換されれば、"金"と出力されるが下記のロジックでは、
"プロシージャの呼出し、または引数が不正です"のメッセージが出力されてしまいます。
漢字で"金"とbbb変数に出力したいのですがどうすれば変換できるのでしょうか?
Dim aaa(1) As Byte
Dim bbb As String
Private Sub Form_Load()
aaa(0) = &H8B
aaa(1) = &HE0
bbb = Chr(aaa(0) & aaa(1))
End Sub
演算子"&"は文字列連結演算子です。
目的の結果を得るには Chr$(aaa(0)*&h100& or aaa(1)) ではありませんか?
ガッさんのおかげで解決しました。ありがとうございました。
ツイート | ![]() |