yo creo que esto es lo que pidio:
If List1.Text = "Argentina" Then
Text1.Text = Text1.Text & "Bueno Aires;"
ElseIf List1.Text = "Brasil" Then
Text1.Text = Text1.Text & "Brasilia;"
ElseIf List1.Text = "Peru" Then
Text1.Text = Text1.Text & "Lima;"
End If
Si no es hasi no se.....Suerte muchachos