VB编程 读取文件 一行一行显示的问题

20086-猫头鹰 20086-猫头鹰 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
While Not EOF(1)

Input #1, T

I = InStr(1, T, "GET") + 5

i1 = InStr(I, T, " Mozilla/5.0+(compatible;+Baidu")

If I > 0 And i1 > 0 Then

For i2 = 0 To List1.ListCount - 1

If List1.List(i2) = Mid(T, I, i1 - I) Then List1.RemoveItem i2

Next

List1.AddItem Mid(T, I, i1 - I)

End If

Wend
ProgressBar1.Max = List1.ListCount - 1

For I = 0 To List1.ListCount - 1
ProgressBar1.Value = I
DoEvents
ProgressBar1.Value = I
Next
现在地区文本的内容 会卡一会一下子全部显示出来 ,我想让他读一条显示一条
...全文

相关推荐

vb读取文件最后一行内容或指定行内容

### vb读取文件最后一行内容或指定行内容在日常的编程工作中,我们经常会遇到需要读取文件中特定行的情况,尤其是读取最后一行数据的需求非常常见。

依漫工作室

VB编程实现Excel和TXT文件内容读取

htmltable {th, td {th {pre {简介:本文介绍VB如何处理和读取Excel和TXT文档内容,特别强调读取特定行,例如第三行的操作。通过使用Microsoft Excel Object Library和FileSystemObject对象,开发者可以轻松访问和操作Excel工作簿和TXT文件。代码示例展示了如何打开文件、定位到特定行,并读取其内容。这些技术对于数据处理和分析在各种IT应用场景中非常实用。

麦克羊

list读取TXT文件

VB(Visual Basic)是一种广泛使用的编程语言,它提供了多种方法来读取和操作TXT文件。本文将详细介绍如何在VB中使用List控件来读取TXT文件,并探讨相关知识点。

zhaowei942

VB6行号生成.zip

虽然现在有许多现代的编程环境和文本编辑器支持自动显示行号,但这个VB6程序仍然展示了其在解决特定问题时的实用性,尤其是在那些仍然依赖VB6开发的老系统中。

zhannghong2003

VB.NET中文件流与DataGridView绑定的应用实例

**CSV(逗号分隔值)文件**:CSV文件是一种简单且通用的数据存储格式,通常用于交换数据。每一行代表一条记录,字段之间用逗号分隔。在VB.NET中,可以借助文件流轻松读取或写入这种格式的文件。

bsxbsx
评论 7
收藏 已收藏
分享
返回顶部
20086-猫头鹰
VB基础类 7,788 成员 197,583 内容