谁能给我解释以下这段脚本语言的具体含义

谁能给我解释以下这段脚本语言的具体含义 [无满意答案结帖,结帖人:balinghousheng]

balinghousheng
该用户很懒,没有设置昵称
等级:
可用分等级：长工
总技术分：0
总技术分排名：322578
结帖率：95.45%

发表于：2008-08-20 14:34:12 楼主

Function Show(m)
If (Myform.Expression.Value = "" AND InStr(". + - * / ",m)) Then
Myform.Expression.Value = ""
ElseIf (InStr("+ - * / . ",Right(Myform.Expression.Value,1)) And InStr("+ - * / ",m)) Then
ElseIf (m = ".") Then
If (InStr("+ - * / . ",Right(Myform.Expression.Value,1))) Then
ElseIf ((InstrRev(Myform.Expression.Value,".") > InstrRev(Myform.Expression.Value,"+")) And (InstrRev(Myform.Expression.Value,".") > InstrRev(Myform.Expression.Value,"-")) And (InstrRev(Myform.Expression.Value,".") > InstrRev(Myform.Expression.Value,"*")) And (InstrRev(Myform.Expression.Value,".") > InstrRev(Myform.Expression.Value,"/"))) Then
Else
Myform.Expression.Value = Myform.Expression.Value + m
End If
Else
Myform.Expression.Value = Myform.Expression.Value + m
END If
End Function

问题点数：20 回复次数：0 修改删除举报引用回复