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

タイトル Re: 受信したバイトデータ
投稿日: 2011/04/23(Sat) 03:53
投稿者Koz
> vBuf(0)=0x30
> vBuf(1)=0x31
> vBuf(2)=0x41
> vBuf(3)=0x38
> これを0x01A8にしたいのです。

バイト型の配列なら

Dim vBuf(3) As Byte
vBuf(0) = &H30
vBuf(1) = &H31
vBuf(2) = &H41
vBuf(3) = &H38
Debug.Print StrConv(vBuf, vbUnicode)
結果:"01A8"

な感じで文字列に出来ます。

MidB でこんな感じで切り出すことも出来ます。

Debug.Print StrConv(MidB(vBuf, 2, 2), vbUnicode)
結果:"1A"

あとは、"&H" を先頭に付加し、CInt などの関数で数値に変換します。

Debug.Print CInt("&H" & StrConv(vBuf, vbUnicode))
結果:424

0x8000 より大きい場合は負の数になるので、正の数として扱う場合は

Debug.Print CLng("&HFFFF")
結果:65535

とします。

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

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