Übertrag von Label in ander Form

flight777 · 2. Januar 2014, 14:56

Hallo,

Ich probiere in meinem Programm das ich schreibe 5 Label die in Form 1 deklariert und mit text gefüllt werden, in eine Form 2 zu Importieren jedoch funktioniert es nicht...!

Aber ich bekomme keine Fehlermeldung... kann mir jemand sagen was ich falsch mache?

Form1:

Label1.Text = "zum Beispiel"

Form2:

Label1.text = Form1.Label1.text

Weiss jemand was da falsch ist?

Danke und noch ein gutes neues Jährchen

Wipf1000 · 2. Januar 2014, 15:06

Wi wärs mal mit deinem ganze code...

sonne75 · 2. Januar 2014, 15:07

[VB 2010] Instanziierung von Forms und Aufruf von Dialogen

flight777 · 3. Januar 2014, 11:06

Danke viel mals sonne75 hat mir geholfen

RodFromGermany · 3. Januar 2014, 11:13

flight777 schrieb:

Weiss jemand was da falsch ist?

Gib Deiner Form2 eine Property, in deren Setter Du das Label befüllst und im Getter liest Du es aus:

VB.NET-Quellcode

Public Property Labeltext As String
Get
Return Me.Label1.Text
End Get
Set(value As String)
Me.Label1.Text = value
End Set
End Property

ThuCommix · 3. Januar 2014, 11:16

Noch besser, du hast eine Globale Klasse, die eine Datenverwaltung darstellt. Diese Klasse ist in jeder Form bekannt und von ihr können Daten abgerufen werden. Controls und dessen Eigenschaften sind nicht zum Speichern von Daten da, sondern zum Anzeigen.

flight777 · 3. Januar 2014, 17:21

Und wie stell ich das mit der Globalen klasse an? einfach bevor die klassendefinition kommt? und was schreib ich da rein?

Derfuhr · 3. Januar 2014, 18:01

Hab dir mal ein kleines Bespiel erstellt wie man das machen kann:
Form1

VB.NET-Quellcode

Public Class Form1
Private myProps As New MyPropertys
Private f2 As New Form2
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
f2.Show()
Label1.DataBindings.Add("Text", Me.myProps, "LabelText")
f2.Label1.DataBindings.Add("Text", Me.myProps, "LabelText")
myProps.LabelText = "altertext"
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
myProps.LabelText = "neuertext"
End Sub
End Class

MyPropertys

VB.NET-Quellcode

Imports System.ComponentModel
Public Class MyPropertys
Implements INotifyPropertyChanged
Public Event PropertyChanged(sender As Object, e As PropertyChangedEventArgs) Implements INotifyPropertyChanged.PropertyChanged
Private _labeltext As String
Public Property LabelText As String
Get
Return _labeltext
End Get
Set(value As String)
_labeltext = value
RaiseEvent PropertyChanged(Me, New System.ComponentModel.PropertyChangedEventArgs("LabelText"))
End Set
End Property
End Class

RushDen · 3. Januar 2014, 18:18

@Derfuhr

Die Mehrzahl von Property ist übrigens Properties und nicht Propertys

ErfinderDesRades · 3. Januar 2014, 22:43

@Derfuhr:: gugge auch Settings richtig verwenden + binden

flight777 · 4. Januar 2014, 21:58

Okkk dankee im voraus schoneinal für die hilfe, wenn ich das richtig verstanden habe importiere ich mit diesem code einfach die gewünsten Label von form 1 nach form 2? aber was ist das Property? bzw für wad brach ich das?

ErfinderDesRades · 4. Januar 2014, 22:11

flight777 schrieb:

wenn ich das richtig verstanden habe importiere ich mit diesem code einfach die gewünsten Label von form 1 nach form 2?

Garnicht verstanden.
Schon die Bedeutung von "importieren" ist dir unbekannt, nämlich dein Satz ergibt überhaupt gar keinen Sinn: Ein Label kann man nicht von einem Form ins annere importieren.
Also sei nicht beleidigt, es ist nix dabei, vieles nicht zu wissen, deshalb fragst du ja. Ich konstatiere nur den Umfang der Hilfe, die du brauchst.

Also imo das wichtigste wäre jetzt erstmal, dass du Derfuhrs Code überhaupt bei dir zu laufen kriegst.
Bis dahin sind alle Erklär-Versuche ja nur abstraktes Geschwafel ohne "Sitz im Leben".

flight777 · 4. Januar 2014, 22:22

VB.NET-Quellcode

Imports System.ComponentModel
Public Class Form1
Private myProps As New MyPropertysPrivate Sub Form1_Load_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Form2.Show()Label1.DataBindings.Add("Text", Me.myProps, "LabelText")
Form2.Label1.DataBindings.Add("Text", Me.myProps, "LabelText")
myProps.LabelText = "altertext"
End SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Label1.Text + 1End Sub
End Class
Public Class MyPropertys
Implements INotifyPropertyChangedPublic Event PropertyChanged(ByVal sender As Object, ByVal e As PropertyChangedEventArgs) Implements INotifyPropertyChanged.PropertyChanged
Private _labeltext As String
Public Property LabelText As String
GetReturn _labeltext
End GetSet(ByVal value As String)
_labeltext = valueRaiseEvent PropertyChanged(Me, New System.ComponentModel.PropertyChangedEventArgs("LabelText"))
End Set
End PropertyEnd Class

Das ist mein Code aber er funktioniert nicht wirklich...ich bin mir erstens nicht ganz sicher was ich mit den "Text" und "LabelText" und "altertext" anfangen soll

ohh mann ich glaube ich lass das lieber mit dem programieren

RodFromGermany · 5. Januar 2014, 11:07

flight777 schrieb:

VB.NET-Quellcode

Form2.Show()

flight777 schrieb:

Danke viel mals @sonne75: hat mir geholfen

Leider ging ihre Hilfe ins Leere.
Der nächste Versuch.

ErfinderDesRades · 5. Januar 2014, 11:14

flight777 schrieb:

Das ist mein Code aber...

...niemand kann ihn lesen

Bitte VB-Tag benutzen - aber richtig

Übertrag von Label in ander Form

Übertrag von Label in ander Form

flight777 schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

flight777 schrieb:

VB.NET-Quellcode

flight777 schrieb:

VB.NET-Quellcode

flight777 schrieb:

flight777 schrieb:

Ähnliche Themen

5 Benutzer haben hier geschrieben