No.2ベストアンサー
- 回答日時:
256 で割った商とあまりをBYTEまたはcharで出力すれば良いと思いますが。
これだけではあんまりなので、出力順の URL を張っておきます。
http://ja.wikipedia.org/wiki/%E3%82%A8%E3%83%B3% …
早速のご回答ありがとうございます。
・256 で割った商とあまりをBYTEまたはcharで出力する
方法で試したいと思います。
また、バイトオーダーについてのURLとても参考になりました。
ありがとうございます。
No.4
- 回答日時:
サンプルです。
下にLongToByteArray関数がありますが、バイト配列を返却する関数となっています。
実際にご使用されるデータは、もっと長いデータだと思いますので、必要に適した状態に応用し、バイト配列を作成してください。
そのデータをバイナリファイルに保存するだけです。
VBでは「unsigned short」→「BYTE」に置き換えることが多いです。
別の方法としては、unsigned shortとしての値の操作をするためにロング変数を用意し、その変数はあくまでポインタとして利用して、中身にAPIで値を操作することも可能です。
Option Explicit
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByVal Destination As Long, ByVal Source As Long, ByVal Length As Long)
Sub Main()
Dim l_lngWk As Long
Dim l_bytWk() As Byte
l_lngWk = 65525
'バイト配列化(全体の4バイトの場合)
l_bytWk = LongToByteArray(l_lngWk, 0, 4)
'バイト配列化(上位の2バイトの場合)
l_bytWk = LongToByteArray(l_lngWk, 2, 2)
'バイト配列化(下位の2バイトの場合)
l_bytWk = LongToByteArray(l_lngWk, 0, 2)
'バイナリ保存
Call SaveFile("C:\Binary.data", l_bytWk)
End Sub
'引数のロング変数をバイト配列化
'p_lngBuff :ロングのバッファ
'p_lngStart :開始位置
'p_lngLength :長さ
Function LongToByteArray(ByVal p_lngBuff As Long, ByVal p_lngStart As Long, ByVal p_lngLength As Long) As Byte()
Dim l_bytRet() As Byte
ReDim l_bytRet(p_lngLength - 1)
Call CopyMemory(VarPtr(l_bytRet(0)), VarPtr(p_lngBuff) + p_lngStart, p_lngLength)
LongToByteArray = l_bytRet
End Function
'バイナリ保存
Sub SaveFile(ByVal p_strPath As String, p_bytBuff() As Byte)
Dim l_adoSt As Object
Set l_adoSt = CreateObject("ADODB.Stream")
l_adoSt.Type = 1 'バイナリ指定(ADODB.StreamTypeEnum.adTypeBinary)
l_adoSt.Open
l_adoSt.Write p_bytBuff
l_adoSt.SaveToFile p_strPath, 2 '新規作成指定(ADODB.SaveOptionsEnum.adSaveCreateOverWrite)
l_adoSt.Close
Set l_adoSt = Nothing
End Sub
No.3
- 回答日時:
★補足要求します。
・変数 long 型の値を下位 16 Bitだけを 2 バイトの情報として出力するのですか?
・それとも、上位 16 Bit、下位 16 Bitをそれぞれ 2 バイトの情報× 2 回として出力するのですか?
・さらにバイトオーダーは『ビッグ・エンディアン』か、『リトル・エンディアン』かどのようにしますか?
・単純な方法ならば、変数 short 型に long 型の下位(上位) 16 Bitを AND 処理した値を代入します。
その変数(short型)をバイナリ出力すれば良いと思いますが…。
・以上。おわり。
早速のご回答ありがとうございます。
・変数 long 型の値を下位 16 Bitだけを 2 バイトの情報として出力します。が、VBAなのでShort型自体がなくて困っておりました。
・バイトオーダーについては、対象のCPUタイプを設定する仕組みが別途ありますので、それを基に『ビッグ・エンディアン』か、『リトル・エンディアン』を判別します。
No.1
- 回答日時:
> 0~65525の値を2バイトの情報(VCでいうunsigned shortの型)として
> バイナリファイルに出力する。
要するに、「&H0000」~「&HFFFF」が出力されれば良いんですよね?
Integerで「0」~「32767(&H7FFF)」と、
「-32768(&H80000)」~「-1(&HFFFF)」を
出力すればよさそうですけど・・・
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 電気工事士 来月から電気管理技術者のお仕事を始める者です。東京電力パワーグリッドへ情報提供の依頼をする方法がTE 1 2022/06/27 06:48
- Access(アクセス) Accessテーブルの結合で別々のテーブルのフィールドを組み合わせて値を出す方法について 2 2022/07/20 19:43
- PHP php 確認表示画面で値をSESSIONから取り出す理由の解釈は正しいでしょうか? 1 2023/06/09 17:39
- その他(コンピューター・テクノロジー) exFATの外付けSSDからパソコンのNTFSの内蔵ストレージにコピーした場合はコピーしたデータのハ 2 2023/08/09 19:51
- C言語・C++・C# c言語の問題です 2 2023/07/21 10:51
- その他(プログラミング・Web制作) awkの文字列比較はPOSIXロケールまたはCロケールにおいてバイナリ値の比較に使えるか gawkな 1 2023/04/22 09:21
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- JavaScript javaScriptで画面に値を入れるには 1 2022/08/14 12:27
- Visual Basic(VBA) 【マクロ】表への繰り返し転記について 1 2022/11/19 16:30
- Excel(エクセル) 【エクセル」 特定のセルで条件抽出した列を、別シートに上から詰めて表示したい。 8 2022/04/08 16:00
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
テキストファイルを後ろから読...
-
C言語でのファイル読み込み
-
CSVファイルによる検索の高速化
-
Mscomm を使用してバイナリでデ...
-
バイト型のデータを16進表記で...
-
グレースケール画像の画素値を得る
-
awk getlineをもう一度ファイル...
-
Unicodeのファイル読み込みがう...
-
日本語を配列に収め、そして表...
-
VBScriptの配列は、要素数を指...
-
VBAでテキストファイルの改行を...
-
隣接行列プログラム
-
掲示板の編集機能
-
ファイルのアクセス回数について
-
バッチファイル 二つ上のディ...
-
エクセルで複数のコメントのサ...
-
エクセルvbaでdocuworksprinter...
-
エクセルのプロパティーでセキ...
-
バッチファイル XCOPYで上書き...
-
Windows10でコマンドプロンプト...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
バイト型のデータを16進表記で...
-
VBAでテキストファイルを複数開...
-
RGBのバイナリデータをCImageに...
-
VBAでテキストファイルの改行を...
-
DXFファイルをVBで取り込み、図...
-
[VBS] 16進数でバイナリファイ...
-
ファイル内の(&H0A)を(&H0D0A)...
-
ファイルをメモリに出力する方法
-
テキストファイルを後ろから読...
-
Cで2次元配列にCSVファイルを...
-
ファイル入力のデータを構造体...
-
Excel VBAで画像解析
-
VBScriptの配列は、要素数を指...
-
ファイルからビット単位での読...
-
fread関数の使い方がわかりませ...
-
awk getlineをもう一度ファイル...
-
バイナリファイルでOutOfMemory...
-
VBSにてCSV読み込みし比較
-
バイナリファイルの一部分をカ...
-
日本語混じりのファイルをラン...
おすすめ情報