Einstellungen aus Userform fest speichern

Question

Hallo Leute,

ich schreibe gerade an einer komplexen Steuerung mit verschiedenen Fühlern.

Diese Fühler wähle ich in einer 2. Userform als Grundeinstellung aus.

 

Je nach Fühler muss ich andere Grundeinstellungen, wie Signal-Verstärkung, Regressionsformel, Umkehrfunktionen Ja/Nein uvm. berücksichtigen.

 

Diese Daten sammle ich auf der Userform2 und muss dies in meiner Hauptanwendung, die unter der Userform1 läuft anwenden.

Userform 1 läuft jetzt komplett, wenn ich die nicht benötigten Subs in der Timer-Anwendung auskommentiere.

 

Wie bekomme ich es hin, dass z.B. der ausgewählte Fühler in der Userfor2 in der Timer_tick eingetragen wird und dort auch nach Neustart immer noch ausgewählt bleibt, bis ich in der UF2 eine Änderung vornehme??

 

Alle Einstellungen habe ich als String in der UF2 deklariert... ich komme nur im Hauptprogramm nicht dran...

 

Könnte mich da mal jemand bitte anschieben???

 

Code Snippet

Dim Verst As String

Dim Fue As String

Private Sub Übernehmen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

If option_64.Checked = Then

Verst = "64"

ElseIf option_100.Checked = Then

Verst = "100"

Else : MessageBox.Show("Bitte Verstärkung auswählen, oder auf Abbrechen klicken! ")

End If

-

-

-

If Fuehler_Box.SelectedIndex = 0 Then

Fue = "PT 100"

ElseIf Fuehler_Box.SelectedIndex = 1 Then

Fue = "NiCrNi, Typ <K>"

ElseIf Fuehler_Box.SelectedIndex = 2 Then

Fue = "Fe/CuNi, Typ <J>"

Else : Fuehler_Box.SelectedIndex = -1

MessageBox.Show("Bitte Fühler auswählen, oder auf Abbrechen klicken! ")

End If

TextBox1.Text = ("Sie haben einen ") & Fue & ("-Fühler mit einer Verstärkung von ") & Verst & (" gewählt")

End Sub

 

Answer 1

Hallo Pitter,

Du mußt Deine Form2 in Form1 bekannt machen, das geht in Form1 mit:

Code Snippet

Inherits System.Windows.Form.Form