采用文本方式还是采用二进制方式.txt

来自「VB技巧问答10000例 VB技巧问答10000例」· 文本 代码 · 共 17 行

对 于 读 文 件 的 问 题 ， 由 于 你 要 读 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>