wumingjun01 2015-04-25 14:17 采纳率: 100%
浏览 4755
已采纳

使用filestream 输入回车换行

现在在学习输入输出
在学习filestream的时候发现部门使用wirte 写回车换行
具体如下,代码是VB.NET的
Dim fsw As FileStream = New FileStream("C:\stream\1.txt", FileMode.Append, FileAccess.Write)

    Dim msg1 As String = "地点"
    Dim by1() As Byte = System.Text.Encoding.UTF8.GetBytes(msg1)
    fsw.Write(by1, 0, by1.Length)
    Dim by2(1) As Byte’直接写入回车换行的ASCII 值 但是下面发现还是不能实现换行
    by2(0) = 13
    by2(0) = 10
    fsw.Write(by2, 0, by2.Length)‘无法回车换行
    Dim msg2 As String = "\r\n 位置"   ’这里也无法换行
    Dim by3() As Byte
    by3 = System.Text.Encoding.UTF8.GetBytes(msg2)
    fsw.Write(by3, 0, by3.Length)
    fsw.Close()
    fsw.Dispose()

    Dim fsw2 As FileStream = New FileStream("C:\stream\1.txt", FileMode.Append, FileAccess.Write)
    Dim sw As StreamWriter = New StreamWriter(fsw2)
    sw.WriteLine()
    sw.WriteLine("时间")‘这里可以换行
    sw.Close()
    sw.Dispose()
    fsw2.Close()
    fsw2.Dispose()


            我觉得把回车换行写入byte 数组,在使用write 进行写入,应该可以换行了,但是没有效果。另外\r\n  也不能实现...暂时没有C币  所以只希望好心人能帮助我。
  • 写回答

4条回答 默认 最新

  • devmiao 2015-04-25 14:20
    关注

    用不着二进制。
    File.AppendAllText(文件名,字符串)就可以了
    VB不用"\r\n",用VbCrLf

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(3条)

报告相同问题?

悬赏问题

  • ¥15 ansys fluent计算闪退
  • ¥15 有关wireshark抓包的问题
  • ¥15 需要写计算过程,不要写代码,求解答,数据都在图上
  • ¥15 向数据表用newid方式插入GUID问题
  • ¥15 multisim电路设计
  • ¥20 用keil,写代码解决两个问题,用库函数
  • ¥50 ID中开关量采样信号通道、以及程序流程的设计
  • ¥15 U-Mamba/nnunetv2固定随机数种子
  • ¥15 vba使用jmail发送邮件正文里面怎么加图片
  • ¥15 vb6.0如何向数据库中添加自动生成的字段数据。