vb.net - 使用内联 IF 语句 vb.net

Question

代码的简要信息如下。该代码采用一堆字符串并按如下方式将它们合并，并在中间使用 if 语句来决定是否对其中一个字符串进行合并。问题是 If(Evaluation, "", "")提示说它不能为空或必须是资源..当评估只是检查一个对象以确保它不是空的并且对象中的一个属性被检查如下时，我该如何解决这个问题:

Dim R as string = stringA & " * sample text" & _
    stringB & " * sample text2" & _
    stringC & " * sameple text3" & _
    If(ApplyValue IsNot Nothing AndAlso ApplyValue.CheckedBox Then ,StringD & " * sample text4" & _
    , NOTHING)
stringE & " * sample text5"

VS 正在提示 applyValue。有任何想法吗？

应该注意的是，我已经尝试了以下只是为了看看它是否有效并且 VS 拒绝了它:

Dim y As Double
Dim d As String = "string1 *" & _
    "string2 *" & _
    If(y IsNot Nothing, " * sample text4", "") & _
    "string4 *"

这是它标记 y 的内容:

  'IsNot' requires operands that have reference types, but this operand has the value type 'Double'.    C:\Users\Skindeep\AppData\Local\Temporary Projects\WindowsApplication1\Form1.vb 13  16  WindowsApplication1

Answer 1

使用 IIF 三元表达式计算器

Dim R as string = stringA & " * sample text" & _
                  stringB & " * sample text2" & _
                  stringC & " * sameple text3" & _
                  IIf(ApplyValue IsNot Nothing AndAlso ApplyValue.CheckedBox, StringD & " * sample text4", "") & _
                  stringE & " * sample text5"

编辑:如果您从 2008 年开始使用 VB.NET，您也可以使用

IF(expression,truepart,falsepart)

这更好，因为它提供了短路功能。

Dim R as string = stringA & " * sample text" & _
                  stringB & " * sample text2" & _
                  stringC & " * sameple text3" & _
                  If(ApplyValue IsNot Nothing AndAlso ApplyValue.CheckedBox, StringD & " * sample text4", "") & _
                  stringE & " * sample text5"