OpenFileDialog problem Verfasst am: 15.11.2007, 20:12
Hallo
Ich öffne durch ein Klick ein OpenFiledialog Fenster aber da steht dann wo normal der Datei namen drin steht "OpenFileDialog1" wenn ich dann eine Datei aussuche und auf öffnen klicke läd der Dialog neu und dann stehen erst die Filter eigenschaften drin und ich muss die datei neu auswählen dann klappts erst nach dem 2ten mal öffnen
Code:
Public Class Form1
'Text File laden
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
With OpenFileDialog1
'Dialog Eigenschaften
.ShowDialog()
.InitialDirectory = "c:\"
.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"""
.Title = "Datei auswählen"
'Wenn ausgwählt dann einlesen
If .ShowDialog() = DialogResult.OK Then
Dim reade As StreamReader = New StreamReader(.FileName)
Dim Line As String
lv1.Items.Clear()
Do
Line = reade.ReadLine()
If Line <> Nothing Then lv1.Items.Add(Line)
Loop Until Line Is Nothing
reade.Close()
End If
End With
End Sub
End Class
Teto_ Poster
Anmeldedatum: 28.02.2007 Beiträge: 106
Verfasst am: 15.11.2007, 20:46
Versuche das,du hast einfach eine falsche reihenfolge gemacht.
Code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
With OpenFileDialog1
.FileName = ""
.Filter = "Textdateien (*.txt)|*.txt|All files (*.*)|*.*""
.InitialDirectory = "c:\"
.Title = "Datei auswählen"
.ShowDialog()
End With
End Sub
End Class
sh00ky_ Newbie
Anmeldedatum: 08.11.2007 Beiträge: 18
Verfasst am: 15.11.2007, 20:52
oh danke wusste gar nicht das es darauf ankommt *g*
Registrieren
Login
wusste gar nicht das es darauf ankommt *g* 
