毕业论文

打赏
当前位置: 毕业论文 > 电子通信 >

基于VB.NET的辐射报警仪上位机管理软件设计(12)

时间:2017-02-08 13:10来源:毕业论文
Write:写入一个字符或字符串到文件中,此方法并不会让文件中的字符换行; WriteLine:写入一个字符或字符串到文件中,此方法会让文件中的字符换行; Fl


Write:写入一个字符或字符串到文件中,此方法并不会让文件中的字符换行;
WriteLine:写入一个字符或字符串到文件中,此方法会让文件中的字符换行;
Flush:清理当前编写器的所有缓冲区,并使所有缓冲数据写入基础流。
本程序中实现读取文件内容运用了通用过程WriteToFile。通用过程WriteToFile里面用到了Try...Catch语句,Try语句里面定义了fs为FileStream类,使用FileStream类可以对文件系统上的文件进行读取、写入、打开和关闭操作。然后定义了sw为 StreamWriter类。调用了StreamWriter的Flush方法,清理缓冲区,并使所有缓冲区数据写入基础流。最后调用StreamWriter的Close方法。
相关读写数据的程序如下:
     Private Sub WriteToFile(ByVal CurruntTime As String)
          Try
              If (Status = False) Then
                  FileName = Strings.Replace(("\" & Mid(CurruntTime, 2)), "/", "_")
                  FileName = Strings.Replace(FileName, ":", "_")
                  FileName = Trim(FileName)
              End If
              Dim fs As New FileStream(SavePath & FileName & ".TXT", FileMode.Append, FileAccess.Write)
              Dim sw As StreamWriter = New StreamWriter(fs)
              sw.Write(Trim(ReceiveBuff & "F" & "   " & CurruntTime))
              Count = Count + 1
              sw.Write(Chr(13))
              sw.Write(Chr(10))
              sw.Flush()
              sw.Close()
              Status = True
          Catch ex As Exception
              MessageBox.Show("Please set saveing Path frist!", "Prompt")
          End Try
End Sub

   如图2-1表示上位机软件编程实现的流程图。
图2-1上位机软件编程实现的流程图
4 数据的处理
4.1 存取文件
   存取文件必须要有接口让用户可以选择及填入欲存放的位置,也必须让用户可以选择欲打开的文件;这些操作可以自行设计接口来完成,但比较简便的方法是选择使用Visual Basic.NET内置的对话框,这些内置的对话框提供一致的操作接口,所有的用户大概都会对Windows的操作接口感到熟悉,而且就设计者来说可以省掉很多时间。
4.1.1 文件的保存
在Visual Basic.NET中的数据存取统称为I/O(Input/Output),和输入/输出相关的类集中在System.IO命名空间。数据存储位置可以是字符串、一般的文件、内存或是网络上的Socket端点。
要将由串行端口取得的数据存放到文件中,首先就必须了解文件对象的创建。 基于VB.NET的辐射报警仪上位机管理软件设计(12):http://www.751com.cn/tongxin/lunwen_2658.html
------分隔线----------------------------
推荐内容