dim i as long
for i = 0 to list1.listcount -1
list1.list(i) = replace(list1.list(i),"要被删除的字符","")
next
VB中的字符串替换函数replace()只能貌似替换一次,如果要删除的字符不是只有一处,就不能用replace函数了,需要加工一下
重命名文件?vb函数Name 文件名 As 新文件名
如
Name "c:\1.txt" As "c:\renamed"
改List的名的话Object.List(Index)=Value
如
List1.List(0) = "123555"
List1.List(0) = Replace(List1.List(0),"[1]","")
很简单,可以用replace,把这些字符替换掉