Solved

How do I bind an array to a listbox?

Posted on 2004-10-01
3
1,270 Views
Last Modified: 2008-03-24
Greetings Experts...

Disclaimer: Newbie

I've been playing around with writing my own classes and have actually been fairly successful. That being said. I'm trying to use an array as a property in a class. I don't know how to bind the array to a listbox, I don't even know if I declared the array correctly.

Here's the code in the class

    Dim lweekstr As Array = Array.CreateInstance(GetType(Object), 53)
    Public Property weekstr() As Array
        Get
            Return lweekstr
        End Get
        Set(ByVal Value As Array)
            lweekstr = Value
        End Set
    End Property

Here's the code in the class that instantiates the above:

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim f As New ClassLibrary1.CalendarClass
        f.Year = 2004
        f.test() 'this method populates the array
        Me.ListBox1.DataSource = f.weekstr
        '---- this code tests to see if there is something in the array(there is)
        Dim c As Integer
        For c = 1 To 10
            MsgBox(f.weekstr(c))
        Next
    End Sub

Thanks in advance for your help
 
0
Comment
Question by:KenDickinson
3 Comments
 
LVL 96

Expert Comment

by:Bob Learned
ID: 12202846
If you are trying to store an Integer into an Object array, there is a performance hit from converting a value type (Integer) into an object type to store in the array (this is called boxing).  Use a type-specific declaration instead:

Dim lWeekStr As Integer()

Bob
0
 
LVL 8

Accepted Solution

by:
bramsquad earned 500 total points
ID: 12202942
       this works

        Dim arr As Integer() = {1, 2, 3, 4}
        For i As Integer = 0 To arr.GetUpperBound(0)
            Me.ListBox1.Items.Add(arr(i))
        Next

~b
0
 
LVL 28

Expert Comment

by:iboutchkine
ID: 12203497
To bind lb to array
  ListBox1.DataSource = (arr)


To ppulate array from lb

ListBox1.Items.CopyTo(arr, 0)



or all together - populate array from lb and back to array

 Dim arr(ListBox1.Items.Count - 1)

        ListBox1.Items.CopyTo(arr, 0)
        ListBox1.Items.Clear()
        MessageBox.Show(Join(arr, ";"))
        ListBox1.Items.AddRange(arr)
0

Featured Post

Microsoft Certification Exam 74-409

Veeam® is happy to provide the Microsoft community with a study guide prepared by MVP and MCT, Orin Thomas. This guide will take you through each of the exam objectives, helping you to prepare for and pass the examination.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This tutorial demonstrates one way to create an application that runs without any Forms but still has a GUI presence via an Icon in the System Tray. The magic lies in Inheriting from the ApplicationContext Class and passing that to Application.Ru…
Introduction When many people think of the WebBrowser (http://msdn.microsoft.com/en-us/library/2te2y1x6%28v=VS.85%29.aspx) control, they immediately think of a control which allows the viewing and navigation of web pages. While this is true, it's a…
This Micro Tutorial will teach you how to censor certain areas of your screen. The example in this video will show a little boy's face being blurred. This will be demonstrated using Adobe Premiere Pro CS6.
Email security requires an ever evolving service that stays up to date with counter-evolving threats. The Email Laundry perform Research and Development to ensure their email security service evolves faster than cyber criminals. We apply our Threat…

809 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question