• 締切済み

16進コード文字列を文字列に変換

VB6を使用して 16進コード"88DC52A9" を "補助" に変換することはできないでしょうか。 技術的に初心者なものでよろしくお願いいたします。

みんなの回答

noname#140971
noname#140971
回答No.3

補足: もう少し具体的に・・・。 [イミディエイト] ? HStr("88DC") 補 ? XStr("&H" & "88DC") 補 Public Function HStr(ByVal HEXDATA As String) As String   HStr = ChrW("&H" & HEXDATA) End Function Public Function XStr(ByVal CCODE As Long) As String   XStr = ChrW(CCODE) End Function HStr()、XStr()とのどっちを採用するのかは好みの問題だと思います。

m-sugiyasu
質問者

お礼

Husky2007さん、ありがとうございました。

  • redfox63
  • ベストアンサー率71% (1325/1856)
回答No.2

そのコードがUnicodeの文字列ならば dim s1 as string, ss as string, n as integer s1 = "88DC52A9" for n = 0 to 1 ss = ss & ChrW( Val( "&H" & mid( s1, n * 4 + 1, 4 ) ) ) next print ss といった具合で変換できるでしょう ・・・

m-sugiyasu
質問者

お礼

redfox63さん、ありがとうございました。

noname#140971
noname#140971
回答No.1

[イミディエイト] ? CarW(&H88DC) 補 ? ChrW(&h52A9) 助 CarW()が使えると思いますよ。

m-sugiyasu
質問者

お礼

Husky2007さん、ありがとうございました。

関連するQ&A

  • コード変換について

    はじめまして VB初心者です。 以下のような処理を行いたいのですがご教授願います。 項目A(漢字10文字)があります。 項目Aの中には外字で作成した漢字が埋もれています。 項目Aを参照し、そこにある外字コードを判断し 別の外字コードに変換したい。 ロジック的には1文字(2バイト)を読み込み 外字をバイナリ判定して別のコードに置き換えする 処理をしたい。 当方vb6.0ですが 定義の方法、ロジックなど教えていただければ幸いです。

  • vb.net で文字コード変換

    VB.netで 文字列の文字コードを変換する方法を教えてください。

  • .NET 文字コードの変換

    VB2008で文字列を他の文字コードにする方法が知りたいです。 何かしての部分がわかりません。 VB2005でも使えるものだったらうれしいです。 Dim str_sjis as string Dim str_euc as string = "パソコン" '例えばEUC-JP '''何かして str_sjisにシフトJISで文字列が入っている。 .Netの文字コードの変換の仕方がごちゃごちゃして分かりづらいです。

  • Excel でASCII文字列を16進コードへ変換

    Excel でA1セルに、 A1セル:”1234” という半角英字の文字列が入力されています。 これをすべてASCIIコードへ変換したいのですが、 何か方法はありますでしょうか? 結果は、 A2セル:”49505152” となることを想定しています。 私なりに調べたのですが、 =CODE(MID(A1,1,1)) & CODE(MID(A1,2,1)) & CODE(MID(A1,3,1)) & CODE(MID(A1,4,1)) なら、期待した結果になっておりましたが、 文字数が多い場合にかなり不効率でした。 他の方法をご教授ください。

  • VBで文字コード変換

    LAN環境で、クライアントからサーバー上のデータをFTPで取得する為にVB6で『Microsoft Internet Transfer Control』を使用してファイルをGETしています。 トコロがこのサーバーがIBMのメインフレームの為、文字コードがEBCDICなのでGETしたファイルをPCで読む(目で)事が出来ません。 これをEBCDICからASCIIに簡単に変換する方法は無いでしょうか? 又、逆の変換もしたいのですが。

  • 文字列変換

    添付図をご覧ください。 範囲 A1:B6 に英語の人名が入力されています、。 セル A7 に式 =SUBSTITUTE(A1," ","") を入力して、此れを右および下方にオートフィルしたものを範囲 A7:B12 に示しています。 此処で質問ですが、最初に下表に示すスペースなしの文字列データがあった場合、此れを上表に示すデータに変換する数式を教えてください。 マクロ音痴の私のために、どうか数式でお願いします。 数式が短くなるなら、配列数式でも構いませんが、補助列(行)等を使用しないことを希望いたします。

  • 文字コードの変換 これは何の文字コードですか?

    文字コードで ¥ が %C5 に変換される文字コードって どんな文字コードなのでしょうか 

  • 文字列を文字コードの数値に変換する方法

    JISコードの日本語を含む文字列を、文字コードの数値に変換する方法がわからなくて困っています。とりあえずは文字列ではなく、1文字だけ変換することを目指してord関数を使ったんですが、1バイト文字はうまくいったのですが、2バイト文字だと思うような結果になりませんでした。 例)以下のように変換したいです。 「a」→「97」 「あ」→「9250」 どなたかいい方法や関数をご存じないでしょうか? ちなみに下記のように片っ端から試してみたのですが、思うような結果が得られませんでした。 $buf = mb_convert_encoding($_POST["string"], "JIS", "EUC-JP"); $jis_code1 = ord("$buf"); $jis_code2 = bin2hex("$buf"); $jis_code3 = urlencode("$buf"); $jis_code4 = intval("$buf");

    • 締切済み
    • PHP
  • 文字列を配列に…。

    VBはまだ始めたばかりで本当に初歩的なことかもしれませんが分かる方がおられたら是非教えて下さい。 text1.textから取り込んだ文字列を”一文字ずつ”(Dim a(100) as stringで宣言した)配列に格納したいのですがどうしたらいいのでしょうか?? <例>text1.textに"abc"と入力しcommandbuttonを押すとa(0)に"a"がa(1)に"b"がa(2)に"c"が格納されるといったかんじです。 ちなみに今私がしたいのはtext1.textに、ある文字列を入れその文字列を文字コードに変換しそれを一文字分ずつ+1してまたそのコードを文字に直しtext2.textに出力するというものです(ようは簡単な暗号化ですね)。 私はAscとChrコマンドを利用して1文字ずつコードをずらしていこうと思っているのですが、他に良い方法などあるのでしょうか?? 本当に初心者でどのようにしらたよいのか分かりません…。 どなたか分かりやすく教えていただけませんでしょうか?? お願いします。

  • 文字コードの変換方法

    お世話になります。 サーバ上で生成した、文字コードがEUCのテキストファイルをSJISに文字コードを変換したいのですが、nkfコマンドが使用できません。 nkfコマンドを使用せず、EUC⇒SJISへ文字コードを変換する方法をご教示頂けますでしょうか。 また文字コードを変更すれば改行コードの変更はしなくてもいいのでしょうか。 宜しくお願い致します。

専門家に質問してみよう