Index

[Will]

Hey guys, i have 5 buttons created on runtime, in vb 6.0, each button had a unique index, how is done in vb.net? bellow is the code

Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As System.EventArg s) Handles MyBase.Loa
Dim i As Integer =
Dim myPic(10) as pictureBo
Dim yAxis As Integer =
For i = 0 To

MyPic(i) = New PictureBo

MyPic(i).Width = 13
MyPic(i).Height = 4

'Mypic(i).Font = New Font("Verdana", 9.75!, FontStyle.Regul ar

MyPic(i).BackCo lor = Drawing.Color.B lac
MyPic(i).SizeMo de = PictureBoxSizeM ode.StretchImag
MyPic(i).Locati on = New System.Drawing. Point(Left, Top
MyPic(i).Name = "Pic" &
'Mypic(i).Text = rst("ProductNam e").Valu
MyPic(i).Locati on = New Point(660, yAxis
MyPic(i).Cursor = Cursors.Han
MyPic(i).BringT oFront(
Me.Controls.Add (MyPic(i)
MyPic(i).Image = ImageList1.Imag es.Item(i

AddHandler MyPic(i).Click, AddressOf mypic_clic
yAxis = yAxis + 5 + MyPic(i).Heigh
Nex
End Su

NEED THE CODE PLEAS

THANX IN ADVANCE

[Patrick Steele [MVP]]

In article <2F************ *************** *******@microso ft.com>,
an*******@discu ssions.microsof t.com says...

Hey guys, i have 5 buttons created on runtime, in vb 6.0, each button

had a unique index, how is done in vb.net?

1) Create a form-level ArrayList.
2) After creating the button, add it to the ArrayList at the specified
index. Example:

myList.Insert(i , myNewButton)

3) In the click event handler, the "sender" object will be the button
that was pushed. Use the "IndexOf" method to find out which button was
pushed:

Dim index As Integer = myList.IndexOf( sender)

--
Patrick Steele
Microsoft .NET MVP
http://weblogs.asp.net/psteele

[Herfried K. Wagner [MVP]]

* "=?Utf-8?B?V2lsbA==?=" <an*******@disc ussions.microso ft.com> scripsit:

Hey guys, i have 5 buttons created on runtime, in vb 6.0, each button
had a unique index, how is done in vb.net? bellow is the code:

Creating Control Arrays in Visual Basic .NET and Visual C# .NET
<http://msdn.microsoft. com/library/?url=/library/en-us/dv_vstechart/html/vbtchCreatingCo ntrolArraysInVi sualBasicNETVis ualCNET.asp>

--
Herfried K. Wagner [MVP]
<http://www.mvps.org/dotnet>

[Patrick Steele [MVP]]

In article <5F************ *************** *******@microso ft.com>,
an*******@discu ssions.microsof t.com says...

Great example one question, could you please give me an example (code) on how to create a form-level ArrayList ?
thanx

Just define it outside of all of your methods:

Public Class MyForm
Inherits Form

Private myList As ArrayList = new ArrayList()

...
--
Patrick Steele
Microsoft .NET MVP
http://weblogs.asp.net/psteele

[Cor]

Hi Will,

I do not understand this, this is almost the sample I gave you and the code
is VB.net code how did you do this in VB6?

Cor

Private Sub Form1_Load(ByVa l sender As System.Object, ByVal e As System.EventArg s) Handles MyBase.Load Dim i As Integer = 0
Dim myPic(10) as pictureBox
Dim yAxis As Integer = 9
For i = 0 To 1
MyPic(i) = New PictureBox

MyPic(i).Width = 130
MyPic(i).Height = 40

'Mypic(i).Font = New Font("Verdana", 9.75!, FontStyle.Regul ar)

MyPic(i).BackCo lor = Drawing.Color.B lack
MyPic(i).SizeMo de = PictureBoxSizeM ode.StretchImag e
MyPic(i).Locati on = New System.Drawing. Point(Left, Top)
MyPic(i).Name = "Pic" & i
'Mypic(i).Text = rst("ProductNam e").Value
MyPic(i).Locati on = New Point(660, yAxis)
MyPic(i).Cursor = Cursors.Hand
MyPic(i).BringT oFront()
Me.Controls.Add (MyPic(i))
MyPic(i).Image = ImageList1.Imag es.Item(i)
AddHandler MyPic(i).Click, AddressOf mypic_click
yAxis = yAxis + 5 + MyPic(i).Height
Next
End Sub

NEED THE CODE PLEASE

THANX IN ADVANCE

[Cor]

Hi Herfried,

This is a message about a VB.net sample I gave can this be done in VB6?

Cor

[Cor]

Hi Patrick,

This is a message about a VB.net sample I gave, can this be done in VB6?

In my sample is no need for an Arraylist I use that almost always, except
when the array is fixed as is in this sample.

Cor

[Cor]

Hi Patrick,

This is the correct answer by the way, accoording to my sample, although it
is an array

Just define it outside of all of your methods:

But I did wanted to keep the sample nice and putted it inside the procedure.
Using directcast with the sender in the event, that I also supported (it is
disapeared now), it is not really needed, but when you do more with it, it
can be the answer.

And when the array really becomes dynamic using an arraylist is of course
better.

Cor

[Herfried K. Wagner [MVP]]

Cor,

* "Cor" <no*@non.com> scripsit:

This is a message about a VB.net sample I gave can this be done in VB6?

What? Sorry, I don't understand what you want to tell me...

:-(

--
Herfried K. Wagner [MVP]
<http://www.mvps.org/dotnet>

[Cor]

Hi Herfried,

The poster tells that he has created this in VB6 while it is code I
supported to him on 26-1.
(You should have seen it before because I have contributed this so much,
because I find it a real nice example because it is so simple).

And now I am curious if this code can be done in VB6 because you are
answering that.

This is the start of the original thread

Hey guys, i have 5 buttons created on runtime, in vb 6.0, each button had a

unique index, how >is done in vb.net? bellow is the code:

I think that code cannot be done in VB6.

Or am I crazy?

Cor