Hallo,
Ich bin ein neuling in VB und habe fast keine ahnung von VB.
Ich habe mir etwas gebaut indem ich in einem Fenster eine sache eingebe und im anderen als Label angezeigt wird.
nur wenn ich dann das Prog beende dann steht da wieder nichts ich will das aber dort gespeichert haben...
Brauche Hilfe
EDIT: mein Code sieht so aus:
Ich bin ein neuling in VB und habe fast keine ahnung von VB.
Ich habe mir etwas gebaut indem ich in einem Fenster eine sache eingebe und im anderen als Label angezeigt wird.
nur wenn ich dann das Prog beende dann steht da wieder nichts ich will das aber dort gespeichert haben...
Brauche Hilfe
EDIT: mein Code sieht so aus:
VB.NET-Quellcode
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- If TextBox1.Text = "" Then
- MsgBox("Du musst alles ausfüllen", MsgBoxStyle.Critical, "Error!")
- Else
- Form1.Label6.Text = TextBox1.Text
- Form1.Label7.Text = TextBox2.Text
- Form1.Label8.Text = TextBox3.Text
- Form1.Label10.Text = TextBox4.Text
- Form1.Label11.Text = TextBox5.Text
- Form1.Label12.Text = TextBox6.Text
- Form1.Label23.Text = TextBox7.Text
- Form1.Label24.Text = TextBox8.Text
- Form1.Label25.Text = TextBox9.Text
- Form1.Label18.Text = TextBox12.Text
- Form1.Label17.Text = TextBox11.Text
- Form1.Label16.Text = TextBox10.Text
- Form1.Label32.Text = TextBox15.Text
- Form1.Label31.Text = TextBox14.Text
- Form1.Label30.Text = TextBox13.Text
- Form1.Label39.Text = TextBox18.Text
- Form1.Label38.Text = TextBox17.Text
- Form1.Label37.Text = TextBox16.Text
- Form1.Label74.Text = TextBox21.Text
- Form1.Label73.Text = TextBox20.Text
- Form1.Label72.Text = TextBox19.Text
- Form1.Label67.Text = TextBox24.Text
- Form1.Label66.Text = TextBox23.Text
- Form1.Label65.Text = TextBox22.Text
- Form1.Label61.Text = TextBox27.Text
- Form1.Label60.Text = TextBox26.Text
- Form1.Label59.Text = TextBox25.Text
- Form1.Label54.Text = TextBox30.Text
- Form1.Label53.Text = TextBox29.Text
- Form1.Label52.Text = TextBox28.Text
- Form1.Label46.Text = TextBox33.Text
- Form1.Label45.Text = TextBox32.Text
- Form1.Label44.Text = TextBox31.Text
- MsgBox("Deine Informationen werden eingetragen", MsgBoxStyle.Information, "Information Eingetragen")
- Close()
- End If
- End Sub
- End Class