相当于 VBA 的 EndL

Question

所以我正在构建 s 字符串，我希望它与每个条目一起逐行组织。那么简单地说，VBA中EndL的等价物是什么？

这是我的代码：

If chkMonA = True Then
    additionString = additionString + "Monday"
End If
If chkTuesA = True Then
    additionString = additionString + "Tuesday"
End If
If chkWedA = True Then
    additionString = additionString + "Wednesday"
End If
If chkThursA = True Then
    additionString = additionString + "Thursday"
End If
If chkFriA = True Then
    additionString = additionString + "Friday"
End If

对于那些不懂任何 C++ 的人，我将举例说明我正在尝试做什么。假设 chkTuesA、chkThursA 和 chkFriA 都为真。我希望 additionStrings 输出看起来像这样：

Tuesday
Thursday
Friday

Answer 1

vbLf（Lf = 换行）

additionString = additionString + "Monday" + vbLf

Answer 2

假设输出是一个由换行符分隔的字符串，而不是一个数组我会写一个这样的函数：

Function AddToString(byval sAdditionString as string, sDay as string) as String

Dim sReturn as String

sAdditionString = iif(sAdditionString="", _
  sReturn = sDay, sReturn = sAdditionString & vbNewLine & sDay)

AddToString = sReturn

end function

然后这样调用：

additionString = AddToString(additionString,"Monday")

Answer 3

使用VBNewLine或VBLf到return一个新行。

相当于 VBA 的 EndL

Equivalent to EndL for VBA

ms-access

vba