setting a listbox's selection

[Bernie Yaeger]

I want to open a window with a listbox (custlist) in it, but I want to
automatically select a certain item in the listbox, and have it be the
correct selectedindex. The call to open this window knows what it seeks,
which is variable. So one time I may wish to select item 45 (marsdon) and
sometimes item 1997 (albert). How can I do this?

Thanks for any help.

Bernie Yaeger

[Joseph MCP]

August 7, 2004

You can use custlist.Select edIndex = index or
custlist.Select edItem =
String. The following is an example of selecting a item based on a
random
number. The listbox1.items are: Test1, Test2, Test3, ..., Test6.

Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load

Randomize()
Dim r As Integer
r = Int(Rnd() * 5)
Label1.Text = r 'Displays number for testing purposes
ListBox1.Select edItem = "Test" & r ' OR
Listbox1.Select edIndex = r - 1 ' - 1 because of zero based array
End Sub

These methods work fine for your purpose. Have a nice day!
Joseph MCP
"Bernie Yaeger" wrote:

I want to open a window with a listbox (custlist) in it, but I want to
automatically select a certain item in the listbox, and have it be the
correct selectedindex. The call to open this window knows what it seeks,
which is variable. So one time I may wish to select item 45 (marsdon) and
sometimes item 1997 (albert). How can I do this?

Thanks for any help.

Bernie Yaeger

[Bernie Yaeger]

Hi Joe,

I actually found another way of getting this done, but tx - you suggestion
worked fine as well!

Thanks again,

Bernie

"Joseph MCP" <Jo*******@disc ussions.microso ft.com> wrote in message
news:10******** *************** ***********@mic rosoft.com...

August 7, 2004

You can use custlist.Select edIndex = index or
custlist.Select edItem =
String. The following is an example of selecting a item based on a
random
number. The listbox1.items are: Test1, Test2, Test3, ..., Test6.

Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load

Randomize()
Dim r As Integer
r = Int(Rnd() * 5)
Label1.Text = r 'Displays number for testing purposes
ListBox1.Select edItem = "Test" & r ' OR
Listbox1.Select edIndex = r - 1 ' - 1 because of zero based array
End Sub

These methods work fine for your purpose. Have a nice day!
Joseph MCP
"Bernie Yaeger" wrote:

I want to open a window with a listbox (custlist) in it, but I want to
automatically select a certain item in the listbox, and have it be the
correct selectedindex. The call to open this window knows what it seeks, which is variable. So one time I may wish to select item 45 (marsdon) and sometimes item 1997 (albert). How can I do this?

Thanks for any help.

Bernie Yaeger