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）

4

2 回答 2

1

使用Path.GetFileName

 saveFileName = Path.GetFileName(saveFileDialog1.FileName)
于 2013-09-25T21:32:11.717 回答
0 
 DIM fileName = IO.Path.GetFileName(SavefileDialog.FileName)
于 2013-09-25T21:57:08.023 回答