دیگه برادر من دیگه از این جامع تر
ولی یه توضیح مختصر

اولا که هرجا List box بود رو به Textbox ویا نام تبدیلی آن تغییر بده

دوم اینکه
در قسمت

Dim Num As Integer = GetSetting(Application.ExecutablePath, "List Box (It can be anything else)", _
"List Box Count (It can be anything else)", 0)
For i As Integer = 0 To Num - 1
lst.Items.Add(GetSetting(Application.ExecutablePat h, "ListBox Items (It can be anything else)", _
"Item " & i, 0))
Next


از GetSetting برای بارگذاری هستش که باید در جایی که میخوای مطلب رو ازرجیستری بخونی قرار بدی

سوم اینکه


'Saving the number of Items in the List box :
SaveSetting(Application.ExecutablePath, "List Box (It can be anything else)", _
"List Box Count (It can be anything else)", lst.Items.Count)
'Saving each item :
For i As Integer = 0 To lst.Items.Count - 1
SaveSetting(Application.ExecutablePath, "List Box Items (It can be anything else)", _
"Item " & i, lst.Items.Item(i))
Next

از SaveSetting برای ذخیره مطالب در رجیستری میباشه

وقسمت اول هم که مشخصه برای پرکردن List box میباشد که اگر Textbox خالی نباشد عنوان را به Listbox میافزاید
که شما به این قسمت نیاز ندارید چرا که شما ایتم های لیست باکس و یا کمبوباکس را ذخیره نمیکنید