タイトル | : Re^5: アスキーを10進表示するには? |
記事No | : 14724 |
投稿日 | : 2010/05/28(Fri) 20:01 |
投稿者 | : 魔界の仮面弁士 |
> > それとも、"0"〜"9","A"〜"F" の文字を16進数とみなして、 > > 10進数の 0〜9,10〜15 にしたいということでしょうか? > その通りです。 最初の質問時に、そう書いておかないと通じませんよ。(^^;
"A" を 10 に変換したいなら、CLng("&HA") で 10 になります。 つまり、得られた文字の先頭に "&H" の文字を繋げてから、 それを数値化すれば OK です。
もしくは、既に >> "0"〜"9" なら 48〜57、 >> "A"〜"Z" なら 65〜90、 である事が分かっているのですから、中身が "0"〜"9","A"〜"F" なら Select Case bRcvData(1) Case Asc("0") To Asc("9") '48 To 57 data = bRcvData(1) - Asc("0") Case Asc("A") To Asc("Z") '65 To 70 data = bRcvData(1) - Asc("A") + 10 End Select のように処理するという手も一応あります。
あるいは、その得られた "A" や "F" などに対して、 S = Chr(bRcvData(1)) data = InStr("0123456789ABCDEF", S) - 1 という手もあります。この場合、S が "A" の場合、data は 10 になります。
|