A =&Ha, both will do.

If you can use arrays conveniently.

Dim FileBuffer () is bytes.

Redim FileBuffer( 10) "Your file size.

file buffer(0)= & amp； This is the basic data of 16. .

File buffer (1) =&; bend

file buffer(2)= & amp； bend

file buffer(3)= & amp； bend

file buffer(4)= & amp； bend

file buffer(5)= & amp； bend

file buffer(6)= & amp； bend

file buffer(7)= & amp； bend

file buffer(8)= & amp； bend

file buffer(9)= & amp； bend

file buffer( 10)= & amp； bend

Assign to file

Open the binary file "1.bin" as # 1

Put # 1, file buffer

Close # 1

Just do it.