vb 常用函数

合集下载

vb常用函数

vb常用函数
以下示例为一个自定义的 Function 过程,该过程计算以 10 为底的对数:
Log10(X) 函数
Log10 = Log(X) / Log(10)
End Function
3.Sqr 函数
返回数值的平方根。
Sqr(number)
number 参数可以是任意有效的大于或等于零的数值表达式。
Time()函数:返回系统当前时间。无参数。
Hour(d)函数:返回数据d中小时的整型数。若d为常数,则该数用#括起来,并用小时:分:秒的格式书写。函数返回值为数值。
Minute(d)函数:返回数据d中分的整型数。若d为常数,则该数用#括起来,并用小时:分:秒的格式书写。函数返回值为数值。
Inverse Hyperbolic Cosecant(反双曲余割) HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) +1) / X)
Inverse Hyperbolic Cotangent(反双曲余切) HArccotan(X) = Log((X + 1) / (X - 1)) / 2
2.Log 函数
返回数值的自然对数。
Log(number)
number 参数是任意大于 0 的有效数值表达式。
说明
自然对数是以 e 为底的对数。常数 e 的值约为 2.718282。
用 n 的自然对数除 x 的自然对数,可以得到以 n 为底的 x 的对数。如下所示:
Logn(x) = Log(x) / Log(n)
Left$(x,n)函数:从字符串x左边取n个字符。x为字符型数据, n为数值型数据,函数返回值为字符串。

VB常用函数介绍

VB常用函数介绍

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

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

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

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

(1)转换函数函数名功能Int(x) 返回不大于自变量的最大整数。

Fix(x) 去掉一个浮点数的小数部分,保留其整数部分。

Hex(x) 把一个十进制数转换成为十六进制数。

Oct(x) 把一个十进制数转换成为八进制数。

Asc(x) 返回字符串中第一个字符的ASCII码。

Chr(x) 把值转换为相应的ASCII字符。

Str(x) 把值转换为一个字符串Cint(x) 把小数部分四舍五入,转换为整数。

Ccur(x) 把值转换为货币类型,小数部分最多保留4位。

CDbl(x) 把值转换为双精度数值。

CLng(x) 把值小数部分四舍五入转换为长整型数值。

CSng(x) 把值转换为单精度数值。

CVar(x) 把值转换为变体类型值。

(2)数学函数函数名功能Sin(x) 返回正弦值。

Cos(x) 返回余弦值。

Tan(x) 返回正切值。

Atn(x) 返回反正切值。

Abs(x) 返回绝对值。

Sgn(x) 返回自变量的符号。

即:值为负数时,函数返回-1值为0时,函数返回0值为正数时,函数返回1Sqr(x) 返回自变量x的平方根,自变量必须大于或等于0。

Exp(x) 返回以e为底数,以x为指数的值,即求e的x 次方。

(3)日期函数函数名功能Day(Now) 返回当前的日期。

WeekDay(Now) 返回当前的星期。

Month(Now) 返回当前的月份。

Year(Now) 返回当前的年份。

(4)时间函数函数名功能Hour(Now) 返回小时(0~23)。

Minute(Now) 返回分钟(0~59)。

Second(Now) 返回秒(0~59)。

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

VB常用函数表

VB常用函数表

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_常用函数
算Βιβλιοθήκη 运算 连接运算 关系运算 逻辑运算
算术运算符
算术运算符是最常用的运算符,在VB中提供了9个算术运算符,见下表
运算 幂 取负 乘法 浮点除法 整数除法 取模 加法 减法 连接
运算符
例子
-X X*Y X/Y X\Y X mod Y X+Y X-Y X$ & Y$

* / \ Mod + &
X∧Y
注意:在上面9个运算符中,除了取负是单目运算符外,其余均为双目运算符 (需要两个运算量)
字符串函数—字符串截取函数
用来截取字符串的一部分,可以从左边、右边、中间进行截取 1、左边截取 left$(字符串,n) 返回字符串的前n个字符,在立即窗口进行测试 ?Left$(“abcdefg”,4) 2、中间截取 mid$(字符串,p,n) 从第P个字符开始向后截取n个字符 注意:如果省略第三个变量n则从第P个字符截取到字符串的末尾 3、右部截取 right$(字符串,n) 返回字符串的最后n个字符 字符串长度测试函数:Len(字符串) 可以测试字符串的长度,也可以测试变量的存储空间。
字符串匹配函数
在编写程序时有时候需要知道是否在文本框中是否输入了某个字符串,可 以通过instr函数进行判断。格式如下: Instr([首字符位置,]字符串1,字符串2[,n]) 在字符串1中查找字符串2,如果找到了则返回字符串2的第一个字符在第一 个字符串1中的位置。例如在立即窗口测试: A=“happy new year” B=instr(a$,”new”) Print B 说明: 1、字符串2的长度必须小于65535个字符 2、instr()返回的是一个常整型数。 3、首字符位置是可选的 4、函数的最后一个自变量n是可选的。N的取值为:0,1,2 N=0 进行二进制比较,区分字母大小写 n=1 忽略大小写 N=2 基于数据库中包含的信息进行比较

VB常用函数(很全)

VB常用函数(很全)

Abs 函数返回数的绝对值。

And 运算符执行两个表达式的逻辑连接。

Array 函数返回含一数组的变体。

Asc 函数返回字符串首字母的ANSI 字符代码。

赋值运算符(=) 给变量或属性赋值。

Atn 函数返回数的反正切值。

调用语句将控制移交Sub 或Function 过程。

CBool 函数返回已被转换为Boolean 子类型的变体的表达式。

CByte 函数返回已被转换为字节子类型的变体的表达式。

CCur 函数返回已被转换为货币子类型的变体的表达式。

CDate 函数返回已被转换为日期子类型的变体的表达式。

CDbl 函数返回已被转换为双精度子类型的变体的表达式。

Chr 函数返回指定ANSI 字符码的字符。

CInt 函数返回已被转换为整数子类型的变体的表达式。

Class 对象提供对已创建的类的事件的访问。

Class 语句声明类名Clear 方法清除Err 对象的所有属性设置。

CLng 函数返回已被转换为Long 子类型的变体的表达式。

颜色常数颜色常数列表。

比较常数用于比较运算的常数列表。

连接运算符(&) 强制两个表达式的字符串连接。

Const 语句声明用于字母值的常数。

Cos 函数返回角度的余弦值。

CreateObject 函数创建并返回对“自动”对象的引用。

CSng 函数返回已被转换为单精度子类型的变体的表达式。

CStr 函数返回已被转换为字符串子类型的变体的表达式。

日期和时间常数在日期和时间运算中用来定义星期几和其他常数的常数列表。

日期格式常数用于日期和时间格式的常数列表。

Date 函数返回当前系统日期。

DateAdd 函数返回加上了指定的时间间隔的日期。

DateDiff 函数返回两个日期之间的间隔。

DatePart 函数返回给定日期的指定部分。

DateSerial 函数返回指定年月日的日期子类型的变体。

DateValue 函数返回日期子类型的变体。

Day 函数返回日期,取值范围为1 至31。

VB基本函数大全

VB基本函数大全

VB基本函数大全Abs 函数:返回数的绝对值。

And 运算符:执行两个表达式的逻辑连接。

Array 函数:返回含一数组的变体。

Asc 函数:返回字符串首字母的 ANSI 字符代码。

赋值运算符 (=):给变量或属性赋值。

Atn 函数:返回数的反正切值。

调用语句将控制移交 Sub 或 Function 过程。

CBool 函数:返回已被转换为 Boolean 子类型的变体的表达式。

CByte 函数:返回已被转换为字节子类型的变体的表达式。

CCur 函数:返回已被转换为货币子类型的变体的表达式。

CDate 函数:返回已被转换为日期子类型的变体的表达式。

CDbl 函数:返回已被转换为双精度子类型的变体的表达式。

Chr 函数:返回指定 ANSI 字符码的字符。

CInt 函数:返回已被转换为整数子类型的变体的表达式。

Class 对象:提供对已创建的类的事件的访问。

Class 语句声明类名Clear 方法:清除 Err 对象的所有属性设置。

CLng 函数:返回已被转换为 Long 子类型的变体的表达式。

颜色常数颜色常数列表。

比较常数用于比较运算的常数列表。

连接运算符 (&) :强制两个表达式的字符串连接。

Const 语句:声明用于字母值的常数。

Cos 函数:返回角度的余弦值。

CreateObject 函数:创建并返回对“自动”对象的引用。

CSng 函数:返回已被转换为单精度子类型的变体的表达式。

CStr 函数:返回已被转换为字符串子类型的变体的表达式。

日期和时间常数:在日期和时间运算中用来定义星期几和其他常数的常数列表。

日期格式常数用于日期和时间格式的常数列表。

Date 函数:返回当前系统日期。

DateAdd 函数:返回加上了指定的时间间隔的日期。

DateDiff 函数:返回两个日期之间的间隔。

DatePart 函数:返回给定日期的指定部分。

DateSerial 函数:返回指定年月日的日期子类型的变体。

VB常用函数介绍

VB常用函数介绍

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常用函数

VB常用函数:1.数值型函数:int(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.3sqr(num) 取根号2.字符串函数:len(str):计算字符串长度中文字符长度也计为一!mid(str,起始字符,[读取长度]):截取字符串中间子字符串left(str,nlen):从左边起截取nlen长度子字符串right(str,nlen):从右边起截取nlen长度子字符串trim(str):去除字符串两端空格replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法]):替换字符串注:默认值:起始字符1;替代次数不限;比较方法区分大小写(0)InStr([起始字符,]str,查找字符串[,比较方法]):检测是否包含子字符串可选参数需同时选返回起始位置InStrrev()split(str,分割字符串[,次数][,比较方法]):以分割字符串为分割标志将字符串转为字符数组可选参数需同时选CHR(num)通过ASCII值获取一个字符chr(32) 空格chr(13) 回车Ucase(str)所有字符转成大写Lcase(str)所有字符转成小写3.数据类型转换函数:Cint(str):转换正数True -1;False 0;日期距离1899/12/31天数;时间上午段0;下午段1;Cstr(str):日期输出格式yyyy/mm/dd;时间输出格式Am/Pm hh:mm:ssCsng(str):转换为单精度数值Cdbl(str):转换为双精度数值Cdate()4.时间函数:date:取系统当前日期time:取系统当前时间now:取系统当前时间及日期值Datetime类型DateDiff(间隔单位,日期一,日期二):计算时间差日期二-日期一d m yyyyweekday(date):计算星期几Sunday 1Monday 2Tuesday 3Wednsday 4Thurday 5Friday 6Saturday 7year(datetime):截取年份month(datetime):截取月份day(datetime):截取日hour(datetime):截取小时minute(datetime):截取分钟second(datetime):截取秒IsnumericIsdateFormatDateTime(datetime,n)n 0~4FormatNumber(m,n) 对象按钮\图片\表格.... 事件onclick 单击ondblclick 双击onbeforecopy 拷贝onload 对象加载onunload 对象关闭onchange 对象改变onfocus 对象获得焦点onblur 对象失去焦点动作网页与表单进行关联1.sub 对象名_事件名end sub2.sub xend sub<input type="button" name="Submit" value="按钮" onclick="x()"/>。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

第五章常用内部函数教学目的及要求:使学生掌握函数的概念,函数的调用格式,VB中的常用内部函数。

重点与难点:1、学会调用内部函数进行各种运算。

2、掌握调用各种函数时需要的参数、函数的参数类型和函数返回值类型,这也是本章的难点。

主要外语词汇:ANSI 、function randomize、 format授课内容:1、函数的分类:(1)内部函数(2)外部函数(用户自定义函数、函数过程)2、VB常用的内部函数有:数学函数、字符串函数、转换函数、日期与时间函数、其他函数。

3、函数的一般调用格式为:函数名([参数表])注:参数的类型和个数。

若参数类型或个数不匹配,则提示出错信息。

4、方法与函数的区别:(1)方法可以单独作为语句使用,函数不可以。

(2)方法没有返回值,函数有返回值。

(3)方法的格式:[对象名.]方法 [参数列表]函数的格式:①变量名=函数名([参数列表])②[对象名.]属性=函数名([参数列表])5、一般将函数值进行输出或赋值给某个变量。

第一节常用函数一、数学函数:1、利用Log(N)/Log(10)得到Lg(N)的值。

2、注意函数Int(N)、Fix(N)、Cint(N)和Round(N)之间的区别。

例1:05_1.vbp二、字符串函数:1、常用的字符串函数:(1)Len(S):测试字符串S的字符个数,中西文字符均算1个字符。

(2)LenB(S):测试字符串S的字节数,中西文字符均占2个字节。

LenB(S)=2*Len(S)(3)Ucase(S):将字符串S中的小写字母改为大写字母。

(4)Lcase(S):将字符串S中的大写字母改为小写字母。

(5)String(N,S):重复输出N个S单个字符例:Print String(5,“a”)Print String(5,“abcd”) 结果相同2、在字符串函数名后面可以加“$”符号。

例:Print String(5,“*”)Print String$(5,“*”) 等价3、字符串的编码方案:(1)ANSI方式:美国国家标准协会制定,西文字符占用1个字节,汉字占用2个字节。

(2)UniCode方式:国际标准化组织ISO制定,西文字符和汉字统一进行编码,占用2个字节。

VB6.0内部采用UniCode编码形式来存储字符串。

4、字符处理函数:针对字符数,中西文字符均算1个字符。

字符处理函数+B:针对字节数,中西文字符均占2个字节。

5、StrConv函数:格式:StrConv( S,指定格式 )(1)S:要转换的字符串表达式。

(2)指定格式:① vbUnicode(64):ANSI格式 -> UniCode格式② vbFromUnicode(128):UniCode格式 -> ANSI格式③ vbUpperCase(1):将字符串S文字转换成大写④ vbLowerCase(2):将字符串S文字转换成小写⑤ vbProperCase(3):将字符串S每个字的开头字符转换成大写总结:1、小写 -> 大写2、大写 -> 小写(1)UCase(S) (1)LCase(S)(2)StrConv(S,vbUpperCase) (2)StrConv(S,vbLowerCase)例:Private Sub Command1_Click( )Dim x As String ,y As Stringx = Text1.Texty = UCase(x) ‘ y = StrConv(x,vbUpperCase)Text2.Text = yEnd Sub三、转换函数:1、Asc(S):给出字符串S的首字符的ASCII码值。

2、Chr(N):给出ASCII码值是N的字符。

N:0-127例:Chr(13):回车 Chr(10):自动换行3、Str(N):将数值N转换为字符型。

4、Val(S):将数字字符串S转换为数值型。

在S中只要遇到第一个非数字字符就视为结束。

VB中的数字和只包含数字的字符串可以方便地互换类型,例:(1)隐式转换:Private Sub Command1_Click( )Dim x As Integer,y As String x必须定义类型y = “100.23”:x = y‘隐式转换Print xEnd Sub(2)显式转换字符型 -> 数值型:利用Val函数:Private Sub Command1_Click( )Dim x As Integer x可以不用定义类型Text1.text = “100.23”x = Val(Text1.text)‘显式转换Print xEnd Sub(3)显式转换数值型 -> 字符型:利用Str函数:Private Sub Command1_Click( )Dim x As Integer,y as String y可以不用定义类型x = 100.23y = Str(x)‘显式转换End Sub注:显式转换时可以事先不用定义数据类型,但隐式转换时一般需要事先定义数据类型。

例:Text3.Text=CDate(Text1)-CDate(Text2) 正确Text3.Text=Text1-Text2 错误一般可以隐式转换的函数有:Str、Val、CCur、CDbl、CLong、CSng、CDate等。

四、日期和时间函数:1、常用日期和时间函数:函数Now()、Time()、Date()可以省略(),写成Now、Time、Date。

2、DateDiff( ):格式:Da teDiff(“日期单位”,日期1,日期2)返回两个指定日期间的时间间隔数目。

例:DateDiff(“d”, #1-1-2001#, #2002-1-1#)第二节其他函数一、随机函数Rnd和Randomize:1、Rnd函数:格式:Rnd[(N)],N称为“种子”(基数),一般省略可选项N。

作用:可以产生[0,1)的双精度(Double)随机数。

参数N:(1)N<0:产生相同的随机数,该随机数与N有关,不可取。

(2)N>0:产生不同的随机数,该随机数与N无关。

默认值,即取任意一个>0的值作为“种子”与不取可选项是一样的。

都是把上一个随机数作为下一个随机数的“种子”,可产生不同的随机数。

尽管所产生的每个随机数不同,但每次运行所产生的随机数都是一样的。

(3)N=0:产生相同的随机数,该随机数与N无关,与最近生成的随机数相同,不可取。

常用形式:Rnd该函数的缺点:“种子”固定,缺少随机性。

2、若要产生[n,m]之间的整数,可以用公式:Int(Rnd*(m-n+1))+n 或 Int(Rnd*(m-n+1)+n)若要产生[1,m]之间的整数,可以用公式:Int(Rnd*m)+1 或 Int(Rnd*m+1)3、Randomize函数:格式:Randomize[(N)],一般省略可选项N。

作用:生成一个随机的“种子”,初始化随机数生成器。

常用形式:Randomize该语句要用在Rnd函数之前。

例1:05_2.vbp二、Shell函数:格式:Shell(“命令文件名”[,窗体模式])作用:执行一个可执行文件(.COM. EXE. BAT)。

1、命令文件名:必要参数,绝对路径,要执行的程序名。

2、窗体模式:可选参数,表示程序运行时窗口的样式。

值常量说明0 vbHide 窗口被隐藏,且焦点会移动到隐式窗口1 vbNormalFocus 窗口具有焦点,且会还原到原来大小和位置2 vbMinimizedFocus 窗口会以一个具有焦点的最小化图标来显示,默认值3 vbMaximizedFocus 窗口是一个具有焦点的最大化窗口4 vbNormalNoFocus 窗口会被还原到最近所使用的大小和位置,而当前活动的窗口仍然保持活动6 vbMinimizedNoFocus 窗口最小化为图标,而当前活动的窗口仍然保持活动3、函数的返回值:任务ID号(成功)或0(不成功)任务ID号是一个唯一的数值,用来指明正在运行的程序。

一般不关心返回值。

附:Shell语句:格式:Shell “命令文件名”[,窗体模式]参数同上不用写小括号,没有返回值,可以单独作为一个语句来使用。

三、格式输出函数Format:格式:Format(表达式[,“格式字符串”])若不选可选项,则按原来表达式的值不作任何修饰输出。

例:Dim a As Singlea=0.5Print aPrint Format(a) 等价Print Format(a,“0.00”)1、数值格式符:表5-6若实际数值的整数部分的位数多于格式化字符串规定的位数,则按实际输出,小数部分按四舍五入保留到格式化字符串规定的位数。

2、日期和时间格式符:表5-73、字符串格式符:表5-8若实际字符串所包含的字符个数多于格式化字符串规定的个数,则按实际输出。

总结:1、小写 -> 大写2、大写 -> 小写(1)UCase(S) (1)LCase(S)(2)Format(S,“>”) (2)Format(S,“<”)例:Private Sub Command1_Click( )Dim x As String ,y As Stringx = Text1.Texty = UCase(x) ‘ y = Format(x,“>”)Text2.Text = yEnd Sub四、数据类型测试函数VarType:系统提供的默认初始值:(1)数值型:0 (2)货币型:0 (3)字符型:空字符串(4)逻辑型:False (5)日期型:0:00:00(6)可变型:Empty (7)对象型:Nothing1、Empty:表示未指定的数据。

2、Null:表示数据不合法。

3、Error:指出过程中出现了一个错误。

4、Nothing:表示数据还没有指向一个具体对象。

格式:VarType(变量名)返回一个Integer,指出变量的类型。

VB常数 VarType返回值数据类型vbEmpty 0 空(Empty)vbNull 1 无效(Null)vbInteger 2 整型(Integer)vbLong 3 长整型(Long)vbSingle 4 单精度(Single)vbDouble 5 双精度(Double)vbCurrency 6 货币型(Currency)vbDate 7 日期型(Date)vbString 8 字符型(String)vbError 10 出错(Error)vbBoolean 11 逻辑型(Boolean)vbVariant 12 可变类型(Variant)vbByte 17 字节型(Byte)例:Private Sub Form_Click( )Dim x,y,zy=133z=“aaaa”Print VarType(x),VarType(y),VarType(z)End Sub辅助教学情况:多媒体课件、Visual Basic 6.0复习思考题、作业题思考当窗体的名称改为form1时,该窗体的对象名是什么。

相关文档
最新文档