掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
バイト配列から変数切り出し (ID:100991)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
>>>>>>>>> 正確に動くのですが遅いという欠点がありました。 >>>>>>>>> Dim sName as String * 16 (1バイト文字） >>>>>>>>> sName = "" >>>>>>>>> For i2 = 1 to 16 >>>>>>>>> sName = sName & Chr(buf(i + i2)) >>>>>>>>> Next i2 ? そのような書き方はできないはずですが…。 固定長文字列型である以上、 Dim sName As String * 16 sName = "" sName = sName & "A" sName = sName & "B" のようなコードを書いても、その結果は Space(16) になってしまうでしょうし。 >>> （String） 54 41 42 43 44 45 46 00 (54が頭で00が尻尾 ABCDEF） これをバイナリ全体から探し出すために、InStrB は使えないでしょうか。 '54 41 42 43 44 45 46 00 Dim search() As Byte search = StrConv("TABCDEF" & vbNullChar, vbFromUnicode) Dim pos As Integer pos = InStrB(1, buf, search, vbBinaryCompare) >>> メールが時間的に行き違ったようで失礼しました。 掲示板以外にも、メールでのやりとりがあったのでしょうか? >> ユーザー定義型を使うには１レコードの長さが固定である必要があります。 それは、ランダムアクセスの場合では無いでしょうか。 バイナリアクセスの場合は、そのような制限は無いと思います。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.