How to do this ?

As I said when you asked this last time: you need to store this in a file or in the applications settings and reload them when you open the application.

If you have a specific problem with how to do that, ask about it, but don't ask a general questions and expect a detailed answer.


"What do you mean by storing in a file or application settings?
How to do that?"

To store them in a file is pretty easy. If you want to add three companies - IBM, Dell and Acer say, then all you have to do is put them into an array of strings:

Private Sub saveCompanies()
	Dim company1 As String = "IBM"
	Dim company2 As String = "Dell"
	Dim company3 As String = "Acer"
	Dim companies As String() = New String(2) {}
	companies(0) = company1
	companies(1) = company2
	companies(2) = company3
	File.WriteAllLines("D:\Temp\MyCompanies.txt", companies)
End Sub
Private Sub loadCompanies()
	Dim companies As String() = File.ReadAllLines("D:\Temp\MyCompanies.txt")
	For Each company As String In companies
		Console.WriteLine(company)
	Next
End Sub

Obviously, most of that code is just setting up the data - you would probably use a List of strings and add them as you create the controls. You can then use the List directly to save the names in the file instead of an array as I showed.
When you read them out, you create your controls using pretty much the code you have already, just taking each name as it comes in turn instead of writing it to the console.

To do it via the program settings is a little harder, but not a lot - try it with a file first!