Label maken

  • Onderwerp starter Onderwerp starter xHTML
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

xHTML

Nieuwe gebruiker
Lid geworden
4 mrt 2010
Berichten
4
Beste,

Ik ben bezig met een project voor een school. Hierin moet ik een label maken.

Code:
Dim label As New Label
        label.Text = "CP"
        label.Font = New Font(label.Font.FontFamily, 14)
        label.Location = New Point(x(rij), y(kolom))
        label.Name = "CP" + CStr(x(rij))
        Me.Controls.Add(label)

Dit werkt verder prima. Ook wordt na het klikken de nieuwe x en y waardes vastgesteld.
Maar als ik 2 keer op de knop druk, wordt er maar 1 label gemaakt. Ik snap prima waarom, maar ik kom niet uit de oplossing :D

Nick
 
Inderdaad, dit lijkt niet te werken met labels, maar (gelukkig) werkt dit wel met buttons. En buttons kan je er net zo uit laten zien als labels:
Code:
        Btn = New System.Windows.Forms.Button
        Btn.FlatStyle = FlatStyle.Flat
        Btn.FlatAppearance.BorderSize = 0
        Btn.TextAlign = ContentAlignment.MiddleLeft
        Btn.Name = "NAAM"
        Btn.Location = New Point(50, 50)
        Btn.Text = "TEKST"
        Dim g As Graphics = Me.CreateGraphics
        Btn.Size = New Point(g.MeasureString(Btn.Text, New Font(Btn.Font.FontFamily, Btn.Font.Size + 4, Btn.Font.Style)).ToSize.Width, 23)
        Btn.FlatAppearance.MouseDownBackColor = Btn.BackColor
        Btn.FlatAppearance.MouseOverBackColor = Btn.BackColor
        Me.Controls.Add(Btn)

Het is niet de netste code en misschien ook niet de makkelijkste, maar hiermee zou het wel (ongeveer) moeten lukken...

Succes!:thumb:

MartinJM
 
Bedankt voor het antwoord, en sorry dat het zo lang duurde. Hele drukke weken achter de rug. Was ook veel weg.
Het werkt iig.

Is er ook een manier om deze vervolgens weer te verwijderen?
 
Je kan deze code gebruiken:
[CPP]For i As Integer = 0 To Me.Controls.Count - 1 Step 1
If Me.Controls(i).Name = "NAAM" Then
Me.Controls.RemoveAt(i)
End If
Next[/CPP]

Hierbij moet je wel zorgen dat elke 'label' een andere naam heeft... Ook moet je zorgen dat er absoluut geen andere controls zouden kunnen zijn met dezelfde naam. Anders zullen deze ook verwijderd worden.

Als dat niet de bedoeling is, dan moet je dat nog even aangeven, dan zal er een ingewikkeldere code moeten komen....

Succes!:thumb:

MartinJM
 
Het ging vooral om het verwijderen gedeelte. De rest moet ik wel uitkomen ;)

Bedankt!
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan