VB删除txt文件中的某一行

把txt文件中的每行内容读取到list1中然后我选中list1中的项目按command1就把我选中这行内容对应文本文件中的内容删去... 把txt文件中的每行内容读取到list1中
然后我选中list1中的项目 按command1 就把我选中这行内容对应文本文件中的内容删去
展开
 我来答
chinaboyzyq
推荐于2016-08-24 · TA获得超过1.3万个赞
知道大有可为答主
回答量:1.3万
采纳率:89%
帮助的人:3138万
展开全部
1、vb无法直接删除文本文件中的某一行。
2、要想做到删除文本文件中的某一行,必须一行行读并进制连接,读要删除的行越过连接,继续连接其它行,直到文件结束。
3、把连接的新串,重新保存为原文件名即可实现所要功能。
TableDI
2024-07-18 广告
作为上海悉息信息科技有限公司的一员,我们专注于提供高效的数据处理解决方案。对于多个文件表格的合并需求,我们通常采用专业的数据整合技术,确保数据的准确性和一致性。通过精确匹配表格字段和格式,我们能够快速、准确地将多个表格合并成一个,为用户提供... 点击进入详情页
本回答由TableDI提供
沉睡得灵魂
推荐于2016-04-02 · TA获得超过215个赞
知道小有建树答主
回答量:229
采纳率:0%
帮助的人:144万
展开全部
这个不难,代码如下:
command1的代码:

Private Sub Command1_Click()
Dim s1 As String
Dim a() As String
Dim i As Integer
Open "txt地址" For Input As #1
While Not EOF(1)
Line Input #1, s
s1 = s1 & s & IIf(EOF(1), "", vbCrLf)
Wend
Close #1

a() = Split(s1, vbCrLf)
a(List1.ListIndex) = ""
Open "txt地址" For Output As #1
For i = 0 To UBound(a)
Print #1, a(i) & vbCrLf
Next i
Close #1
MsgBox "删除成功!"
End Sub
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友2ca1c0f24
2009-11-14 · TA获得超过2036个赞
知道大有可为答主
回答量:4364
采纳率:0%
帮助的人:3380万
展开全部
给你一个思路:
1、首先删除list1中的需要删除的内容;
2、读取list1中不需要删除的内容;
3、重新将读取的内容写入txt中。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
我什么也不知道怎么回答
2009-11-14 · TA获得超过171个赞
知道小有建树答主
回答量:231
采纳率:0%
帮助的人:160万
展开全部
Private Sub Command1_Click()
List1.RemoveItem List1.ListIndex
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
1360384
2009-11-14 · TA获得超过1213个赞
知道小有建树答主
回答量:1425
采纳率:0%
帮助的人:514万
展开全部
你要删文本里的吗?要是删列表里的那很简单,要是文本里的那就要看有没有什么规律了。有点难度!
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式