Dim Variables in a Loop

Hello,

I have the need to go through a loop to fill a listbox that I am dynamically creating.  I need to dim a new ListItem
each time as in (below):  I have just given a small sample here, the actual listbox is quite long and I want to do this in a loop if possible, but I don't know how to generate the variable names liAddItem1, liAddItem2, liAddItem3 etc. etc. going through a for-next loop.  Please show me how to do this in VB.Net.

                   
                    Dim liAddItem1 As New ListItem
                    liAddItem1.Text = "Add Platform >>"
                    liAddItem1.Value = "001"
                    lbxAddEditDel.Items.Add(liAddItem1)

                    Dim liAddItem2 As New ListItem
                    liAddItem2.Text = "Edit Platform >>"
                    liAddItem2.Value = "002"
                    lbxAddEditDel.Items.Add(liAddItem2)

                    Dim liAddItem3 As New ListItem
                    liAddItem3.Text = "Delete Platform >>"
                    liAddItem3.Value = "003"
                    lbxAddEditDel.Items.Add(liAddItem3)
                    '
                   
Thanks much. msyed1.