VS 2008 : TextBox Showing Directory That OpenFileDialog Selected?

This is my code at the moment. I want the TextBox to show the Directory of the file. (C:Documents and SettingsUserDesktopFile)

This is my TextBox Code

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Me.Text = OpenFileDialog1.FileName
End Sub

This is my Button Code

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.ShowDialog()
End Sub