VB,修改文件名的问题?
VB6.0我用NAME语句修改一个文件列表框中的文件的文件名,执行完NAME语句后,文件列表框中的文件名没有更新过来,我应该怎么办?然后,为了更新,我给filename属...
VB6.0 我用 NAME 语句 修改一个 文件列表框 中的文件的文件名,
执行完NAME语句后,文件列表框中的文件名没有更新过来,我应该怎么办?
然后,为了更新,我给filename属性附了值(新文件名),但是发现原本在列表框中的其它的文件全都不显示了,为什么?怎么办? 展开
执行完NAME语句后,文件列表框中的文件名没有更新过来,我应该怎么办?
然后,为了更新,我给filename属性附了值(新文件名),但是发现原本在列表框中的其它的文件全都不显示了,为什么?怎么办? 展开
2013-11-20
展开全部
将你的程序中的File1.filename=f改为File1.Refresh就可以了!
再跟你举个例子吧!假设在文件列表框中单击某个文件,则弹出InputBox,输入新文件名,然后将文件列表框中选中的这一个文件改名为新文件名,可以编写如下程序。
Private Sub File1_Click()
Dim newfile As String, filepath As String
If File1.ListIndex < 0 Then
MsgBox "未选择文件"
Exit Sub
End If
newfile = InputBox("请输入新文件名")
If newfile <> "" Then
filepath = File1.Path & "\"
Name filepath & File1.FileName As filepath & newfile
File1.Refresh
End If
End Sub
再跟你举个例子吧!假设在文件列表框中单击某个文件,则弹出InputBox,输入新文件名,然后将文件列表框中选中的这一个文件改名为新文件名,可以编写如下程序。
Private Sub File1_Click()
Dim newfile As String, filepath As String
If File1.ListIndex < 0 Then
MsgBox "未选择文件"
Exit Sub
End If
newfile = InputBox("请输入新文件名")
If newfile <> "" Then
filepath = File1.Path & "\"
Name filepath & File1.FileName As filepath & newfile
File1.Refresh
End If
End Sub
2013-11-20
展开全部
直接改对象的名称应该就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询