tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^5: アスキーを10進表示するには?
投稿日: 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 になります。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。