VB初心者質問スレPart2
588 ：機械屋：
これじゃあ できないよね。
henkanshiro = 128
'Cells(1, 1) = "恥"
Cells(1, 2) = StrConv(Cells(1, 1), henkanshiro)
付録
変換方法（変数henkanshiroの代入値）
1,文字列を大文字に変換する
2.文字列を小文字に変換する
3,文字列の各単語の先頭の文字を小文字に変換する
4,文字列の半角文字を全角文字に変換する
8,文字列の全角文字を半角文字に変換する
16,文字列の全角ひらがなを全角カタカナに変換する
32,文字列の全角カタカナを全角ひらがなに変換する
64,システムの規定のコードページを使用して文字列をUnicodeに変換する。
128,文字列をUnicodeからシステムの規定のコードページに変換する。
「システムの規定のコードページ」ってなんだ？
Unicodeに変換ならこれでできるけどね。
Cells(1, 3) = Hex(AscW(Cells(1, 1)))
henkanshiro = 128
'Cells(1, 1) = "恥"
Cells(1, 2) = StrConv(Cells(1, 1), henkanshiro)
付録
変換方法（変数henkanshiroの代入値）
1,文字列を大文字に変換する
2.文字列を小文字に変換する
3,文字列の各単語の先頭の文字を小文字に変換する
4,文字列の半角文字を全角文字に変換する
8,文字列の全角文字を半角文字に変換する
16,文字列の全角ひらがなを全角カタカナに変換する
32,文字列の全角カタカナを全角ひらがなに変換する
64,システムの規定のコードページを使用して文字列をUnicodeに変換する。
128,文字列をUnicodeからシステムの規定のコードページに変換する。
「システムの規定のコードページ」ってなんだ？
Unicodeに変換ならこれでできるけどね。
Cells(1, 3) = Hex(AscW(Cells(1, 1)))
|
|
|