新建From1（窗体），新建Command1（按钮CommandButton），代码：

Private Sub Command1_Click()
    Debug.Print "a" & vbNewLine & "b" & vbCrLf & "c"
End Sub

运行结果：

a
b
c

可以看到vbNewLine等于vbCrLf