vbnet读dat VBNET下载

vb.net 二进制读取文件

VB.NET打开二进制文件用fileopen完成，打开二进制文件的形式为：openmode.binary

读取二进制文件用的是fileget方法，写入二进制文件用的是fileput方法。

应用示例：将一批随机数保存在一个dat文件中，然后再将其提取到文本框中。

二进制文件的读写一批随机数的存取，程序为：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim x, i, fn As Integer

Dim s As String = ""

fn = FreeFile()

FileOpen(fn, "d:\data.dat", OpenMode.Binary)

For i = 1 To 8

x = Int(Rnd() * 100)

s = s + Str(x)

FilePut(fn, x)

Next

FileClose(fn)

TextBox1.Text = s

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim x, fn As Integer

Dim s As String = ""

fn = FreeFile()

FileOpen(fn, "d:\data.dat", OpenMode.Binary)

Do While Not EOF(fn)

FileGet(fn, x)

s = s + Str(x) + " "

Loop

FileClose(fn)

TextBox1.Text = s

End Sub

相关问答

Q1: VB读取dat文件内容到text文本框以及保存文本框内容到dat文件中

VB读取dat文件需要看dat文件是如何写成vbnet读dat的vbnet读dat，通常应该是以二进制方式来读取。用Get语句来将数据从文件读到变量中。

同样将数据写入dat文件也应使用二进制方式写，用Put语句实现。

以下是Get语句和Put语句的使用实例：

Option Explicit

    Private Type Record   ' 定义用户自定义的数据类型。

        ID As Integer

        Name As String * 20

    End Type

'读取数据

Private Sub Command1_Click()

    Dim MyRecord As Record, Position   ' 声明变量。

    ' 为随机访问打开样本文件。

    Open "C:\TESTFILE.dat" For Random As #1 Len = Len(MyRecord)

        ' 使用 Get 语句来读样本文件。

        Position = 5   ' 定义记录号。

        Get #1, Position, MyRecord   ' 读第三个记录。

    Close #1

    Text1.Text = MyRecord.ID

    Text2.Text = MyRecord.Name

End Sub

'写入数据

Private Sub Command2_Click()

    Dim MyRecord As Record, RecordNumber   ' 声明变量。

    ' 以随机访问方式打开文件。

    Open "C:\TESTFILE.dat" For Random As #1 Len = Len(MyRecord)

        For RecordNumber = 1 To 5   ' 循环五次。

            MyRecord.ID = RecordNumber   ' 定义 ID。

            MyRecord.Name = "My Name"  RecordNumber   ' 建立字符串。

            Put #1, RecordNumber, MyRecord   ' 将记录写入文件中。

        Next RecordNumber

    Close #1

End Sub

扩展名是DAT的文件并不是一种标准文件。许多软件都使用这个扩展名，但文件含义不同。而许多数据分析软件也用这个扩展名保存数据。所以这要看具体的软件情况来定。DAT文件，可以按照扩展名来看就是DATA的意思，即数据文件，这类文件并没有进行绝对化的定义，例如VCD光盘中的DAT文件就可以用一般的视频播放器打开，而QQ的DAT文件中则存储vbnet读dat了用户信息，是无法使用常规方式打开的，只有QQ程序可以访问。还有一些其他程序都有自己对DAT文件的定义，要通过其特殊的程序来打开与之相关联的DAT文件。

参考：

Q2: VB.net 如果读取txt数据(或十进制dat数据)

vb.net虽也有input语句vbnet读dat，但一次只能读取到一个变量中，可以用TextFieldParser类代替，但似乎没以前vbnet读dat的方便。不过比以前vbnet读dat的更灵活。写入文件Write还是可以用，在Microsoft.VisualBasic.FileIO中。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim fileName As String = "E:\User Documents\Master\My Documents\电子阅读\股票\table2.csv"

        Using Recrods As New Microsoft.VisualBasic.FileIO.TextFieldParser(fileName) '建立TextFieldParser对象

            'MyReader.TextFieldType = FieldType.Delimited

            Recrods.SetDelimiters(",") '把字段分隔符设置为","

            Dim curRow() As String

            Do Until Recrods.EndOfData

                curRow = Recrods.ReadFields() '读取记录行，返回字符串数组，所以不同字段类型需要自己转换。

                Debug.Print(Join(curRow, vbTab))

            Loop

        End Using

    End Sub

关于vbnet读dat和VBNET下载的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。