请问高手用VB如何读取txt文件中的字符串？

文件为txt数据文档，格式如下：
field11,field12,filed13,……
field21,field22,field23,……
……………
我想把文件中的每个字段导入到oracle数据库的对应字段中，请问怎么读取到每个字段呢？关键是怎么读取我不会……请教高手们，只要写出读取语句就可以了，谢谢啊~好的话我会追加分数的~

举报该问题

推荐答案推荐于2016-03-05

Open "c:\test.txt" For Input As #1 '把c:\test.txt换成你自己的文本文件名
While Not EOF(1) '只要没到文件尾部就一直循环
Line Input #1, strtmp '每次读取一行
str1 = Split(strtmp, ",") '把读取到的单行文本按逗号分隔成多个字符串，存放到str1中
'这时，str1就是一个数组str1(0),str1(1)..分别对应field1, field2
Wend
close #1

温馨提示：答案为网友推荐，仅供参考

当前网址：http://99.wendadaohang.com/zd/OezBzevX.html

其他回答

第1个回答 2009-02-02

带逗号的用Input#读
用
Input #1,var1,var2,var3,...
读
field11,field12,filed13,...
会得到
var1="field11"
var2="field12"
..............

相似回答

请问高手用VB如何读取txt文件中的字符串?答：Open "c:\test.txt" For Input As #1 '把c:\test.txt换成你自己的文本文件名 While Not EOF(1) '只要没到文件尾部就一直循环 Line Input #1, strtmp '每次读取一行 str1 = Split(strtmp, ",") '把读取到的单行文本按逗号分隔成多个字符串，存放到str1中 '这时，str1就是一个数组str1...

VB 读取 Txt 文件内数据答：接着通过FreeFile()函数获取一个空闲的文件句柄，然后使用Open语句以二进制读取模式打开指定路径的文件。在Do循环中，使用DoEvents确保程序可以响应其他事件，然后通过Input函数从文件中读取128字节的数据，并使用StrConv函数将其转换为Unicode字符串，赋值给TempByte变量。当遇到文件末尾时，EOF函数返回True，循...

vb 怎么识别 txt文件内容答：TextValue = StrConv(InputB(LOF(1), 1), vbUnicode)Close #1 其中，TextValue即为TXT文件的内容。另一种方法是逐行读取文件，例如：（假设读取C:\Debug.txt）Dim TextLine As String Open "C:\Debug.txt" For Input As #1 Do While Not EOF(1)Line Input #1, TextLine Loop Close 这种方...

VB 怎么读txt文件啊!答：在VB中读取txt文件有多种方法，下面将介绍两种常用的方法。首先，可以使用Open语句打开文件，然后通过line input #按行读取文件内容。这种方式适用于处理文本文件，能够逐行读取数据，便于处理和解析。其次，可以使用InputB函数一次性读入整个文件。这种方式适用于二进制文件，能够将文件内容一次性读入内存，便于...

VB 怎么更改TXT编码格式和读取Txt指定字符答：CreateObject函数，创建并返回一个对 ActiveX 对象的引用。Print # 语句，将格式化显示的数据写入顺序文件中。以下是实现代码：Private Sub Command1_Click() Dim ados As Object Dim str As String CommonDialog1.FileName = "" CommonDialog1.Filter = "文本文件（*.txt）|*.txt|" ...

如何用vb读取txt文件,指定的某行赋给字符串变量?答：在使用VB读取txt文件的特定行并赋值给字符串变量时，可以按照以下步骤操作。首先，定义一个函数，用于打开并读取整个文件内容。此函数接受一个参数，即文件路径，返回文件内容作为字符串。示例代码如下：'先在代码里加如下 Function Private Function GetTxt(TxtPath As String) As String Dim i As Integer...

在VB里,要读取TEXT控件中输入字符的长度可以用什么函数?答：在VB编程中，若想获取TEXT控件内输入字符的长度，可以使用Len函数。Len函数能够返回一个Long类型的数据，该数据代表字符串中字符的数量或存储变量所需的字节数。具体使用方法为，将TEXT控件内的文本作为参数传递给Len函数，例如Len(TextBox1.Text)即可获取TextBox1中输入字符的长度。需要注意的是，Len函数...

如何利用写好的vb记事本小程序打开TXT格式的文档答：假如你希望使用一个编写好的VB记事本小程序来打开并读取TXT格式的文档，比如文件路径为c:\1.txt，并将内容显示在一个名为text1的文本框中，可以按照以下步骤进行操作。首先，你需要定义一个字符串变量s来存储读取的文本内容。接着，使用OPEN语句打开指定的文件，这里的文件名为“c:\1.txt”，并且指定...

VB怎么读取文本内容特定一行的特定内容答：首先，我们需要定义一个字符串变量s，并打开名为“mytext.txt”的文本文件。使用Input函数读取整个文件内容，并用vbCrLf作为分隔符进行分割，将结果存储在数组s中。接着，关闭文件，然后使用Mid函数从s(1)中提取第2个字符起的3个字符，即表示第2行的第2个字符起的3个字符。具体代码如下：Private Sub ...

大家正在搜

如何用电脑读取手机文件 VB读取文件在循环读取时再循环 VB如何读取顺序文件第二行数据 VB中读取两个文件内容并显示出来 vb如何读取文件内容从文件中读取数据 VB按行读取文件 python读取文件读取文件