如何用ASP编写一个数是否是正负数
发布网友
发布时间：2小时前
共3个回答
热心网友
时间：2小时前
呃，问题好直接，看你是什么情况下
ASP一般是网页接受数据，若果是从表格来的需要数据转换
String -〉 Integer， double， long 等，看具体情况
基本的判断代码如下（x为输入值； y是要你结果， y=0 为负数，y=1为正数）
调用代码
y = pnDiff(x)
功能程式
ASP下：
Function pnDiff(x As Double)
If x < 0 Then
y = 0
Else
y = 1
End If
Return y
End Function
ASP.Net 下：
Public Function pnDiff(x As Double)
If x < 0 Then
y = 0
Else
y = 1
End If
Return y
End Function
我这里没有ASP编辑器了，所以代码纯写的，有问题你回馈给我，我帮你改
如果能用了，记得帮我加分哈，谢谢
热心网友
时间：2小时前
function isNume(str)
dim regEx,t1,t2
isNume=false
if(isNumeric(str)) then isNume=true
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = "(^\+?|^\d?)\d*\.?\d+$"' 设置模式。
t1=regEx.test(str)
regEx.Pattern = "^-\d*\.?\d+$"' 设置模式。
t2=regEx.test(str)
set regEx=nothing
if t1 or t2 then
isNume=true
end if
end function
response.Write(isNume("-5"))
热心网友
时间：1小时前
一楼真是急于要分啊!用的是VB语言,写时有时使用C族的东西也整出来了!算了吧,分给一楼吧!
一般情况下函数要有自己的使用环境,所以写时要考虑一下具体的使用方式的!
asp/vb
function pnDiff(x as Double) as int
if x >0 then
pnDiff = 1
end if
if x=0 then
pnDiff = 0
end if
if x<0 then
pnDiff = -1
end if
end Function
这种写法应该好些吧？反回值应该使用"函数名=表达式"的方法而不是return 关键词的！
这种方式写的是一个模拟，我记着VB中有一个sign函数的！这个函数就是返回相应的符号，这是我写的这个返回值的！
