二进制怎么用英语读(1011)

二进制怎么用英语读(1011)

VB打开文件有三种方法:
1.如果读取的是文本型文件(用记事本打开没有乱码的)，就是顺序文件读法：
open app.path & "\index.pps" for input as #1
顺便说，app.path是反回当前程序路径的函数，故不能加引号，如果加了，若无其它错误，程序一定会报文件错误，因它找不到 "app.path\index.pps"这样的路径与文件

2.如果打开的是乱码，写什么完全看不懂(不是英文之类的看不懂，是乱),那就是二进制文件，可以用随机文件或二进制读取。
随机读取，如果知道文件数据存放格式/结构才能用：
open app.path & "\index.pps" for random as #1
二进制文件读取：
open app.path & "\index.pps" for binary as #1

但这open只是打开而已，相当于VB程序与文件建立传输通道，怎么读还是自已写代码。
******
这就是没反应的原因：光建立通道不传输，有何用？
******

具体的请自已参考VB的“文件”章节，这里以一个顺序读取文本文件
c:\a.txt(当然扩展名可以不是.txt,只要内容是文本就行),内容是以下文本：
1234567
abcdefg
I am a boy
我很帅
如果以一行一行顺序读出，可以写如下代码(写在form_load()也行)，有注释：

dim y as integer:y=freefile '取得空闲的文件号
dim ReadData as string '用来放读出的数据
open "c:\a.txt" for input as #y '打开文件
do
if eof(y) then exit do '如果读到文件末就退出此循环
line input #y,ReadData '从文件中读出一行并放入ReadData
msgbox readdata '显示读出的数据
loop
close #y '关闭文件

one zero one one

二进制: binary | binary system | Binary, B, BIN | BIN 应该就是ONE O ONE ONE