从文件中读取特定字节数据

本文关键字:字节 字节数 数据 文件 读取 | 更新日期: 2023-09-27 18:02:10

我有一个8mb的文件,其中包含一些记录。我想从一个特定的地方读取一个特定的记录。我有文件中每条记录的起始和结束字节索引。

我的问题是如何使用文件对话框来选择特定的文件,并使一个函数读取文件,然后在文本框中存储特定的记录。

我也对如何在所有文本框中同时读取所有记录有疑问。

从文件中读取特定字节数据

首先,我需要我的文件值的索引假设product id =id09876543 location =india那么索引id09876543的值是"12至23 "然后在函数调用中传递12和23。

  1. 创建一个名为read_value的用户定义函数;以整数形式传递2参数,并使函数作为字符串,即它将以字符串格式返回值。

  2. 在你想要答案的特定位置调用该函数。

1)Public Function read_value(ByVal strat As Integer, ByVal end1 As Integer) As String

    Dim fs As FileStream = New FileStream(f_name, FileMode.Open, FileAccess.Read)
    Dim n As Integer = 0
    Dim s As String = Nothing
    Dim i As Integer = 0
    Dim l As Long = strat
    fs.Seek(l, SeekOrigin.Begin)
    'Seek(strat)
    For i = strat To end1
        n = fs.ReadByte()
        s = s + Convert.ToChar(n)
    Next
    Return s
End Function
  • Dim ofd1 As New OpenFileDialog'将file_name设置为字符串试一试如果ofd1。ShowDialog = windows . forms . dialog . okF_name = ofd1。文件名

                product_id_txt.Text = read_value(12, 23)
                location_txt.Text = read_value(34, 50)
                form.Show()
            End If
        Catch ex As Exception
            MessageBox.Show("File Not Found")
        End Try
    

    此代码的输出为标签----->产品Id: id09876543 <----这是我的文本框值