从文件中读取特定字节数据
本文关键字:字节 字节数 数据 文件 读取 | 更新日期: 2023-09-27 18:02:10
我有一个8mb的文件,其中包含一些记录。我想从一个特定的地方读取一个特定的记录。我有文件中每条记录的起始和结束字节索引。
我的问题是如何使用文件对话框来选择特定的文件,并使一个函数读取文件,然后在文本框中存储特定的记录。
我也对如何在所有文本框中同时读取所有记录有疑问。
首先,我需要我的文件值的索引假设product id =id09876543 location =india那么索引id09876543的值是"12至23 "然后在函数调用中传递12和23。
-
创建一个名为read_value的用户定义函数;以整数形式传递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 <----这是我的文本框值