I have a problem! I start with:
Dim variables As List(Of Decimal)
Then:
variables.Add(cur) ListBox2.Items.Add(Text