********************'函数作用:根据条件真假返回选定值中的某个'参数:blnCondition:条件变量,varResultTrue:条件为真时返回值,varResultFalse:条件为假时返回值Function IIF(blnCondition, varResultTrue,varResultFalse)   If CBool(blnCondition) Then      IIF = varResultTrue ...