请问我这句话错在哪里了？为什么不能得到我要的值？

[allergan]

If chkKaoqin.Value = 1 Then
IIf optKaoqin_0.Value, strVal = strVal & "N120='0',", strVal = strVal & "N120='1',"
Else
strVal = strVal & "N120='',"
End If
If chkJiazhong.Value = 1 Then
IIf optJiazhong_0.Value, strVal = strVal & "N130='0',", strVal = strVal & "N130='1',"
Else
strVal = strVal & "N130='',"
End If
If chkFading.Value = 1 Then
IIf optFading_0.Value, strVal = strVal & "N140='0',", strVal = strVal & "N140='1',"
Else
strVal = strVal & "N140='',"
End If

[supergreenbean]

至少，第一眼就看到你iif用错了
val=iif(condition,truepart,falsepart)

[射天狼]

Dim strVal As String

If chkKaoqin.Value = 1 Then
strVal = IIf(optKaoqin_0.Value, strVal & "N120='0',", strVal & "N120='1',")
Else
strVal = strVal & "N120='',"
End If
If chkJiazhong.Value = 1 Then
strVal = IIf(optJiazhong_0.Value, strVal & "N130='0',", strVal & "N130='1',")
Else
strVal = strVal & "N130='',"
End If
If chkFading.Value = 1 Then
strVal = IIf(optFading_0.Value, strVal & "N140='a0',", strVal & "N140='1',")
Else
strVal = strVal & "N140='',"
End If

[射天狼]

IIF 是返回TRUEPAR或者FALSEPART部分，而不能执行这两部分的代码！！
你把赋值部分放到那里面肯定不对！！

strVal = IIf(optFading_0.Value, strVal & "N140='a0',", strVal & "N140='1',")
应该这样！

[visualzuo]

完全同意楼上的，就不多说了