2013-09-25 50 views
1

我有以下代碼:如何僅獲取文件名,將其分配給變量並稍後使用?

Private Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click 
    Dim myStream As Stream 
    Dim saveFileDialog1 As New SaveFileDialog() 
    Dim saveFileName As String = "" 
    saveFileDialog1.Filter = "txt files (*.txt)|*.txt" 
    saveFileDialog1.RestoreDirectory = True 

    If saveFileDialog1.ShowDialog() = DialogResult.OK Then 
     myStream = saveFileDialog1.OpenFile() 
     saveFileDialog1.FileName = saveFileName 
     Using sw As StreamWriter = New StreamWriter(myStream) 
      ' Add some text to the file. 
      sw.WriteLine(DateTime.Now + " - " + saveFileName) ' Date and File title header 
      sw.WriteLine("-------------------") 
      ' Arbitrary objects can also be written to the file. 
      sw.Write("The date is: ") 
      sw.WriteLine(DateTime.Now) 
      sw.Close() 
     End Using 

     If (myStream IsNot Nothing) Then 
      ' Code to write the stream goes here. 
      myStream.Close() 
     End If 
    End If 
End Sub 

變量是saveFileName,但是當我使用saveFileDialog1.FileName,因爲它,它是空的或提供該文件的完整路徑,我怎麼只得到名稱? (如test.txt的)

回答

1

使用Path.GetFileName

saveFileName = Path.GetFileName(saveFileDialog1.FileName) 
+0

這個工作,改變Path.GetDirectoryName()來Path.GetFileName()後,由於 – SCGB

+0

哦,當然,重讀和用GetFileName的權利一。 – Steve

0
DIM fileName = IO.Path.GetFileName(SavefileDialog.FileName) 
相關問題