VB6.0常用内部函数
VB6.0函数
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。
vb6.0函数大全
Abs 函数返回参数的绝对值，其类型和参数相同。
语法Abs(number)必要的number参数是任何有效的数值表达式，如果number 包含Null，则返回Null，如果number 是未初始化的变量，则返回 0。
说明一个数的绝对值是将正负号去掉以后的值。
例如，ABS(-1) 和 ABS(1) 都返回 1。
Abs 函数示例本示例使用Abs函数计算数的绝对值。
Dim MyNumberMyNumber = Abs(50.3) ' 返回 50.3。
MyNumber = Abs(-50.3) ' 返回 50.3。
Array 函数返回一个包含数组的Variant。
语法Array(arglist)所需的arglist参数是一个用逗号隔开的值表，这些值用于给Variant所包含的数组的各元素赋值。
如果不提供参数，则创建一个长度为 0 的数组。
说明用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。
在下面的示例中，第一条语句创建一个Variant 的变量 A。
第二条语句将一个数组赋给变量 A。
最后一条语句将该数组的第二个元素的值赋给另一个变量。
Dim A As VariantA = Array(10,20,30)B = A(2)使用Array函数创建的数组的下界受Option Base语句指定的下界的决定, 除非Array是由类型库（例如VBA.Array )名称限定。
如果是由类型库名称限定，则Array不受Option Base的影响。
注意没有作为数组声明的Variant 也可以表示数组。
除了长度固定的字符串以及用户定义类型之外，Variant 变量可以表示任何类型的数组。
尽管一个包含数组的Variant 和一个元素为Variant 类型的数组在概念上有所不同，但对数组元素的访问方式是相同的。
Array 函数示例该示例使用Array函数来返回一个包含Variant 的数组。
VB6常用函数大全
VB常用函数大全现在的编程软件像VB，C++等，大多自带功能很强的函数库，可以很省力得完成各种功能。
很多时候，想不起来实现某个功能的函数或函数格式，导致编程大费周折。
作为一个编程人员，我对此深有体会。
因此，特地准备了几期VB常用函数的介绍，供大家学习或参考。
有说的不当之处，也欢迎在本网站的论坛中提出，大家学习。
（一）类型转换类函数1、CType(X)[格式]：P=CBool(X) 将X转换为“布尔”（Boolean）类型P=CByte(X) 将X转换为“字节”（Byte）类型P=CCur(X) 将X转换为“金额”（Currency）类型P=CDate(X) 将X转换为“日期”（Date）类型P=CDbl(X) 将X转换为“双精度”（Double）类型P=CHr(X) 返回字符码对应的字符P=CInt(X) 将X转换为“整型”（Integer）类型P=CLng(X) 将X转换为“长整型”（Long）类型P=CSng(X) 将X转换为“单精度”（Single）类型P=CStr(X) 将X转换为“字符串”（String）类型P=Cvar(X) 将X转换为“变体型”（Variant）类型P=CVErr(X) 将X转换为Error值[ 范例]：(1) CStr(13)+CStr(23) 数值转换成字符串后，用“+”号连接，结果：1323(2) CInt("12")+12 字符串转换成整型后与12相加，结果：24(3) P=CInt(True) 输出结果为-1，布尔值与数值的转换时要注意，布尔值只有True和False，其中True在内存中为-1，False存为0(4) CBool(-0、001) 输出结果为True。
将数值转换为布尔型时，等于0的数值将得到False，不等于0的数值得到True2、Int(X)，Fix(X)：取X的整数值[格式]：P=Int(X) 取<=X的最大整数值P=Fix(X) 取X的整数部分，直接去掉小数[范例]：(1) Int(-54、6) 结果为-55，取<=-54、6的最大整数(2) Fix(54、6) 结果为54，取整数并直接去掉小数（二）常用数学函数[格式]：1、Abs(N) 取绝对值例：Abs(-3、5) 结果：3、52、Cos(N) 余弦函数例：Cos(0) 结果：13、Exp(N) e为底的指数函数例：Exp(3) 结果：20、0684、Log(N) 以e为底的自然对数例：Log(10) 结果：2、35、Rnd[(N)] 产生随机数例：Rnd 结果：0--1之间的数6、Sin(N) 正弦函数例：Sin(0) 结果：07、Sgn(N) 符号函数说明：取正负号。
VB6.0中Dir()函数的使用方法
VB6.0中Dir()函数的使用方法VB中提供的成员函数dir返回一个满足指定类型或指定文件属性的文件名，目录名或卷标名。
dir函数的语法结构为:Member Function Dir[(Pathname[,attributes])] As String其中参数Pathname通常为一个文件名，此文件名可以包含目录或文件夹以及驱动器符号，如果没有找到指定的Pathname，dir语句将返回一个零长度的字符串("")，支持多字符通配符和单字符通配符。
需要注意的是：1.在程序中第一次调用dir函数时必须指明pathname参数，否则会产生运行错误；2.dir函数只返回满足pathname条件的第一个文件名或目录名，要得到其余满足条件的文件名，可以再次调用dir函数而不用带参数，当没有匹配的文件，dir函数返回零长度的字符串，而此时如果再想调用dir函数，必须指定pathname参数，否则出现运行错误；3.在没有检索到满足当前pathname匹配条件的文件时可以改变新的pathname值，但不能再次递归调用dir函数；4.调用dir函数时将属性参数设置为vbdirectory并不能连续返回子目录，仅返回当前目录下的目录。
例1Public Sub main()Dim filenames As Stringfilenames = Dir("c:\", vbNormal + vbDirectory)Do While filenames <> ""Debug.Print filenamesfilenames = Dir ’再次调用dir函数,此时可以不带参数LoopEnd Sub例2Dir函数可以用在不确定本机是否存在某文件或目录的前提下后台帮助用户寻找并提示,然后运用该文件或目录完成指定操作,如run等。
但是由于不能递归使用，这就意味着不能一次查找整棵树，更为糟糕的是，vb并没有提供用来在多个不知名的目录中查找某一给定的文件或文件簇的任何工具。
vb6.0函数大全分析
Abs 函数返回参数的绝对值，其类型和参数相同。
语法Abs(number)必要的number参数是任何有效的数值表达式，如果number 包含Null，则返回Null，如果number 是未初始化的变量，则返回0。
说明一个数的绝对值是将正负号去掉以后的值。
例如，ABS(-1) 和 ABS(1) 都返回 1。
Abs 函数示例本示例使用Abs函数计算数的绝对值。
Dim MyNumberMyNumber = Abs(50.3) ' 返回 50.3。
MyNumber = Abs(-50.3) ' 返回 50.3。
Array 函数返回一个包含数组的Variant。
语法Array(arglist)所需的arglist参数是一个用逗号隔开的值表，这些值用于给Variant所包含的数组的各元素赋值。
如果不提供参数，则创建一个长度为0 的数组。
说明用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。
在下面的示例中，第一条语句创建一个Variant 的变量 A。
第二条语句将一个数组赋给变量 A。
最后一条语句将该数组的第二个元素的值赋给另一个变量。
Dim A As VariantA = Array(10,20,30)B = A(2)使用Array函数创建的数组的下界受Option Base语句指定的下界的决定, 除非Array是由类型库（例如VBA.Array )名称限定。
如果是由类型库名称限定，则Array不受Option Base的影响。
注意没有作为数组声明的Variant 也可以表示数组。
除了长度固定的字符串以及用户定义类型之外，Variant 变量可以表示任何类型的数组。
尽管一个包含数组的Variant 和一个元素为Variant 类型的数组在概念上有所不同，但对数组元素的访问方式是相同的。
Array 函数示例该示例使用Array函数来返回一个包含Variant 的数组。
Dim MyWeek, MyDayMyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")'返回值假设下界的设置为 1（使用 Option Base' 语句）。
vb6.0的基本表达式
vb6.0的基本表达式VB6.0的基本表达式是用于构建计算和逻辑操作的代码行的基本元素。
在VB6.0中，基本表达式可以用于执行各种数学运算、字符串操作、比较和逻辑判断等操作。
本文将一步一步回答关于VB6.0基本表达式的问题，包括它的语法、类型和常见的应用场景等。
第一步：介绍VB6.0基本表达式的语法结构在VB6.0中，基本表达式的语法结构遵循类似的规则。
一个基本表达式通常由一个或多个变量、常数、操作符和函数组成。
下面是一些常用的基本表达式语法结构：1. 变量和常数：在VB6.0中，变量是用来存储数据的命名空间，而常数则是不可改变的值。
变量可以用来存储和操作数据，常数则用于提供固定的值。
例如，以下是一些使用变量和常数的基本表达式示例：- 变量：Dim x As Integer- 常数：Const PI As Double = 3.141592. 操作符：VB6.0提供了各种类型的操作符用于执行数学、逻辑和字符串操作。
一些常见的操作符包括：- 算术操作符：+（加）、-（减）、*（乘）、/（除）、\（整除）和Mod （取余）- 比较操作符：=（等于）、<>（不等于）、<（小于）、>（大于）、<=（小于等于）和>=（大于等于）- 逻辑操作符：And（与）、Or（或）和Not（非）- 字符串操作符：&（连接）3. 函数：VB6.0提供了许多内置函数，用于执行各种操作，例如数学函数、字符串函数和日期函数等。
以下是一些常用的VB6.0内置函数：- Math函数：Abs（取绝对值）、Sqrt（开平方）、Sin（正弦函数）、Cos（余弦函数）等- 字符串函数：Left（从左截取字符串）、Right（从右截取字符串）、Mid（从中间截取字符串）、Len（获取字符串长度）等- 日期函数：Now（获取当前日期和时间）、DateSerial（根据年、月和日构建日期）等第二步：讨论VB6.0基本表达式的类型在VB6.0中，基本表达式可以是不同的类型，包括整数、浮点数、字符串、布尔值和日期等。
【VB6.0】VB常用术语内部函数
【VB6.0】VB常用术语/内部函数常用术语项目(Project)：是用户创建的文件集合，这个集合包括用户的Windows 应用程序。
控件(Control)：是Toolbox窗口中用户置于窗体上的工具，用于配合用户控制程序流程。
代码(Code)：是所写的编程语句的另一个名字。
像素(Pixel)：代表图形元素，表示监视器上最小的可寻址的图形点。
全局变量(Global Variable)：就是在整个模块内或整个应用程序内均可使用的变量。
函数(Function)：是一个例程，接受零个、一个或多个参数并根据这些参数返回一个结果。
死循环(Infinite Loop)：是一个永不终止的循环。
语法错误(Syntax Error)：是由于拼错一条命令或使用不正确的语法引起的一种错误。
消息框(Message Box)：是为向用户提供信息而显示的对话框。
循环(Loop)：就是一组重复执行的程序指令集。
赋值语句(Assignment Statement)：是用来给控件、变量或其他对象赋值的程序语句。
结构化程序设计(Structured Programming)：是一种程序设计方法，用它来把长程序分成几个小过程，尽可能分得详细一些。
调用过程(Calling Procedure)：是触发其他过程执行的过程。
被调用过程(Called Procedure)：是由其他过程调用的过程。
引用传递(By Reference)：是一种传递值并允许被调用过程修改这些值的方法。
它也叫做通过地址传递(By Address)。
值传递(By Value)：是一种传递值并保护调用过程的传递数据，因而被调用过程不能改变此数据的方法。
1 类型转换函数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的指针²数学函数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、Randomize:Rnd[(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、指定二进制文件。
第2章 VB6.0语言基础知识
Public，Static。
Private Public 定义的是局部变量。 定义的是全局变量。
Static
定义的是静态变量。
这三个关键字的用法将在后面的章节详细介绍。本章主 要介绍Dim语句。
逻辑型：True 、False
放在一对#当中。
第 2 章
基 础 知 识
2.3 常量与变量
2.3.1 常量
2．符号常量 符号常量就是用标识符来表示一个常量，例 如：我们把3.14定义为pi，在程序代码中，我们 就可以在使用圆周率的地方使用pi。 例如：在程序调试时，感到圆周率3.14精度 不够，我们只需修改定义pi的这一条语句。如果 使用文字常量，就可能要修改多处代码。定义常 量的方法如下： 格式：const 常量名 [as类型]=表达式
第 2 章
基 础 知 识
2.3 常量与变量
2.3.1 常量 1．文字常量 文字常量直接出现在代码中，也称为字面常量或直接常 量，文字常量的表示形式决定它的类型和值。例如： 字符型："I am a student" 放在一对引号当中。 数值型：3.14159、56、8.432E-15
日期型：#3 jan,98#
字符串包括除双引号和回车以外可打印的所有字 符，双引号作为字符串的定界符号。在字符串中，要 区分字母的大小写。双引号内字符的个数叫做字符串 的长度（包括空格）。长度为零的字符串叫做空字符 串。 例如："123 4"和"张 三"都是字符型。注意字符 串中空格是有效字符。 "运动员"和"abc"长度都是3，占用字节数都是6。
vb6.0运算符大全
vb6.0运算符大全(dà quán)vb6.0运算符大全(dà quán)Vb6.0运算符1、& 运算符用来强制(qiángzhì)两个表达式作字符串连接(liánjiē)。
语法(yǔfǎ)result = expression1 & expression2& 运算符的语法具有(jùyǒu)以下几个部分：部分描述result必需的；任何String或Variant变量。
expression1必需的；任何表达式。
expression2必需的；任何表达式。
说明(shuōmíng)如果expression不是字符串，则将其转换成 String 变体。
如果两个表达式都是字符串表达式，则result的数据类型是 String；否则result 是String 变体。
如果两个表达式都是Null，则result 也是 Null。
但是，只要有一个expression 是 Null，那么在与其它表达式连接时，都将其作为长度为零的字符串 ("") 处理。
任何Empty类型表达式也作为长度为零的字符串处理。
& 运算符示例(shìlì)本示例(shìlì)使用 & 运算符将字符串串接起来(qǐ lái)。
Dim MyStrMyStr = "Hello" & " World" ' 返回(fǎnhuí) "Hello World"。
MyStr = "Check " & 123 & " Check" ' 返回(fǎnhuí) "Check 123 Check"。
vb6.0函数示例语法说明详解下集
LoadResData 函数________________________________________用以从资源(.res) 文件装载若干可能类型的数据，并返回一个Byte 数组。
语法LoadResData(index, format)LoadResData 函数的语法包含下列部分：部分描述index 必需的。
一个整数或字符串，它用来指定资源文件中数据的标识符(ID)。
ID 标识符为 1 的资源保留给应用程序的图标。
Format 必需的。
一个数值，它用来按照下列“设置值”中的描述，指定返回数据的原始格式。
该数值也可以是用户定义资源的字符串名。
设置值用于format 的设置值有：设置描述1 光标资源2 位图资源3 图标资源4 菜单资源5 对话框6 字符串资源7 字体目录资源8 字体资源9 加速键表10 用户定义资源12 群组光标14 群组图标说明LoadResData 从资源文件装载的数据可以达到64K。
对位图、图标、光标资源类型使用LoadResData 将返回包含该资源中的实际二进制位的字符串。
如果想使用实际的位图、图标或资源，请使用LoadResPicture oˉêy. LoadResData 的使用对于V isual Basic 应用程序本地化有好处，这是因为需要翻译的资源在一个资源文件中被隔离，并且无须访问源代码或重新编译该应用程序。
________________________________________相关基础知识：位图用像素表示的图象，将它作为位的集合存储起来，每个位都对应一个像素。
在彩色系统中会有多个位对映一个像素。
位图通常以.bmp 为文件扩展名。
图标一个对象或概念的图形表示；一般在Microsoft Windows 中用来表示最小化的应用程序。
图标是位图，最大大小为32 x 32 像素，以.ico 为文件扩展名。
对话框系统或应用程序所显示的特殊窗口，用来请求响应或提供信息。
VB6.0常用函数
（一）类型转换类函数1. ctype(x)[格式]：p=cbool(x)' 将x转换为“布尔”（boolean）类型p=cbyte(x)' 将x转换为“字节”（byte）类型p=ccur(x)' 将x转换为“金额”（currency）类型p=cdate(x)' 将x转换为“日期”（date）类型p=cdbl(x)' 将x转换为“双精度”（double）类型p=cint(x)' 将x转换为“整型”（integer）类型p=clng(x)' 将x转换为“长整型”（long）类型p=csng(x)' 将x转换为“单精度”（single）类型p=cstr(x)' 将x转换为“字符串”（string）类型p=cvar(x)' 将x转换为“变体型”（variant）类型p=cverr(x)' 将x转换为error值[ 范例 ]：(1). cstr(13)+cstr(23)' 数值转换成字符串后，用"+"号连接，结果：1323(2). cint("12")+12' 字符串转换成整型后与12相加，结果：24(3). p=cint(true)' 输出结果为-1' 布尔值与数值的转换时要注意，布尔值只有true和false，其中true在内存中为-1,false存为0(4). cbool(-0.001)' 输出结果为true' 将数值转换为布尔型时，等于0的数值将得到false，不等于0的数值得到true. 2. int(x),fix(x)：取x的整数值[格式]：p=int(x) ' 取<=x的最大整数值p=fix(x) ' 取x的整数部分，直接去掉小数[范例]：(1) int(-54.6)' 结果为-55，取<=-54.6的最大整数(2) fix(54.6)' 结果为54，取整数并直接去掉小数（二）常用数学函数[格式]：1. abs(n) 取绝对值例：abs(-3.5) 结果：3.52. cos(n) 余弦函数例：cos(0) 结果：13. exp(n) e为底的指数函数例：exp(3) 结果：20.0684. log(n) 以e为底的自然对数例：log(10) 结果：2.35. rnd[(n)] 产生随机数例：rnd 结果：0--1之间的数6. sin(n) 正弦函数例：sin(0) 结果：07. sgn(n) 符号函数' 说明：取正负号。
vb6.0代码
Chr(asc)：转换ASCII为字符 Enter：Chr(13)&Chr(10)
Filter(数组名称,关键字符串,[,包含][,比较方法])：
将字符串数组中含有关键字符串的元素存成新的数组（默认） [包含]为false则取不包含的元素
oin(ArrayName)：将数组中元素连成字符串
date：取系统当前日期
time：取系统当前时间
now：取系统当前时间及日期值 Datetime类型
timer：取当前时间距离零点秒值，计时器，可计算时间差
DateAdd(间隔单位,间隔值,日期)：推算相邻日期
DateDiff(间隔单位,日期一,日期二)：计算时间差 日期二-日期一
Datepart(间隔单位,日期)：计算日期的间隔单位值
3.数据类型转换函数：
Cint(str)：转换正数 True -1；False 0；日期 距离1899/12/31天数；时间 上午段 0；下午段 1；
Cstr(str)：日期 输出格式 yyyy/mm/dd；时间 输出格式 Am/Pm hh:mm:ss
Clng(str)：与Cin()类似
Cbool(num)：num不为零 True；反之 False
Cdate(str)：转换日期格式 0：#Am 12:00:00#；正数 距离1899/12/31天数的日期；浮点数 日期＋小数时间
Cbyte(num)：num<255 转换为字节
Csng(str)：转换为单精度数值
Cdbl(str)：转换为双精度数值
Ccur(str)：转换为现金格式
4.时间函数：
VB6.0常用函数
False
CBool（2）
True
CByte（x）
将0~255之间的数值转换成字节型
CByte（202）
202
CDate（x）
将有效的日期字符串转化成日期
CDate（#2016,2,16#）
2016-2-16
CCur(x)
将数值数据x转换成货币型
CCur（2CDbl（12.345678）
12.345678
6
LenB（Stirng）
求string字符串的字节个数
LenB（”Lester”）
12
Left(String,n)
从string字符串左边取n个字符
Left（”lester”,3）
“les”
Right(string,n)
从string字符串右边取n个字符
Right(“lester”,3)
“ter”
“lester”
Ltrim(string)
去掉string左边空格
Ltrim（”ABC”）
“ABC”
Rtrim(string)
去掉string右边空格
Rtrim(“ABC”)
“ABC”
Trim(string)
去掉两边的空格
Trim（”ABC”）
“ABC”
Instr(string,”字符”,M)
在string中查找”字符”，返回其位置，M=1不区分大小写，省略区分
Hex（30）
“1E”
Oct(Num)
求Num的八进制，返回的是字符型值
Oct（20）
“24”
Sgn(Num)
求Num的符号，当Num>0，返回1；Num=0，返回0；Num<0,返回-1
vb6.0文件操作函数
RegSetValueEx 设置指定项的值
RegUnLoadKey 卸载指定的项以及它的所有子项
RemoveDirectory 删除指定目录
SearchPath 查找指定文件
SetCurrentDirectory 设置当前目录
SetEndOfFile 针对一个打开的文件，将当前文件位置设为文件末尾
RegNotifyChangeKeyValue 注册表项或它的任何一个子项发生变化时，用这个函数提供一种通知机制
RegOpenKey 打开一个现有的注册表项
RegOpenKeyEx 打开一个现有的项。在win32下推荐使用这个函数
RegQueryInfoKey 获取与一个项有关的
RegQueryValue 取得指定项或子项的默认（未命名）值
WritePrivateProfileSection 为一个初始化文件（.ini）中指定的小节设置所有项名和值
WritePrivateProfileString 在初始化文件指定小节内设置一个字串
WriteProfileSection 为Win.ini初始化文件中一个指定的小节设置所有项名和值
LZRead 将数据从文件读入内存缓冲区LZSeek设置一个文件中进行读写的当前位置
MapViewOfFile 将一个文件映射对象映射到当前应用程序的地址空间
MoveFile 移动文件
OpenFile 这个函数能执行大量不同的文件操作
OpenFileMapping 打开一个现成的文件映射对象
WriteProfileString 在Win.ini初始化文件指定小节内设置一个字串
Visual Basic 6.0常用函数介绍
WeekDay(Now)
返回当前的星期。
Month(Now)
返回当前的月份。
Year(Now)
返回当前的年份。
（4）时间函数
函数名
功能
Hour(Now)
返回小时（0~23）。
Minute(Now)
返回分钟（0~59）。
Second(Now)
返回秒（0~59）。
1
（5）随机函数
Rnd(x) 产生一个 0~1 之间的单精度随机数
2
Cancel
vbAbort
3
Abort
vbRetry
4
Retry
vbIgnore
5
Ignore
vbYes
6ቤተ መጻሕፍቲ ባይዱ
Yes
vbNo 示例：
7
No
Dim Tmp as long Tmp=MsgBox（”是否退出程序。”,35,”退出”） Msgbox “你选择的按钮值是：”&Tmp
4
返回 n 个空格。 （6）字符串匹配函数 格式：InStr（[首字符位置，]字符串 1，字符串 2 [,n]）
在函数中“字符串 1”中查找“字符串 2”，如果找到了，则返回“字符串 2”的第一个
字符的位置。若为字符串首字符，则位置为 1。 说明：
①“字符串 2”的长度限于 65535 个字符内。
②“首字符位置”是可选项。如果含有“首字符位置”，则从该位置开始查找，否则从
Visual Basic 6.0 常用函数介绍
一、常用内部函数
在 VB 内部提供了大量函数。在这些函数中，有些是通用的。有些则与某种操作有关的。 大体分成五类，分别是：转换函数、数学函数、日期函数、时间函数和随机函数。
vb6.0函数和语句大全
Val 函数示例
本示例使用 Val 函数返回字符串中所含的数值。
Dim MyValue
MyValue = Val("2457") ' 返回 2457。
MyValue = Val(" 2 45 7") ' 返回 2457。
MyValue = Val("24 and 57") ' 返回 24。
[格式]：
P=InStr(X,Y)
从X第一个字符起找出Y出现的位置
P=InStr(n,X,Y)
从X第n个字符起找出Y出现的位置
[说明]：
（1） 若在X中找到Y，则返回值是Y第一个字符出现在X中的位置。
（2） InStr(X,Y)相当于InStr(1,X,Y)。
（3） 若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。
例：Rnd 结果：0--1之间的数
6. Sin(N) 正弦函数
例：Sin(0) 结果：0
7. Sgn(N) 符号函数
' 说明：取正负号。Y=Sgn(X) 既 X>0 则Y=1；X=0 则Y=0；X<0 则Y= -1
8. Sqr(N) 平方根
例：Sqr(9) 结果：3
9. Tan(N) 正切函数
[范例]：
若当前时间为2003年8月29日晚上19点26分45秒，则
P=Now()
结果为：P=2003-08-29 19:26:45
6．MonthName：返回月份名称
[格式]：P=MonthName(X)
[说明]：X参数可传入1---12，则返回值为“一月”、“二月”……，但是在英文Windows环境下，返回的是”January”,”February”……
VB6.0函数介绍
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;int(-99.2)=-99round(num,n) ‘四舍五入取小数位round(3.14159,3)=3.142 中数值四舍五入并取偶数值整round（3.25，1）=3.2log(num): ‘取e的n次幂通用num>0exp(n): ‘取e的n次幂通用num^nsin(num): ‘三角函数，以弧度为值计算（角度*Pai）/180=弧度con(num);tan(num);atn()2.字符串函数：len(str): ‘计算字符串长度中文字符长度也计为一mid(str,起始字符，[读取长度])：‘left(str,nlen): ‘从左边起截取nlen长度字符串right( , ): ‘从右边……………Lcase(str); ‘字符串转为小写Ucase(str); ‘字符串转为大写trim(str); ‘去除字符串两端（首尾）空格Ltrim(str); ‘去除字符串左侧空格Rtrim(str); ‘去除字符串右侧空格replace(str,查找字符串，替代字符串，[起始字符，替代次数，比较方法])；‘替代字符串注：默认值：起始字符1；替代次数不限；比较方法区分大小写（0）inStr([起始字符],str，查找字符串，[比较方法])；‘查找的字符串在字符串的位置从左侧开始查注：比较方法中，compare 参数设置为：常数值vbUseCompareOption -1 说明：使用Option Compare 语句设置执行一个比较。
VB6.0 字符串 用法
trim(字符串) Byval 返回去掉了前、后之后的[字符串]
例如 trim(" 小 欣 无敌 ") 则返回 "小 欣 无敌" ，中间的空格不受任何影响
string(个数,字符) Byval 返回[个数]个[字符]
例如 string(3,"小") 则返回 "小小小" , 而 string(3,"小欣无敌") 也返回 "小"，只有首字符才有效
space(个数) Byval 返回[个数]个空格
例如 space(5) 则返回 " "
strconv(字符串,转换的类型) Byval 将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角
例如 strconv("xiao",vbwide) 则返回 "ＸＩＡＯ",而strconv("ＸＩＡＯ",vbnarrow) 则返回 "XIAO"
VB 常用字符串 操作函数
1. ASC(X)，Chr(X)：转换字符字符码
[格式]：
P=Asc(X) 返回字符串X的第一个字符的字符码
P=Chr(X) 返回字符码等于X的字符
[范例]：
(1)P=Chr(65)
‘ 输出字符A,因为A的ASCII码等于65
(2)P=Asc(“A”)
例如 ucase("xiaoXINwuDi") 则返回 "XIAOXINWUDI"
lcase(字符串) ByVal 返回[字符串]的小写形式，只对英文字符有效
常用内部函数
内部函数— 内部函数—数学函数
Sqr(x)：返回x的平方根
Sqr(16)的值为4
Int(x)：返回不大于x的最大整数
Int(7.8)的值为7， Int(-7.8)的值为-8
Fix(x)：返回x的整数部分
Fix(7.8)的值为7， Fix(-7.8)的值为-7
注意：Fix(x)为截断取整，即去掉小数部分； Int(x) 是取不大于x的最大整数。 例如： 例如： Fix(9.59) = 9 , Int(9.59) = 9 , Fix(-9.59) = -9 Int(-9.59) = -10
常用内部函数
Visual Basic的内部函数是系统预定义函数，用户 可直接调用。Visual Basic函数的参数必须用括号 括起来，并满足一定的取值要求。这里主要介绍 一些常用内部函数，其他函数可参见Visual Basic 的有关资料。 内部函数按其功能可分为数学函数、转换函数、 字符串函数、日期函数、颜色函数等。
表2-5 按钮样式
内部函数——MsgBox函数 函数 内部函数
表2-6 图标样式
值 16 32 48 64 Visual Basic常量 VbCritical VbQuestion vbExclamation vbInformation 图标样式 停止图标 问号（？）图标 感叹号（！）图标 消息图标
内部函数—颜色函数 内部函数 颜色函数
RGB(red, green, blue) 三个参数的取值范围为[0,255] 三个参数的取值范围为 RGB(0, 0, 0)为黑色 为黑色 RGB(255, 255, 255)为白色 为白色
内部函数— 内部函数 InputBox函数 函数
InputBox函数也称为输入对话框，返回用户在对话框 中输入的信息。函数格式如下：
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
从x字符串左边第n1个位置开始向右取n2个字符
Mid("Vb技术",2,2)
"b技"
Left(x,n)
从x字符串左边开始取n个字符
Left("Vb技术",3)
"Vb技"
Right(X,n)
从x字符串右边开始取n个字符
Right("Vb技术",3)
"b技术"
UCase(x)
将x字符串中所有小写字母转换为大写
Space(3)
" "
日期和时间函数
函数
功能
示例
结果
说明
Date
返回系统日期
Date
2006-9-1
(yyyy-mm-dd)
Time
返回系统时间
Time
w
返回系统日期和时间
Now
2006-9-1 15:45:33
(yyyy-mm-dd hh:mm:ss)
Year(c)
返回指定日期的年份
Year("2006-9-1")或
Year(#9/1/2006#)
2006
Month(c)
返回指定日期的月份
Month("2006-9-1")
9
Day(c)
返回指定日期的日子
Day("2006-9-1")
1
Weekday()
返回指定日期的星期几
Weekday("2006-9-1")
"A"
CBool(x)
将数字字符串或数值转换成布尔型
CBool(1)
CBool("0")
True
False
等于0为False，不等于0为True
CDate(x)
将有效的日期字符串转换成日期
CDate(#1990,2,23#)
"1990-2-23"
CSng(x)
将数值转换成单精度型
CSng(23.5125468)
UCase("Vb技术")
"VB技术"
LCase(x)
将x字符串中所有大写字母转换为小写
LCase("Vb技术")
"vb技术"
Trim(x)
去掉x字符串两边的空格
Trim(" Vb技术")
"Vb技术"
Ltrim(x)
去掉x字符串左边的空格
Ltrim(" Vb技术")
"Vb技术"
Rtrim(x)
去掉x字符串右边的空格
VB6.0常用内部函数
数学函数
函数
功能
示例
结果
说明
Abs(x)
绝对值
Abs(-50.3)
50.3
Exp(x)
自然指数
Exp(2)
e*e
e（自然对数的底）的某次方
Fix(x)
取整(取参数的整数部分)
Fix(-99.8)
-99
Int(x)
取整(取小于或等于参数的最大整数)
Int(-99.8)
Int(99.8)
-100
99
Log(x)
常用对数
Log(1)
0
求自然对数值
Rnd
随机产生0～1的单精度值
Int(6*Rnd)+1
1～6
要产生一个从Min到Max的整数，应使用公式Int((Max-Min+1)*Rnd+Min)
Round(x,n)
按小数位数四舍五入
Round(3.14159,3)
3.142
第2个参数为小数位数
计算反正切
Atn(1)
0.7854
Tan(x)
计算正切
Tan(3.14159265/180*45)
1
Sqr(x)
算术平方根
Sqr(9)
3
相当于
字符串函数
函数
功能
示例
结果
说明
Len(x)
求字符串的长度(字符个数)
Len("Vb技术")
4
LenB(x)
求字符串的字节个数
LenB("Vb技术")
8
VB中采用Unicode（ISO字符标准）来存储字符，所有字符都占2个字节
求日期之差函数：DateDiff(要间隔日期形式，日期一，日期二)
例：计算生日还有多少天：DateDiff("d", Now, #12/1/2006#)，结果为74
函数中的“要增减日期形式”或“要间隔日期形式”可参见下表中的形式：
日期形式
yyyy
q
m
y
d
w
ww
h
n
s
意义
年
季
月
一年的天数
日
一周的天数
星期
23.51255
CDbl(x)
将数值转换成双精度型
CDbl(23.5125468)
23.5125468
Rtrim(" Vb技术")
" Vb技术"
Instr(x1,x2,M)
返回字符串x2在字符串x1中的位置，M=1不区分大小写,省略则区分
Instr("baBBAC","BA")
4
找不到则返回0
String(n,x)
返回由n个首字符组成的字符串
String(3,"AB")
"AAA"
Space(n)
返回n个空格
6
星期日为1
Hour()
返回指定时间的时数
Hour("15:45:33")
15
Minute()
返回指定时间的分数
Minute(Now)
45
假定系统时间为15:45:33
增减日期函数：DateAdd(要增减日期形式，增减量，要增减的日期)
例：计算2周后的日期：DateAdd("ww",2,#9/1/2006#)，结果"2006-9-15"
时
分
秒
数据类型转换函数
函数
功能
示例
结果
说明
Str(x)
将数值转换为字符串
Str(45.2)
"45.2"
Val(x)
将字符串中的数字转换成数值
Val("2.3ab")
Val("a23")
2.3
0
Asc(x)
求字符ASCII值
Asc("a")
97
Chr(x)
将数值（ASCII码）转换为字符
Chr(65)
Sgn(x)
取参数的符号值
Sgn(8.8)
Sgn(-8.8)
Sgn(0)
1
-1
0
参数大于0，返回1
参数小于0，返回-1
参数等于0，返回0
Sin(x)
正弦
Sin(3.14159265/180*90)
1
三角函数以“弧度”为单位
Cos(x)
余弦
Cos(3.14159265/180*180)
-1
Atn(x)