vb数据转换函数

第六课常用函数介绍一、常用内部函数在VB内部提供了大量函数。

在这些函数中，有些是通用的。

有些则与某种操作有关的。

大体分成五类，分别是：转换函数、数学函数、日期函数、时间函数和随机函数。

（5）随机函数Rnd(x) 产生一个0~1之间的单精度随机数Rnd函数可以产生随机数，当一个应用程序不断地重复使用随机数时，同一序列的随机数会反复出现，用Randomize语句可以消除这种情况。

二、字符串函数（1）删除空白字符函数①左部截取格式：Left（字符串，n）返回字符串的前n个字符（n≥0）。

②中部截取格式：Mid（字符串，p，n）从第P个字符开始，向后截取n个字符（P>0，n≥0）。

函数的第三个自变量可以省略。

在省略的情况下，将从第二个自变量指定的位置向后截取到字符串的末尾。

③右部截取格式：Right（字符串，n）返回字符串最后n个字符（n≥0）。

（3）字符串长度测试函数格式：Len(字符串)Len(变量名)用Len函数可以测试字符串的长度，也可以测试变量的存储空间。

（4）String函数格式：String（n，ASCII码）String（n,字符串）返回由n指定个数组成的字符串。

第二个自变量可以使用ASCII码，也可以是字符串。

（5）空格函数格式：Space（n）返回n个空格。

（6）字符串匹配函数格式：InStr（[首字符位置，]字符串1，字符串2 [,n]）在函数中“字符串1”中查找“字符串2”，如果找到了，则返回“字符串2”的第一个字符的位置。

若为字符串首字符，则位置为1。

说明：①“字符串2”的长度限于65535个字符内。

②“首字符位置”是可选项。

如果含有“首字符位置”，则从该位置开始查找，否则从“字符串1”的起始位置开始查找。

“首字符位置”是一个长整数。

③函数的最后n是可选项，类型为整型数，用来指定字符串比较。

取范围是：0、1、2。

为0使用二制进比较，区分字母的大小写；为1比较时忽略大小写；为2则基于数据库中包含的信息进行比较（限于Access数据库）。

ASP纯ASPVBscript常用函数：1.数值型函数：abs(num): 返回绝对值sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负hex(num): 返回十六进制值直接表示：&Hxx 最大8位oct(num): 返回八进制值直接表示：&Oxx 最大8位sqr(num): 返回平方根num>0int(num): 取整int(99.8)=99; int(-99.2)=100fix(num): 取整fix(99.8)=99; fix(-99.2)=99round(num,n): 四舍五入取小数位round(3.14159,3)=3.142 中点数值四舍五入为近偶取整round(3.25,1)=3.2log(num): 取以e为底的对数num>0exp(n): 取e的n次幂通常用num^nsin(num): 三角函数，以弧度为值计算(角度*Pai)/180=弧度con(num); tan(num); atn(num) 2.字符串函数：len(str)：计算字符串长度中文字符长度也计为一！mid(str,起始字符,[读取长度])：截取字符串中间子字符串left(str,nlen)：从左边起截取nlen长度子字符串right(str,nlen)：从右边起截取nlen长度子字符串Lcase(str)：字符串转成小写Ucase(str)：字符串转成大写trim(str)：去除字符串两端空格Ltrim(str)：去除字符串左侧空格Rtrim(str)：去除字符串右侧空格replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串注：默认值：起始字符1；替代次数不限；比较方法区分大小写（0）InStr([起始字符,]str,查找字符串[,比较方法])：检测是否包含子字符串可选参数需同时选返回起始位置InStrRev(str,查找字符串[,起始字符][,比较方法])：反向检测是否包含子字符串返回起始位置space(n)：构造n个空格的字符串string(n,str)：构造由n个str第一个字符组成的字符串StrReverse(str)：反转字符串split(str,分割字符串[,次数][,比较方法])：以分割字符串为分割标志将字符串转为字符数组可选参数需同时选3.数据类型转换函数：Cint(str)：转换正数True -1；False 0；日期距离1899/12/31天数；时间上午段0；下午段1；Cstr(str)：日期输出格式yyyy/mm/dd；时间输出格式Am/Pm hh:mm:ssClng(str)：与Cin()类似Cbool(num)：num不为零True；反之FalseCdate(str)：转换日期格式0：#Am 12:00:00#；正数距离1899/12/31天数的日期；浮点数日期＋小数时间Cbyte(num)：num<255 转换为字节Csng(str)：转换为单精度数值Cdbl(str)：转换为双精度数值Ccur(str)：转换为现金格式4.时间函数：date：取系统当前日期time：取系统当前时间now：取系统当前时间及日期值Datetime类型timer：取当前时间距离零点秒值，计时器，可计算时间差DateAdd(间隔单位,间隔值,日期)：推算相邻日期DateDiff(间隔单位,日期一,日期二)：计算时间差日期二-日期一Datepart(间隔单位,日期)：计算日期的间隔单位值Dateserial(date)：输出日期值（按序列计算）Timeserial(time)：输出时间值（按序列计算）DateValue(datetime)：取出字符串中日期值Timevalue(datetime)：取出字符串中时间值weekday(date)：计算星期几MonthName(date)：输出月分名year(datetime)：截取年份month(datetime)：截取月份day(datetime)：截取日hour(datetime)：截取小时minute(datetime)：截取分钟second(datetime)：截取秒5.其它函数：Array(unit,..)：动态生成数组Asc(str)：输出字符串第一个字符的ASCII码Chr(asc)：转换ASCII为字符Enter：Chr(13)&Chr(10)Filter(数组名称,关键字符串,[,包含][,比较方法])：将字符串数组中含有关键字符串的元素存成新的数组（默认）[包含]为false则取不包含的元素Join(ArrayName)：将数组中元素连成字符串Ubound(ArrayName[,维数])：取得数组相应维数的上界Lbound(ArrayName[,维数])：取得数组相应维数的下界一般为0Randmize n：启动随机数种子Rnd(n)：取得随机数，n>0或为空，取序列下一随机值，n<0，随机值相同，n=0，生产与上一随机值相同的数取介于A和B之间的随机正数C，公式：C=Int((B-A+1)*Rnd+A) 条件（B>A）子程序和自定义函数Sub StrSubName Function StrFunName(arg[1],..)子程序体函数体Exit Sub 中途跳出Exit Function 中途跳出End Sub StrFunName＝Value 返回值End Function[call] StrSubName 引用子程序Var=StrFunName(arg[1],..) 引用函数子程序和自定义函数可以递归调用；ASP六大对象常用语句示范：Response：Response.write StrVar/"String"：向网页写出参数值或字符串等同于在Html标记中嵌入<%=StrVar/"String"%>Response.End：停止页面编译，并将已经编译内容输出到浏览器Response.Buffer=True|False：页面编译时是否使用缓存的设置，一般在页面头部设置Response.Flush：强制输出页面已编译部分内容Response.Clear：将缓冲区内的数据清除Response.Redirect URL：停止页面编译或输出，转载指定所需页面Response.IsClientConnected：返回True|False，检测用户是否还处于连接状态Response.Charset(CharsetName)：设置页面编码类型，即<meta http-equiv="Content-Type" content="text/html; charset=gb2312">Response.ContentType [= ContentType ]：设置页面文件类型，同上Response.Expires [= number]：设置页面失效时间，单位分钟Response.ExpiresAbsolute [= [date] [time]]：设置页面失效的绝对时间Response.Status = StatusDescription：设置页面状态描述Request：Request("PassStrName")：读取网页传递值，包括表单及以？PassStrName＝value&PassStrName_n＝value_n形式Request[.collection|property|method](variable)Request.querystring("PassStrName")：读取Get方法传递的表单值和？PassStrName＝value Request.QueryString(Varible)[(Index).Count]Request.form("PassStrName")：读取Post方法传递的纯表单域的值Request.Form(Parameter)[(Index).Count]Request.ServerVaribles(Server Environment Variable)：读取客户端系统环境变量，详见参考Request.BinaryRead(Count)：读取指定字节数的传送值Request.TotalBytes：查询体的长度，以字节为单位，只读注：同名表单如：CheckBox如有多项值，传递形式如右，StrName=value1,value2,...需要用Split函数分割各项值Multiple的Select表单与CheckBox类似，TextArea的值可包含换行字符，用Replace转为<br>，以满足格式需要Session：（用户全局变量）Session("SesName")＝value：存储Session变量值，也可读取该值Session("SesName")＝Empty：判断Session值是否存在的两种方法IsEmpty(Session("SesName"))=True|False：判断Session值是否存在的两种方法Session.TimeOut=num：设置Session变量的存在时效，单位分钟Session.Abandon：清除所有Session变量值Session.SessionID：Session变量的ID序列号，只读Application：（应用程序全局变量）Application("AppName")＝value：存储Application变量值，也可读取该值Application("AppName")＝Empty：判断Application值是否存在的两种方法IsEmpty(Application("AppName"))=True|False：判断Application值是否存在的两种方法Application.Lock：Application变量值锁定，防止同时更改变量值Application.UnLock：Application变量值解锁，允许更改变量值注：Session与Application变量都可以用来存储数组和系统对象，引用方法是变量名相当于数组名而已，但不能直接改变其值，需要借助临时数组修改值后，再赋给Session与Application变量Global.asa文件的结构：<% @language="VBscript"%><% Sub Application_OnStart ...End SubSub Application_OnEnd ... End SubSub Session_OnStart ...End SubSub Session_OnEnd ... End Sub%>Server:Server.MapPath("FileUrl")：映射文件名的服务器站点绝对地址，Path=Server.MapPath(./)可以得到虚拟目录根路径Server.HtmlEncode("string")：转换为可以直接显示带Html格式的字符串，如：<,>等Server.URLEncode( "string")：转换为浏览器地址编码set Var＝Server.CreatObject("ObjName")：创建对象变量Server.ScriptTimeout = NumSeconds：ASP程序页面执行时限，以秒为单位Cookies: 存储在用户本机的临时变量，每个Cookie的最大字节4KB，最多可以有300个Cookie 1.2MBResponse.cookies("StrCookieName")＝value：存储Cookie变量值，也可读取该值Response.cookies("StrCookieName")＝""：判断是否为空Response.cookies("StrCookieName").Expires=Date：变量有效期，以天为单位，小于当前时间立即失效Response.Cookies(Cookie[(key).Attribute])：标准语法ObjectContext 控制ASP的事务处理ObjectContext.OnTransactionAbort：由放弃的事务处理事件激发，在脚本完成处理后发生ObjectContext.OnTransactionCommit：由成功的事务处理事件激发，在脚本完成处理后发生ObjectContext.SetAbort：显式的放弃一次事务处理ObjectContext.SetComplete：覆盖前面任何调用ObjectContext.SetAbort方法的调用Msgbox "string"/StrName：VBscript提示框表单的Onsubmit事件：在同一页面写入FunctionFormName_onsubmit()..FormName_onsubmit＝True/False..end Function，页面会在提交前先执行语句，并根据返回值判断是否完成提交任务。

VB常用函数介绍在VB (Visual Basic) 中，有许多常用函数可以帮助我们处理数据、操作字符串、进行数学计算等。

下面是一些VB常用函数的介绍：1. MsgBox函数：MsgBox函数用于显示一个消息框，通常用于向用户显示一些信息或提示。

它接受一个字符串参数作为要显示的消息文本。

例如：MsgBox("Hello World!")2. InputBox函数：InputBox函数用于显示一个输入框，允许用户输入一个值。

它接受一个字符串参数作为提示文本，并返回用户输入的值。

例如：Dim name as Stringname = InputBox("请输入您的姓名：")MsgBox("您的姓名是：" & name)3. Len函数：Len函数用于返回一个字符串的长度。

它接受一个字符串参数，并返回该字符串的字符数。

例如：Dim str as Stringstr = "Hello World!"MsgBox("该字符串的长度为：" & Len(str))4. Left函数和Right函数：Left函数和Right函数用于返回一个字符串的左侧或右侧指定数量的字符。

它们接受两个参数：一个是要截取的字符串，另一个是要截取的字符数。

例如：Dim str as Stringstr = "Hello World!"MsgBox("左侧的3个字符为：" & Left(str, 3))MsgBox("右侧的5个字符为：" & Right(str, 5))5. Mid函数：Mid函数用于返回一个字符串的中间一部分字符。

它接受三个参数：一个是要截取的字符串，另一个是要截取的起始位置，最后一个是要截取的字符数。

例如：Dim str as Stringstr = "Hello World!"MsgBox("中间的5个字符为：" & Mid(str, 7, 5))6. InStr函数：InStr函数用于在一个字符串中查找指定的子字符串，并返回第一次出现的位置。

vb大小写转换函数
在VB (Visual Basic) 中，你可以使用内置的函数来实现大小写转换。

以下是几个例子：
1、UCase() 函数：将字符串转换为大写。

vb
Dim str As String
str = "hello world"
str = UCase(str) ' str 现在的值是"HELLO WORLD"
2、LCase() 函数：将字符串转换为小写。

vb
Dim str As String
str = "HELLO WORLD"
str = LCase(str) ' str 现在的值是"hello world"
3、StrConv() 函数：这个函数可以将特定的字符串转换为大写或小写，但是它也可以进行其他类型的转换，如转换成半角字符等。

这个函数接受两个参数，第一个参数是要转换的字符串，第二个参数是指定转换类型。

如果第二个参数是vbUpperCase，那么字符串会被转换为大写；如果第二个参数是vbLowerCase，那么字符串会被转换为小写。

vb
Dim str As String
str = "hello world"
str = StrConv(str, vbUpperCase) ' str 现在的值是"HELLO WORLD" str = StrConv(str, vbLowerCase) ' str 现在的值是"hello world"
以上就是VB中的大小写转换函数。

Vb常用内部函数一、类型转换函数1、 Int(x):求不大于自变量x的最大整数2、 Fix(x):去掉一个浮点数的小数部分，保留其整数部分3、 Hex$(x):把一个十进制数转换为十六进制数4、 Oct$(x):把一个十进制数转换为八进制数5、 Asc(x$):返回字符串x$中第一个字符的ASCII字符6、 CHR$(x):把x的值转换为相应的ASCII字符7、 Str$(x):把x的值转换为一个字符串8、 Cint(x):把x的小数部分四舍五入，转换为整数9、 Ccur(x):把x的值转换为货币类型值，小数部分最多保留4 位且自动四舍五入10、 CDbl(x):把x值转换为双精度数。

11、 CLng(x):把x的小数部分四舍五入转换为长整数型数12、 CSng(x):把x值转换为单精度数13、 Cvar(x):把x值转换为变体类型值14、 VarPtr(var):取得变量var的指针15 val(X):把X的值转换为数值类型二、数学函数1、 Sin(x):返回自变量x的正弦值2、 Cos(x): 返回自变量x的余弦值3、 Tan(x): 返回自变量x的正切值4、 Atn(x): 返回自变量x的反正切值5、 Abs(x): 返回自变量x的绝对值6、 Sgn(x): 返回自变量x的符号，即当x为负数时，返回-1；当x为0时，返回0;当x为正数时，返回17、 Sqr(x):返回自变量x的平方根，x必须大于或等于08、 Exp(x):返回以e为底，以x为指数的值，即求e的x次方三、日期与时间函数1、 Day(Now):返回当前的日期2、 WeekDay(Now):返回当前的星期3、 Month(Now):返回当前的月份4、 Year(Now):返回当前的年份5、 Hour(Now):返回小时(0~23)6、 Minute(Now):返回分(0~59)7、 Second(Now):返回秒 (0~59)四、?随机数函数1、 Rnd[(x)]:产生一个0~1之间的单精度随机数2、 Randmize[(x)]:功能同上，不过更好五、字符串函数1、 LTrim$(字符串):去掉字符串左边的空白字符2、 Rtrim$(字符串):去掉字符串右边的空白字符3、 Left$(字符串,n):取字符串左部的n个字符4、 Right$(字符串,n):取字符串右部的n个字符5、 Mid$(字符串,p,n):从位置p开始取字符串的n个字符6、 Len(字符串):测试字符串的长度7、 String$(n,字符串):返回由n个字符组成的字符串8、 Space$(n):返回n个空格9、 InStr(字符串1,字符串2):在字符串1中查找字符串210、 Ucase$(字符串):把小写字母转换为大写字母11、 Lcase$(字符串):把大写字母转换为小写字母六、窗体输入输出函数1、 Print(字符串):在窗体输出字符串，可以用”&”对变量进行连接后输出2、 Tab(n):把光标移到该行的n开始的位置3、 Spc(n):跳过n个空格4、 Cls:清除当前窗体内的显示内容5、 Move 左上角x，左上角y,宽度，高度:移动窗体或控件6、InputBox(prompt,…):跳出一个数据输入窗口，返回值为该窗口的输入值7、MsgBox(msg,[type]…):跳出一个提示窗口七、文件操作函数1、 Open 文件名 [For方式] [Access存取类型] [锁定] AS [#]文件号 [Len=记录长度]功能：为文件的输入输出分配缓冲区，并确定缓冲区所使用的存取方式说明：1) 方式：指定文件的输入输出方式，可选,默认是Random,可以是以下值a、 Output:指定顺序输出方式，将覆盖原有内容b、 Input:指定顺序输入方式c、 Append:指定顺序输出方式，在文件未尾追加内容d、 Random:指定随机存取方式，也是默认方式，在Random方式时，如果没有Access子句，则在执行Open语句时，VB将按下列顺序打开文件：读/写、只读、只写e、指定二进制文件。

VB中各种数据类型转换函数1. 各种进制转换函数⼀般的数据进制包括⼗进制,⼆进制,⼗六进制.⼗进制就是我们⽇常⽣活⽤到的数据进制,因此也是我们最熟悉和清楚的;⼆进制是计算机的基础进制,主要是因为便于⽤物理器件实现⼆进制;⼋进制和⼗六进制因为和⼆进制的天然的亲密关系,并且表⽰⽐⼆进制更⽅便,因⽽也成为计算机的常⽤表⽰⽅法.VB中涉及到的数据进制之间的转换函数主要有如下⼏个:Hex 函数: 返回代表⼗六进制数值的 String;Oct 函数: 返回代表⼀数值的⼋进制值的Variant (String);Cint函数: 强制将⼀个表达式转换成-32,768 ⾄ 32,767的整型;CLng函数: 强制将⼀个表达式转换成-2,147,483,648 ⾄ 2,147,483,647的长整型;Cdec函数: 强制将⼀个表达式转换成Decimal 数据类型;CDbl函数: 强制将⼀个表达式转换成Double 数据类型;以上这些函数是最基本的⼏个数据进制之间的转换函数,其中以前三个函数最常⽤,也最有⽤.从上⾯⼏个函数我们可以看到,VB中没有为我们提供专门的函数供我们将表达式或是数据转换成⼗进制和⼆进制,不过⼗进制的转换我们可以通过Cint函数轻松完成,⽽⼆进制的实现我们可以通过⼆进制和⼋进制,⼗六进制的关系轻松转换.下⾯⼏个例⼦为Hex函数和Oct函数以及Cint函数的实例:(1). A= hex(5) 返回5;(2). B=hex(10) 返回A(3). C=hex(23) 返回17(4). D=oct(5) 返回5(5). E=oct(10) 返回12(6). F=oct(23) 返回27(7). G=Cint(&H17) 返回23(8) . H=Cint(&O12) 返回10以上这些函数的应⽤⽐较简单,就不多说了,值得⼀提的是Hex函数和Oct函数返回的都是字符串,如果是想将⼗六进制或是⼋进制的字符串变量转换成⼗进制,可以按如下⽅法进⾏:C=”17” 17为⼗六进制数值的StringC=”&H” & CIc=Cint(C) 返回232. 字符串和数字转换函数VB中的字符串函数⽐较多,也⽐较⽅便,就不⼀⼀介绍了.本⽂主要对字符串相关的转换函数做⼀些⼩结.字符串转换的函数主要有:Str()和Val()⽤于字符串和数字的相互转换;Chr()和Asc()⽤于字符串和AscII码的相互转换;Chrw()和Ascw()⽤于Unicode码和中⽂的相互转换;Format()函数⽤途⼗分⼴泛的⼀个函数,功能⼗分强⼤.在这些函数中前两对和Format()函数是我们经常⽤到的,这⾥只给出前两对的⼏个简单例⼦:(1) MyString = Str(-459.65) ' 返回 "-459.65"。

本文分步介绍了如何使用Visual Basic .NET 或Visual Basic 2005 中定义的数学函数、类型转换函数和字符串函数。

回到顶端使用数学函数System.Math类中定义了用于数学计算的函数。

Math类包括三角函数、对数函数和其他常用数学函数。

下列函数是在System 命名空间的Math类中定义的函数。

注意：要使用这些函数，请通过在源代码顶部添加以下代码将System.Math 命名空间导入到项目中：Imports System.MathAbsAbs函数返回指定数值的绝对值。

Abs示例：本示例使用Math类的Abs方法来计算一个数值的绝对值。

' Code will not compile unless it is put in a Sub or in a Function.Dim MyNumber As DoubleMyNumber = Abs(50.3) ' Returns 50.3.MyNumber = Abs(-50.3) ' Returns 50.3.AtanAtan函数返回包含角度的Double 值。

该角度的正切值是指定的数值。

返回值为正表示角度在X 轴的逆时针方向上。

返回值为负表示顺时针角度。

将该返回值乘以180 再除以p i (π) 就可以从弧度转换为度。

Atan示例：本示例使用Math类的Atan方法来计算Pi 值。

' Code is not compiled unless it is put in a Sub or in a Function. Dim pi As Doublepi = 4 * Atan(1) ' Calculate the value of pi.CosCos函数以弧度表示的角度作为参数，然后返回一个Double 值，表示指定角度的余弦值。

Cos示例：本示例使用Math类的Cos方法返回角度的余弦值。