vb6，怎么读取txt文本内容的最后10行数据，并显示在text1.text中

如题所述

举报该问题

第1个回答 2016-08-19

没办法从间读，可以全部读入，然后处理，
也可以按读取一遍先获得行数，然后让过部分行，再读。

相似回答

VB中如何读取txt最后10行答：For n = n To n + 10 ts = ts & vbNewLine & Tsl(n)Next n Text2 = ts Close #fn Loop End Sub

vb6.0 提取text1最后一行字符的后几个字符(前面几个字符不要)_百度知 ...答：在VB6.0编程中，如果需要从Text1文本框的最后一行提取特定数量的字符，可以采用如下的代码实现。这段代码首先将Text1中的文本根据换行符（ vbCrLf ）进行分割，得到一个字符串数组。然后，通过数组的上界获取最后一行的字符串。最后使用Right函数截取该行的最后5个字符，并通过MsgBox显示出来。具体代码如下：...

VB6.0读取TXT内容答：Private Sub Command1_Click()Dim SZtxt() As String Dim d() As String Dim n As Integer Dim LinStr As String Dim i As Integer n = 0 Open "c:\1122.txt" For Input As #1 '以读的方式打开文件 Do While Not EOF(1) ' 循环至文件尾 n = n + 1 ReDim Preserve SZtxt...

VB6.0中如何截取11.txt中的123=后面的数值答：imports system.io '这是命名空间 '把这段代码放到一个按钮事件下,在窗体上放两个label控件(你的那段代码不用了)dim a() as string a = File.ReadAllLines("C:\Documents and Settings\Administrator\桌面\新建 文本文档.txt", System.Text.Encoding.GetEncoding("gb2312"))Me.Label1.Text = a(...

vb如何读取多行txt文本?答：1、对于文件的操作vb提供了open语句、print #语句、input #语句等语句来处理文件。2、读取多行文本，可以使用Line input #语句，一行行读取，再连接在一起，这种方法对大一点txt文件效率不高。3、下面提供一个高效率、一次性读入所有文本的vb6示例：Private Sub Command1_Click() Dim r Open "d:...

VB6读取文本文件所有行数据答：private sub form_load()dim str as string open app.path & "\QQ.txt" for input as #1 do while not eof(1)line input#1,str list1.additem str loop close end sub private sub list1_click()text1=right(list1.text,len(list1.text)-instr(list1.text,"=")end sub ...

用vb6.0怎么连接一个文本文档?答：Private Sub Form_Load()Dim S1 As String, S2 As String Open "C:\a.txt" For Input As #1 '请将路径换成你要打开的文本文件的文件路径及文件名 While Not EOF(1)Line Input #1, S1 S2 = S2 & S1 & IIf(EOF(1), "", vbCrLf)Wend Text1.Text = S2 End Sub Private Sub Form_...

到底如何用vb6读取网站上的txt文件???答：用xmlhttp比较简单:Sub test()Dim xmlhttp, sText As String Set xmlhttp = CreateObject("Microsoft.XMLHTTP")With xmlhttp .Open "Get", "http://www.ta2shou.com/a.txt", False .Send Text1.Text = .Responsetext End With End Sub ...

VB6.0中如何实现逐行读入文本文件?答：VB6.0可以用一次读取文本文件全部文本内容，然后使用Split函数来实现一行一行提取文本框行内容。Split函数，返回一个下标从零开始的一维数组，它包含指定数目的子字符串。以下代码是可以提取文本文件任何一行内容的：Private Sub Command1_Click() Dim strWj As String Dim strj() As String Dim...

大家正在搜

vb怎么读取excel中的数据 vb中读取文本文件内容怎样用vb读取文件并显示出来 vb读取txt指定内容到数组 vb中读取文件并放入数组 vb从文件中读取数据 vb清空text中的内容 c读取文本文件内容 vb读取excel数据

vb6.0，我从txt文本文件中【utf-8】编码，读出数据...

vb逐行读取txt数据并分别显示在text1，text2,t...

vb如何随机读取txt中任意一行的内容，然后输出到Text1...

VB读取TXT文本中的一行

VB获取文本文件的最后一行怎么做到？

VB 如何读取已经打开的一个TXT文件的某特定一行？

VB中如何把TEXT中的多行文本添加到LISTBOX中，而且...

VB怎么选择多行文本text1的其中一行内容并且赋给text...