You need to set the text box multi line option to sisplay multiple lines e.g.

Option Explicit

Private Sub UserForm_Initialize()
    With ComboBox1
        .AddItem "England"
        .AddItem "France"    'etc.
    End With
    TextBox1.MultiLine = True
End Sub

Private Sub ComboBox1_Change()

    If ComboBox1.value = "England" Then
        TextBox1.value = "Address Line 1" & Chr(11) & _
                         "Address Line 2" & Chr(11) & _
                         "Address Line 3"

    ElseIf ComboBox1.value = "France" Then
        TextBox1.value = "Again I put the full address here"    'etc.

    End If

End Sub