VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Re(3): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

TheWikkinger — Fri, 15 Oct 2004 06:07:38 GMT

ne - gabs auch schon in VB6

Re(2): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Somnatic — Thu, 14 Oct 2004 20:01:03 GMT

Me.Controls.Add .. gabs das auch schon in VB6 ? .. ich dachte immer das sei VB.NET spezifisch ..

Re(4): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Entity — Thu, 14 Oct 2004 17:51:15 GMT

hab einen request geschickt!

Re(3): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

TheWikkinger — Thu, 14 Oct 2004 17:49:08 GMT

das dynamische erstellen von controlls hat mich die letzten zwei wochen genervt
kannst dich auch direkt via icq an mich wenden - no prob.

Re(2): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Entity — Thu, 14 Oct 2004 17:44:57 GMT

coole sache.. werds zwar heut nimma ausprobieren, aber du bist mein Held!

Re: VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

TheWikkinger — Thu, 14 Oct 2004 17:40:36 GMT

so gehts

label erstellen:
    Dim ctl As Label
    Set ctl = Me.Controls.Add("VB.Label", "MeinLabel1")
    With ctl
         .Caption = "woswasi"
         .Top = 400
         .Left = 500
         .Width = 3000
         .Visible = True
     End With

label löschen:
     Me.Controls.Remove ("MeinLabel1")

Re(4): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Entity — Thu, 14 Oct 2004 15:51:26 GMT

danke sehr.. werd mir das anschaun!

Re(3): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Thing — Thu, 14 Oct 2004 15:48:40 GMT

Wenn Du z.B. ein Label-Objekt (Name = "Label", Index = 0) und eine TextBox (Name = "TextBox", Index = 0) auf der Form hast (kann übrigens ruhig unsichtabr sein), dann kannst Du es ca. so machen:

Private Sub Hinzufügen_Click()
    For Each Ctrl In Array(Label, Textbox)
        Index = Ctrl.Count
        Load Ctrl(Index)
        Ctrl(Index).Top = Ctrl(Index - 1).Top + Ctrl(Index - 1).Height
        Ctrl(Index).Visible = True
    Next
End Sub

Private Sub Entfernen_Click()
    For Each Ctrl In Array(Label, Textbox)
        Index = Ctrl.Count
        Unload Ctrl(Index - 1)
    Next
End Sub

Funktioniert natürlich nicht nur mit Textboxen, sondern auch mit anderen (z.B. Checkboxen usw.)

Re(2): VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Entity — Thu, 14 Oct 2004 15:47:34 GMT

kannst du mir vielleicht auch einen satz dazu schreiben??
an ein array von labels hab ich auch schon gedacht. jedoch bin ich aus meiner Überlegung auch nicht schlau geworden..

und das kann doch auch nich ernsthaft die einzige oder beste möglichkeit sein ein Label zu erstellen.

Re: VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Somnatic — Thu, 14 Oct 2004 15:39:07 GMT

stichwort: Control Arrays

evtl. hilft das ..

VB - ein Label in Kombination mit einem Objekt erzeugen und später wieder zu löschen

Entity — Thu, 14 Oct 2004 13:46:08 GMT

Ich schätz des Topic sagt eh schon alles..

ich will über einen Button ein neues Label erstellen, welches Visuell ein gleichzeitig erzeugtes Objekt darstellen soll.

Später, falls das Objekt gelöscht wird soll das Label auch gelöscht werden.

Ich hab ein bißchen gesucht, aber hab nur die Möglichkeit gefunden Label.visible = true/false zu setzten, aber damit kann ich nix anfangen, weil auch die Position der Labels unterschiedlich sein müssen, je nachdem das wievielte erstellte Label es ist!

Kanns sein, daß es da keine Möglichkeit gibt, so etwas zu machen, oder hab ichs nur einfach nicht gefunden?

danke für eure seelischen Beistand!
mfg P.