vb.net重命名 vb重命名之后會(huì)不可用嗎

VB中重命名文件名

把D:\test\目錄下的所有jpg文件重命名為pic###.jpg的代碼：

吉安網(wǎng)站制作公司哪家好，找成都創(chuàng)新互聯(lián)公司！從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、APP開(kāi)發(fā)、響應(yīng)式網(wǎng)站設(shè)計(jì)等網(wǎng)站項(xiàng)目制作，到程序開(kāi)發(fā)，運(yùn)營(yíng)維護(hù)。成都創(chuàng)新互聯(lián)公司公司2013年成立到現(xiàn)在10年的時(shí)間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來(lái)保證我們的工作的順利進(jìn)行。專(zhuān)注于網(wǎng)站建設(shè)就選成都創(chuàng)新互聯(lián)公司。

Dim i As Integer

i = 1

Set fs = CreateObject("scripting.filesystemobject")

Set fd = fs.GetFolder("d:\test")

For Each f In fd.Files

If LCase(f.ShortName) Like "*.jpg" Then

f.Name = "pic" Format(i, "000") ".jpg"

i = i + 1

End If

Next

如果文件名已確定，可以用Set f=fs.GetFile("[完整路徑和文件名]")，然后用f.Name="[新文件名]"

另外提問(wèn)的時(shí)候要注意把已知的條件和要達(dá)到的效果說(shuō)清楚，“已知文件名的若干文件”到底是什么樣的文件名，有沒(méi)有什么規(guī)律？是否在同一文件夾下？或者是否已將文件名存放在一個(gè)字符串?dāng)?shù)組中？不說(shuō)清楚別人怎么能幫你，只能給你一個(gè)實(shí)現(xiàn)的思路了

vb.net監(jiān)控路徑上的任一文件夾，當(dāng)重命名時(shí)觸發(fā)事件。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

FileSystemWatcher1.NotifyFilter = IO.NotifyFilters.DirectoryName Or IO.NotifyFilters.FileName‘監(jiān)控文件夾和文件。

FileSystemWatcher1.IncludeSubdirectories = True’監(jiān)控子文件夾

End Sub

Private Sub FileSystemWatcher1_Renamed(sender As Object, e As IO.RenamedEventArgs) Handles FileSystemWatcher1.Renamed

MsgBox(e.FullPath vbCrLf e.Name)

End Sub'捕獲新路徑

你監(jiān)控test不就好了，若要排除其他文件夾，IncludeSubdirectories 設(shè)為假，用多個(gè)FileSystemWatcher就行了，用數(shù)組或其他方式創(chuàng)建。

vb.net重命名文件夾，里面存在文件夾和文件，不用移動(dòng)和復(fù)制的

Microsoft.VisualBasic.FileSystem.Rename(原文件夾完整路徑名稱(chēng)，新的文件夾名稱(chēng)）

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\1")‘當(dāng)路徑不對(duì)時(shí)會(huì)把原文件夾剪切到“D:\2\”下面文件夾名稱(chēng)不變

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\2")")‘當(dāng)路徑不對(duì)時(shí)會(huì)把原文件夾剪切到“D:\2\”下面文件夾名稱(chēng) 更改為 2

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2")’當(dāng)路徑相同時(shí)只改文件夾名稱(chēng) 不移動(dòng)文件

希望能幫到你

vb.net怎樣制作安裝包

打包過(guò)程：

1、打開(kāi)自己已經(jīng)創(chuàng)建好的VB.NET項(xiàng)目（一般一開(kāi)始創(chuàng)建項(xiàng)目的時(shí)候創(chuàng)建的是Windows窗體應(yīng)用程序）。

2、點(diǎn)“文件”--“新建項(xiàng)目”--“其他項(xiàng)目類(lèi)型”--“安裝部署”--“Visual Studio Installer”--“安裝項(xiàng)目”，輸入項(xiàng)目名稱(chēng)（此處命名為setup1）并點(diǎn)擊“確定”。

3、執(zhí)行完上一步，在解決方案下面會(huì)出現(xiàn)setup1項(xiàng)目。右擊setup1項(xiàng)目--“添加”--“項(xiàng)目輸出”。

4、在“添加項(xiàng)目輸出組”中，選擇“主輸出”，然后單擊“確定”。將自動(dòng)添加所有依賴(lài)項(xiàng)。

5、在解決方案資源管理器中，右擊安裝項(xiàng)目---“添加”---“合并模塊”。? 把相關(guān)模塊添加進(jìn)來(lái)。

6、在文件系統(tǒng)選項(xiàng)卡中添加所需的應(yīng)用程序圖標(biāo)等文件，并生成應(yīng)用程序的桌面快捷方式，在快捷方式上右鍵選擇屬性，并在屬性欄中的圖標(biāo)處選擇應(yīng)用程序快捷方式圖標(biāo)。（要在用戶(hù)桌面和用戶(hù)的“程序”菜單屬性里將AlwaysCreate屬性的值修改為T(mén)rue）。這樣安裝完程序后就可以看到桌面的圖標(biāo)了

7、關(guān)于應(yīng)用程序圖標(biāo)的詳細(xì)說(shuō)明：

（1）點(diǎn)擊“應(yīng)用程序文件夾”并在右側(cè)的列表中的“主輸出來(lái)自。?！鄙嫌益I然后點(diǎn)擊“創(chuàng)建主輸出來(lái)自。。的快捷方式”

（2）把生成的快捷方式復(fù)制到“用戶(hù)桌面”，然后右鍵重命名為你想要在程序安裝后顯示的名字。

（3）重命名完成后在右側(cè)的屬性欄中點(diǎn)擊圖標(biāo)設(shè)置為自己想要的圖標(biāo)，注意，需要先把圖標(biāo)文件ico加入到“應(yīng)用程序文件夾”中。（ico的制作：先做好256*256的png文件，然后百度ico制作找到在線(xiàn)制作ico的網(wǎng)站，直接生成ico圖標(biāo)文件）

關(guān)于安裝后的一些屬性的設(shè)置：

本文名稱(chēng)：vb.net重命名 vb重命名之后會(huì)不可用嗎
分享網(wǎng)址：http://muchs.cn/article46/dohcchg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站設(shè)計(jì)公司、建站公司、網(wǎng)站改版、虛擬主機(jī)、商城網(wǎng)站、網(wǎng)站收錄

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話(huà)：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)