日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

VB.NET有很多值得學(xué)習(xí)的地方，這里我們主要介紹 Name語句作用，其實Name語句的功能是重新命名一個文件、目錄或文件夾，也可以用來移動文件。它的語法結(jié)構(gòu)如下：

 
 
 

  
  
  
Name oldpathname As newpathname 
 
 
 

其中包括以下兩個部分：

oldpathname 為字符串表達式，由它來指定已存在的文件名和位置，即原文件名，在其中包含目錄或文件夾以及驅(qū)動器。
ewpathname也是字符串表達，它指定新的文件名和位置，即新文件名，同樣要包含目錄或文件夾以及驅(qū)動器。

VB.NET Name語句作用說明：

移動文件

如果newpathname所指定的路徑存在并且與oldpathname有不同的路徑和不同的文件名，則Name語句會將文件移到新的目錄文件夾，同時重新命名文件。如：

 
 
 

  
  
  
Name "c:\doc\unzip.exe" as "c:\windows\dounzip.exe " 
 
 
 

將原文件unzip.exe從dos目錄下移到windows目錄下并重新命名為dounzip.exe。如果newpathname所指定的路徑存在并且與oldpathname有不同的路徑和相同的文件名，那么Name會移動文件到新位置，并保持文件名不變。如：

 
 
 

  
  
  
Name "c:\doc\unzip.exe" as "c:\windows\unzip.exe " 
 
 
 

將把unzip.exe文件從dos目錄下移動到windows目錄下，同時在dos目錄下的unzip.exe文件被刪除。

重命名目錄

Name語句可以移動文件，不能移動目錄，但可以對目錄重命名。例如：

 
 
 

  
  
  
Name "c:\temp" as "c:\tempold" 
 
 
 

注意：
當“原文件名”不存在或“新文件名”已存在時，則會發(fā)生錯誤。
Name語句不能跨越驅(qū)動器移動文件。
如果一個文件已經(jīng)打開，則用Name語句重命名時將會產(chǎn)生錯誤，所以要先關(guān)閉該文件后，才能重命名。

下面是利用Name語句來移動文件的例子：

1.界面設(shè)置

向工具箱中添加一個CommonDialog控件、兩個TextBox控件、兩個Label控件和三個CommandButton控件。

2.代碼編寫

初始化代碼

 
 
 

  
  
  
Private Sub Form_load()  
  
  
  
Command1.Enabled=False '“移動”按鈕無效  
  
  
  
End sub 
 
 
 

響應(yīng)“打開”按鈕單擊事件

 
 
 

  
  
  
Private Sub Command3_Click()  
  
  
  
CommonDialog1.showopen '顯示一個對話框  
  
  
  
Text1.text=CommonDialog1.FileName '顯示文件路徑和文件名  
  
  
  
Command1.Enabled=True '“移動”按鈕有效  
  
  
  
End Sub 
 
 
 

程序說明：在程序的運行過程中，當單擊“打開”按鈕時，就會激活Command3_Click()事件，程序首先通過CommonDialog1.show1來顯示一個"打開文件"的對話框，用戶在其中選擇一個有效的文件后，在文本框中就會顯示出文件的路徑和文件名，然后設(shè)置“移動”按鈕的有效狀態(tài)為Ture.

響應(yīng)“移動”按鈕單擊事件

 
 
 

  
  
  
Private Sub Command1_click()  
  
  
  
CommonDialog1.DialogTitlek="移動文件" '設(shè)置對話框的標題  
  
  
  
CommonDialog1.ShowSave '顯示一個對話框  
  
  
  
Text2.text=CommonDialog1.FileName '顯示文件路徑和文件名  
  
  
  
str1=MsgBox("確定移動文件到"+CommonDialog1.FileName)  
  
  
  
if str1 then  
  
  
  
Name Text1.Text As Text2.Text  
  
  
  
End if  
  
  
  
End Sub  
  
  
  
'程序說明：在程序的運行過程中，當單擊“移動”按鈕時，就會激活Command1_Click()事件，
程序首先設(shè)置對話框的標題為"移動文件"，然后CommonDialog1.Show2語句來顯示一個"移動文件" 的對話框，
用戶在其中選擇一個有效的路徑和文件名后，程序就會自動的彈出一個對話框，詢問用戶是否真的要移動文件，
如果用戶確認移動，就會通過Name Text1.text as Text2.text語句來移動文件 。  
  
  
  
FileCopy source,destination ' 復(fù)制文件  
  
  
  
End Sub 
 
 
 

通過上述的列子，應(yīng)該可以深入了解VB.NET Name語句作用了吧，試試吧。

當前題目：概括總結(jié)VB.NETName語句作用　
網(wǎng)頁網(wǎng)址：http://m.5511xx.com/article/ccdsidh.html