📄 采用文本方式还是采用二进制方式.txt
字号:
对 于 读 文 件 的 问 题 , 由 于 你 要 读 EOF, 所 以 必 须 使 用 For Binary方 式 。 读 时 采 用 这 样 的 方 法 :
Dim s As String
Open "C:\test" For Binary As 1
s = Space(100)
Get #1, , s
你 可 以 随 意 设 置 Space()的 参 数 , 以 决 定 读 入 多 少 个 字 节 。 不 过 vb6限 制 字 符 串 不 能 超 过 64K, 所 以 如 果 文 件 大 小 超 过 64K, 你 需 要 分 几 次 读 入 。
对 于 写 文 件 , 如 果 你 不 希 望 print #加 入 会 车 换 行 符 , 可 以 在 Print #语 句 后 面 加 上 分 号 , 如 :
Print #1, s;
你 也 可 以 使 用 Put语 句 :
Dim s As String
s = "ABCDEFG"
Open "c:\test" For Binary As #1
Put #1, , s
Close #1
这 样 写 的 文 件 不 会 出 现 你 说 的 多 4个 字 节 的 问 题 。 至 于 同 名 文 件 的 问 题 , 你 可 以 在 写 文 件 前 , 使 用 Kill语 句 先 删 除 原 文 件 。
<END>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -