VB实现批量名称修改

本文介绍了如何使用VB编写程序实现批量文件名修改,重点讲解了Name函数的使用,并提供了具体的代码示例,帮助读者理解并应用到实际操作中。
摘要由CSDN通过智能技术生成

前阵子写了一个目录名/文件名的获取小程序,这两天居然又被名称批量修改麻烦了一下,所以再写一个吧。

 

注意:你要是只想写一次的话,用批处理更方便。只有多次使用的情况下,自己写程序才有意义。

 

VB中进行名称修改很容易,用到的就是Name这个函数,用法如下:


Name OldName As NewName,它不仅可以改写名称,而且可以更改目录,比如:

 

Name "c:/CAN1ED.txt" As "c:/test/CAN01ED.txt"

 

好了,不多说了,共享代码了:(大家可以参照我的程序来看)http://download.csdn.net/source/1975928


Private Sub Command1_Click() '批量改名
Dim Successstr As String
Dim Successnum As Integer

Dim pathname As String

Dim sf As String
Dim len1, len2, len3 As Integer

Successnum = 0

'比如原文件是有如下几个
'C:/test/【老爸老妈的浪漫史.第三季】.[How.I.Met.Your.Mother][S0301][Chi-Eng][TVrip][624×352].rmvb
'C:/test/【老爸老妈的浪漫史.第三季】.[How.I.Met.Your.Mother][S0302][Chi-Eng][TVrip][624×352].

评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值