Private Sub ListBox1_MouseClick(ByVal sender As System.Object, ByVal e As _
  System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseClick
        RichTextBox1.LoadFile("c:\temp\tagebuch\" & _
        ListBox1.SelectedItem.ToString)
End Sub

my.settings.TbPfad = "c:\temp\tagebuch\"
my.settings.save
 
.
.
.
Private Sub ListBox1_MouseClick(ByVal sender As System.Object, ByVal e As _
  System.Windows.Forms.MouseEventArgs) Handles ListBox1.MouseClick
        RichTextBox1.LoadFile(my.settings.TbPfad & _
        ListBox1.SelectedItem.ToString)
End Sub

Mit freundlichen Gr??en
DotNetErbse


[Es hei?t Paket und nicht Packet, auch wenn Standard augenscheinlich von Standar(t)e kommt,hei?t es dennoch Standar(d)]