Here's how you can do it:

Dim st As String
st = "Line 1" & vbCrLf & "Line 2"

You can also use vbNewLine, which has the same effect, but vbCrLf is more commonly used for compatibility with various Windows systems.