How to add item in listbox at specific index and duplicate it ?

[Mostafa Salaheldien]

hello everyone,

I have 2 listbox and 1 textbox



listbox 1 listbox 2

sat 100

sun 200

sat 100

sun 200

so if textbox = 2 i want to insert item after each 2 item and here it will be

listbox 1 listbox 2

Room Price

sat 100

sun 200

Room Price

sat 100

sun 200

what in need is to add item room and add item price

iam using this code to insert item at the beginning of each list and it will be fixed

Listdays.Items.Insert(x, " Room")
Listrates.Items.Insert(x, " Price")

and for the rest item iam using but its not working

Dim x As Integer = Listdays.Items.Count -1 / TextBox2.Text
For Each Item As Integer In Listdays.Items
Listrate.Items.Insert(x, " price")
Listdays.Items.Insert(x, " Romm no")
Next

i need to insert item for the both listbox every value for textbox2.text

if it will be 2 i want to insert after 2 items

if it will be 3 i want to insert after 3 items etc


thanks in advance

Continue reading...