vbscript 将字符串转变为整数

时间:2021-01-28 07:27:48

在网页操作的时候,经常用到将一个字符串转为整数的情况,比如:

i=div.style.left

如果采用

div.style.left=div.style.left + 10

那么就会产生一个错误,因为div.style.left返回的如: 100px的字符串值。

在vb下提供有val()函数,而在vbscript中居然没有类似的函数;javascript 中也有个 parseInt() 函数。

我们只有自己动手写个转换函数:

 

function val(str)
 dim j
 dim tempstr
 tempstr=""
 for j=1 to len(str)
  if isnumeric(mid(str,j,1)) then
   tempstr=tempstr & mid(str,j,1)
  else
   exit for 
  end if
 next
 if tempstr="" then
  val=0
 else
  val=clng(tempstr)
 end if
end function

 

用法:

div.style.left=val(div.style.left)+5