如果输入的不是纯数字字符串或者空字符串,则直接500错误。所以输入前应该检查是否为数字类型。 复制代码 代码如下: Function JCID(ByVal ParaValue) nbsp;nbsp;nbsp; If ((Not isNumeric(ParaValue)) or (Trim(ParaValue)="")) Then nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; JCID=0 nbsp;nbsp;nbsp; Else nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp;nbsp; JCID=ParaValue nbsp;nbsp;nbsp; End If End function