• 所有问题

    • vb中怎样读出TXT文件中的内容，并将读出来的内容放在数组中？求高手写出程序，谢谢

    如题所述

    举报该问题
    推荐答案   2017-05-06
    放你总会吧，下面是读
    Private Sub open()
    Dim thefile as string
    On Error Goto FE
    If (Right(dirLook.Path,1)="\") then
    TheFile=dirLook.Path+filFind.FileName
    Else
    TheFile=dirLook.Path+"\"+filFind.FileName
    End if
    Open thefile for input as #1
    TEXTBOX1.text=Input（LOF（1），#1）
    Close #1
    Exit Sub
    FE:
    MsgBox"ERR"
    Resume Next
    End Sub
    'dirLook指路径，filFind.filFind指文件名，dirlook最先为盘名追问

    这个TXT文件里的字符串如下：0,16,"ICS18LN12PCM1-FB",36,M12,L,N,120,10,132,P,C,3,30,5110309_A1,P005,T109,Y,Y,Y,N,N,N,70,15,400,350,30,5,"E8034","E8035","ETprova1.txt"。请问有引号的字符串改怎样赋值给变量？文件读完后再分离出来赋值给数组？

    温馨提示：答案为网友推荐，仅供参考
    相似回答
    读取文件并放到数组中的VB编程答：'读取文件并放到数组 Dim str$, i%, a(), b Open "c:\test.txt" For Input As #1 str$ = StrConv(InputB(LOF(1), 1), vbUnicode)Close #1 b = Split(str$, vbNewLine)ReDim a(UBound(b))For i% = 0 To UBound(b)a(i) = Split(b(i%), " ")Next '--- 显示出来i为...
    vb中,怎样这样把txt的内容读到List1中?答：如果内容是在同一行且像你说的这样是使用逗号分隔的话，可以先将该行的数据读出，并使用split函数将读出的内容按照指定的分隔符进行分割。该函数的返回值是一个数组，然后再用ubound函数得到这个数组的长度，用于循环，在循环中将数组中的内容添加到list控件中就ok了！
    怎样用VB读取TXT中的数据并赋予一维数组答：Call RichTextBox1.LoadFile(sFile, rtfText)ReadTextFile = SW2Arr(RichTextBox1.Text, parrD)End Function '将文本数据，以回车换行符为分隔符, 赋给1维数组 Public Function SW2Arr(sSW As String, ByRef parrD() As String) As Long Dim arrD() As String Dim i As Long Dim nPassCnt...
    VB 怎么读txt文件啊!答：在VB中读取txt文件有多种方法，下面将介绍两种常用的方法。首先，可以使用Open语句打开文件，然后通过line input #按行读取文件内容。这种方式适用于处理文本文件，能够逐行读取数据，便于处理和解析。其次，可以使用InputB函数一次性读入整个文件。这种方式适用于二进制文件，能够将文件内容一次性读入内存，便于...
    vb如何读取txt某一列答：在VB中，读取TXT文件中的某一列需要进行一些简单的步骤。首先，使用一个数组来存储读取的数据。你可以通过以下代码实现：Dim arr As Variant 在VB中，打开TXT文件并读取其内容，可以使用以下代码：Private Sub Command1_Click()使用Open语句打开文件，指定文件路径，并设置文件为只读模式：Open "c:\123....
    用vb6.0,获取两个txt文本内容,然后把两个文本里相同一数据保留下来并存...答：' 将结果写入文本文件 x.txt Open "C:\temp\x.txt" For Output As #3 Print #3, x Close #3 假设文本 a 和 b 分别位于 C:\temp\a.txt 和 C:\temp\b.txt，合并后的文本位于 C:\temp\x.txt。代码先读取两个文本中的内容，然后将每个文本的行分别存储到数组 arrA 和 arrB 中，接...
    vb 怎样读取TXT文件中的数据答：Open "F:\数据.txt" For Input As #1 Input #1, a, b, c, d Print "a="&a,"b="& b,"c="&c,"d="&d Close #1 End Sub -几种打开文件方法--- 1.open <文件名> for input as#<文件号> 如果文件不存在则会出错,文件号将在以后操作中取代文件名,范围是[1,511]。2.open ...
    请问VB中如何读取txt文件的数据答：1、新建一个标准的VB EXE工程，只有一个Form，Form上有两个按钮：Command1和Command2。2、双击Command1添加如下代码 Private Sub Command1_Click()Dim strFile As String Dim intFile As Integer Dim strData As String strFile = "c:\学生成绩.txt"intFile = FreeFile Open strFile Fo...
    VB怎么读取文本内容特定一行的特定内容答：首先，我们需要定义一个字符串变量s，并打开名为“mytext.txt”的文本文件。使用Input函数读取整个文件内容，并用vbCrLf作为分隔符进行分割，将结果存储在数组s中。接着，关闭文件，然后使用Mid函数从s(1)中提取第2个字符起的3个字符，即表示第2行的第2个字符起的3个字符。具体代码如下：Private Sub ...
    大家正在搜
    c语言从文本文件中读出数字vb如何读取文件内容vb中怎样打开指定文件vb中怎么读文件vb从文件中读取数据vb读取记事本中文件从文件读出数据是什么意思c语言读取文件内容读取文件内容
    相关问题
    怎么在TXT文件中读取数据，并存入VB数组中
    VB编程如何将*.txt文件中的数据读入到数组？
    用VB实现将TXT文本中的内容按固定的字节读取存入一个数组中...
    求高手帮忙啊：vb 中如何从txt文件中将数据读取出来并赋值...
    vb如何读取txt文件并写入数组中？
    vb读取txt并存入数组中
    vb读一个含数据的txt文件,并放入数组中
    vb 读取txt内容，并赋值给数组？