请尝试在 N 之后加一个空格，其他地方编译器会自动加空格的，唯独当变量后跟&时编译器无法编译通过。加完空格后，编译器会自动修正为：
MsgBox "1+2+3+...+" & N & "=" & S, vbOKOnly, "计算阶乘"
