用 io.Directory.Exists 判斷文件夾是否存在。
創(chuàng)新互聯(lián)-成都網(wǎng)站建設(shè)公司,專注成都網(wǎng)站建設(shè)、網(wǎng)站建設(shè)、網(wǎng)站營(yíng)銷推廣,國(guó)際域名空間,網(wǎng)站空間,成都網(wǎng)站托管有關(guān)企業(yè)網(wǎng)站制作方案、改版、費(fèi)用等問(wèn)題,請(qǐng)聯(lián)系創(chuàng)新互聯(lián)。
再用 My.Computer.FileSystem.CopyDirectory() 復(fù)制。
第一步,點(diǎn)擊VS工具
請(qǐng)點(diǎn)擊輸入圖片描述
第二步,打開(kāi)后,新建一個(gè)Windows窗體應(yīng)用程序
請(qǐng)點(diǎn)擊輸入圖片描述
第三步,新建完畢后,如圖所示
請(qǐng)點(diǎn)擊輸入圖片描述
第四步,拖動(dòng)文本框與按鈕,如圖示
請(qǐng)點(diǎn)擊輸入圖片描述
第五步,將剪貼板復(fù)制與粘貼代碼輸入,如圖示
請(qǐng)點(diǎn)擊輸入圖片描述
第六步,運(yùn)行程序
請(qǐng)點(diǎn)擊輸入圖片描述
7
第七步,點(diǎn)擊按鈕,成功從剪貼板中復(fù)制與粘貼操作
請(qǐng)點(diǎn)擊輸入圖片描述
ListBox操作需要用Invoke。另外多線程方式并不是并行處理。
建議采用點(diǎn)虐 framework 4 帶的并行處理循環(huán)操作,若不是4.0版本的framework,可以使用Aforge的并行庫(kù)比較方便。
例如,把文件"E:\新建文件夾\a.txt"復(fù)制到剪貼板
CreateObject("Shell.Application").NameSpace("E:\新建文件夾").ParseName("a.txt").InvokeVerb?"復(fù)制(C)"