txtboxen vulen met geselecteerde lijn uit een listbox

Hello,
Ik leer programmeren in visual basic 2015 en heb het volgende probleem.
Ik heb 4 txtboxen nl. txtnaam, txtvoornaam ,txtadres en txtgemeente. De gegevens uit de txtboxen zet ik in een listbox. Ik voorzie 30 spaties voor elke txtbox.
De gegevens invoeren lijkt geen probleem. Maar wanneer ik in de listbox een gegeven selecteer zou ik willen dat de txtboxen met die gegevens gevuld worden, nl txtnaam met de naam enz.
Voor het toevoegen gebruik ik de volgende code:
Dim strlijn As String
strlijn = Microsoft.VisualBasic.Left(txtNaam.Text & Space(30), 30)
strlijn = strlijn & Microsoft.VisualBasic.Left(txtVoornaam.Text & Space(30), 30)
strlijn = strlijn & Microsoft.VisualBasic.Left(txtStraat.Text & Space(30), 30)
strlijn = strlijn & Microsoft.VisualBasic.Left(txtGemeente.Text & Space(30), 30)
lst1.Items.Add(strlijn)
Heeft iemand mij een eenvoudige oplossing daarvoor.
Mvg.