Keskustelu: Ohjelmointikysymykset: VB.NET: [VB2008] labelit taulukkoon

jokke568 [17.04.2009 23:26:20]

Hei

VB6:ssa kun kopioi esim label1 :sen kysyi ohjelma luodaanko, kun on jo olemassa, kun vastasi kyllä muuttui vanhan nimeksi label1(0) ja uuden label1(1):ksi ja seuraava label1(2):ksi jne.
Oli helppo ohjata labelia silmukoiden tms avulla kun pystyi käyttämään indeksilukua...

Miten tätä samaa indeksiluku juttua pystyy toteuttamaan VB2008:ssa? Kun kopioin Label1:sen tulee siitä automaattisesti Label2 ...

Pystynkö tekemään jonkin ryhmän johon saan liitettyä eri labelit ja ne lisäysjärjestyksen mukaan muuttuisivat ryhmän LisätytLabelit(x) jäseniksi..

Osaako joku auttaa epäselvästi esitetyn ongelmani kanssa?

t. Jokke

Grez [17.04.2009 23:44:58]

Nähdäkseni tuollaisia taulukoita pystyy kyllä tekemään jos duunailee ne suoraan koodiin, mutta sen jälkeen se graafinen työkalu ei enää toimi.

neau33 [18.04.2009 02:21:13]

Moikka jokke568!

tee vaikka olio...

Public Partial Class MainForm

   Private Structure Olio
      Dim ctl As Object
   End Structure
   Private Labellit() As Struct.MainForm.Olio

   Public Sub New()

      Me.InitializeComponent()

   End Sub

   Sub MainFormLoad(sender As Object, e As EventArgs)

      ReDim Labellit(0 To 4)
      For i As Integer = 0 To _
      Labellit.GetUpperBound(0)
         Labellit(i).ctl = _
         New System.Windows.Forms.Label()
         Labellit(i).ctl.Name = _
         "Labelli" & i.ToString
         Labellit(i).ctl.Top = _
         i * Labellit(i).ctl.Height
         Labellit(i).ctl.Text = _
         "Labelli" & i.ToString
         Me.Controls.Add(Labellit(i).ctl)
      Next

   End Sub

   Sub Button1Click(sender As Object, e As EventArgs)

      Labellit(0).ctl.Text = "Labelli(0)"
      Labellit(1).ctl.Text = "Labelli(1)"
      Labellit(2).ctl.Text = "Labelli(2)"
      Labellit(3).ctl.Text = "Labelli(3)"
      Labellit(4).ctl.Text = "Labelli(4)"

   End Sub

End Class

jokke568 [18.04.2009 23:25:31]

Kiitos taas Nea!

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Kirjautuminen