OpenFileDialog Filename in Variable übergeben

[osbam]

Hallo zusammen,

ich komme wiedermal nicht weiter und brauche wieder Eure Hilfe!

Ich habe ein Programm, mit der ich eine Excel-Datei in die Datenbank importieren möchte.

Mit einem Dialog-Formular wähl der Benutzer eine Datei aus:

Dim ofd As OpenFileDialog = New OpenFileDialog()
With ofd
.AddExtension = True
.Filter = rFilter

If .ShowDialog() = DialogResult.OK Then
Filename = .FileName
TextBox1.Text = Filename
Else
MessageBox.Show( _
"Es wurde keine Datei ausgewählt. Vorgang wird abgebrochen.", "Info")

End If

End With

Nun soll der Benutzer auf dem Button "Weiter" klicken und in einem weiteren Dialog-Formular sich die Daten angucken, bevor er die Excel-Tabelle in die Datenbank importeiren kann. An diese Stelle komme ich nicht weiter. Ich weiß nicht, wie ich die Fileame aus dem ersten Formular in das zweiter Formular weitergebe?

Hat jemand eine Lösung für mich? Ich bin VB-Anfänger und programmiere in 2008.

Danke im voraus
osbam

 

[FwDonnerbalken]

Moin,

erstmal bitte ich die um die Beachtung der Netiquette bzgl. Zeichensetzung und Rechtschreibung.

So, zu deinem Problem: Entweder übergibst du den Dateinamen über den Konstruktur des Form2 an dieses weiter (dafür musst du den Standardkonstruktur (möglicherweise erzeugt VB.NET keinen sichtbaren Standardkonstruktur im Code des Form, dann legst du eine Sub New(dateiname as String) an) um ein Argument vom Typ String erweitern). Das Form erzeugst du dann so:

Dim formular2 as Form2 = new Form2(ofd.Filename)

oder du übergibt nach Instanzierung von Form2 über eine Eigenschaft (diese musst du dir ebenfalls in Form2 selbst definieren) den Dateinamen.