我有一个包含一些记录的8mb文件。 我想读一个特定地方的特定记录。 我有文件中每条记录的起始和结束字节索引。
我的问题是如何使用文件对话框选择特定文件,并创建一个读取文件并将特定记录存储在文本框中的函数。
我还怀疑如何在编码的所有textboxes.plz帮助中一次读取所有记录..
我是VB.Net 2008的新程序员
答案 0 :(得分:0)
我找到了自己的解决方案..
首先我需要一个我的文件值的索引,假设 产品ID = id09876543 location = india 然后索引值id09876543是“12到23” 那么我将在函数调用中传递12和23。
1)使一个名为“read_value”的用户定义函数以整数形式传递其中的2参数,并将函数作为字符串,即它将以字符串格式返回值。
2)在你想要答案的特定地方调用该功能。
像这样。1)
公共函数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
2)
Dim ofd1作为新的OpenFileDialog 'Dim file_name As String 尝试 如果ofd1.ShowDialog = Windows.Forms.DialogResult.OK然后 f_name = ofd1.FileName
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
此代码的输出是 label ----->产品编号:id09876543< ----这是我的文本框值
这已经完成..