国产高清在线免费观看-国产高清在线免费无码-国产高清在线男人的天堂-国产高清在线视频-国产高清在线视频精品视频-国产高清在线视频伊甸园

cint與clng含義：

都可以強制將一個表達式轉換成數據類型

cint與clng處理數據的范圍：

CInt    Integer       -32,768 至 32,767，小數部分四舍五入。
CLng    Long         -2,147,483,648 至 2,147,483,647，小數部分四舍五入。

所謂溢出指的是超出處理數據的范圍，下面代碼是處理數據防止溢出的代碼，大家可以自己看看：

'檢測是否是短整數
代碼如下:
sub Is_Int(string)
if len(abs(string))>10 then response.write "數據溢出":response.end
if instr(string,"-")<1 then
       if cint(left(string,4))>3276 and cint(right(string,1))>7 then response.write "數據溢出":response.end
    else
      if cint(left(abs(string),4))>3276 and cint(right(string,1))>8 then response.write "數據溢出":response.end
   end if
end sub

'檢測是否是長整數
代碼如下:
sub Is_Lng(string)
if len(abs(string))>10 then response.write "數據溢出":response.end
if instr(string,"-")<1 then
       if clng(left(string,9))>214748364 and clng(right(string,1))>7 then response.write "數據溢出":response.end
    else
      if clng(left(abs(string),9))>21478364 and clng(right(string,1))>8 then response.write "數據溢出":response.end
   end if
end sub