bycj.net
当前位置:首页 >> vBs字符串转数字 >>

vBs字符串转数字

用CInt函数 如:a="123" b=CInt(a)'则b=123而再不是b="123"了

用cint函数,主要要是含有非数字字符会报错:'代码开始<% dim a,b,ia= request.Form("am")'表单中输入的数字b= request.Form("bm")'表单中输人的数字i=cint(a)+cint(b)response.Write(i)%>'代码结束

cint,clng,csng跟VB的方法是差不多的.前提是要转换的字符串能转换成数值类型.

dim n1 as Long if IsNumeric(str1) then n1=Clng(str1)'如果确定是数值可以直接转,否则先判断是否为数字,然后转换成long,有空格会认为是字符串,可用Trim()

CInt ---Integer CLng ---Long CDbl ---Double <script language=vbscript> str="1.56" num1=CInt(str) num2=CLng(str) num3=CDbl(str) MsgBox num1 MsgBox num2 MsgBox num3 </script>

Public Function StrToHex(ByVal strS As String) As String'将字e799bee5baa6e59b9ee7ad9431333431353264符串转换为16进制 Dim abytS() As Byte Dim bytTemp As Byte Dim strTemp As String Dim lLocation As Long abytS = StrConv(strS,

a=cstr(b)即把变量b转换为字符串 即文本拜托 楼上的简洁点

字符串不能相加操作vbscript中 &是连接二个字符串,起连接字符串作用userconnet=userqq+"|"+usermsn+"|"+useruc+"|" 这种是javascript中的写法,+号也是连接二个字符串的vbscript没有这种写法

用cint函数,主要要是含有非数字字符会报错:'代码开始'代码结束

Dim ControlKeyMsgbox InPasswordFunction InPasswordDim IeSet Ie=WScript.CreateObject("InternetExplorer.Application","UE_")With Ie .Navigate "about:blank" .FullScreen=1 .Width=300 .Height=72 .Document.Body.Scroll="no" .

网站首页 | 网站地图
All rights reserved Powered by www.bycj.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com