For Each Statment Threw All Items in a ListBox (How to format in Visual Basic)

[ChristianTellierVB]

I would like to run a series of expressions on all the integers in, lets say, ListBox1. Those items will be integers ranging from 1 - 9999, depending on what is inputed. It runs like so; [1234] as a Item of 25, will be decomposed in individual digits [1] [2] [3] [4], in different ListBoxes. The final will reassemble all the digits.

I want to run this code:

(One of many sections, but this one seperates a number with four digits)
Digit1 = number \ 1000
number = number Mod 1000
Digit2 = number \ 100
number = number Mod 100
Digit3 = number \ 10
number = number Mod 10
Digit4 = number

This part would have to run threw all Items in ListBox1, then put each digit in;

Digit1 goes in Listbox2, Digit2, goes in Listbox2... Digit4 goes in Listbox5

[Listbox1] [Listbox2] [ Listbox3] [Listbox4] [Listbox5] [Listbox6]

Listbox6 is for the reassembly.

Continue reading...