VB中的常用控件

一 、函数的含义和作用

函数（function）一词，始用于1692年，见著于微积分创始人之一莱布尼兹G.W.Leibnic,1646—1717）的著作。而f(x)则由欧拉（Euler）于1724年首次使用。我国于1859年引进函数的概念，它首次是在清代数学家李善兰与英国传教士伟烈亚历山大合译的《代微积拾级》中出现。

百度百科中给出的定义：函数是指一个量随着另一个量的变化而变化。而VB中函数的作用主要是 开发者直接调用具有特定功能的函数，节省程序开发的时间。


二 、函数的分类

在VB中函数主要分两类：内部函数（也成为标准函数） 和 用户定义函数。

其中用户定义函数是由程序开发者根据程序需要定义的函数过程。在这里我们重点介绍常用的内部函数。

三 、函数的作用

（一） 数学函数

1、Abs(X)：绝对值计算。

2、Sgn(X)：符号函数。判断X符号。

3、Exp(X)：幂函数运算。

4、Log(X)：自然对数函数。

5、Sqr(X)：算数平方根函数。

6、三角函数：Sin（X）、Cos(X)、Tan(X)、Atn(X)

说明：返回值双精度，X单位弧度。

7、Round(X,2)：按指定小数位数四舍五入。

例：Round(3.764,2)=3.76

（二） 字符串函数

1、len(str)：计算字符串长度函数。（汉字为一个字符）

例：P=Len(“you are my lover.”) ‘P的值为17

2、取位置字符串函数

Mid（str，n,m）：从第n个字符向右取到第m个。

Left(str,n)：从左边取第n个字符。

Right(str,n)：从左边取第n个字符。

例：P=Mid(“you are my lover.”,9,8) ‘P的值为my lover

3、返回删除字符串空格剩余部分

Ltrim(str)：返回删除字符串左边空格以后的部分。

Rtrim(str)：返回删除字符串右边空格以后的部分。

Trim(str)：返回删除字符串左右空格以后的部分。

例：P=Rtrim(”I love you ”) ‘P的值为I love you

4、Space(n)：返回一个由n个空格组成的字符串，n非负，整数。

Tab(n)：其功能是在指定的第n个位置上输出数据

5、String(n,str)：返回由n个重复的字符串，字符为首字符。

例：P=string（4,”lover”） ‘P的值为“llll”

6、取整函数

Int(X)：返回小于或等于X最大整数。

Fix(X)：返回大于或等于X最小整数。

例：P=Int(-6.7) ‘P的值为-7

P=Fix(-6.7) ‘P的值为-6

（三） 类型转换函数

1、大小写转换

Lcase（str）：str中的大写转换为小写。

Ucase（str）：str中的小写转换为大写。

2、Val(str)：文本中的数值转换为数值型。

3、Str(X)：数值型转换为字符串型。

例：P=Str(38) ‘P的值为“38”

4、Asc(str)：返回str第一个字符ASCII。

5、Chr(X)：将ASCII码转换为字符串。

例：P=Chr(65) ’P的返回值为“A”

（四） 日期与时间函数

1、获取日期/时间函数

Date() ‘返回系统当前日期 格式：yy-mm-dd 或者 yyyy-mm-dd

Time() ’返回系统当前时间 格式：hh:mm:ss

Now() ‘返回日期当前的日期和时间

例：若当前系统时间为2016年2月2日19点46分17秒，则

P=Date() 结果为：P=2016-02-02

P=Time() 结果为：P=19:46:17

P=Now() 结果为：P=2016-02-02 19:46:17

2、截取日期/时间函数

日期

Year（X） ‘返回日期表达式年份整数

Month（X） ‘返回日期表达式月份整数

Day (X) ‘返回日期表达式日期整数

Weekday(X) ‘返回日期时间表达式星期整数（1~7）

例：若当前时间为X=#2016-02-02# 19:46:17

A= Year（X） 结果为 A=2016

B= Month（X） 结果为B=2

C= Day (X) 结果为C=2

D= Weekday(X) 结果为D=2

时间

Hour (X) ‘返回时间表达式小时整数

Minute(X) ‘返回时间表达式分钟整数

Second(X) ‘返回时间表达式秒整数

例：若当前时间为X=#2016-02-02 19:46:17#

A= Hour（X） 结果为 A=19

B=Minute（X） 结果为B=46

C= Second(X) 结果为C=17

说明：间隔类型

设置	yyyy	q	m	y	d	w	ww	h	n	s
描述	年	季	月	一年的日数	日	一周的日数	周	时	分	秒

（五） 随机数函数Rnd[(X)]

Randomize[X]

说明：Rnd函数用于返回或者说产生一个小于１但大于或者等于0的single类型的随机数

例: 随机产生一个随机数的程序如下：

Private Sub Command1_Click()

Dim X As Integer

Randomize

X = Val(Text1.Text)

MsgBox "产生的随机数是：" & Rnd(a)

End Sub

程序运行如下：