vb常用函数和结构

Format$(Now,\EOA\

只要这么一句~~~~~就可以得到“ 二○○六年五月二十六日” 亏我还得写得那么多。。。

所以对FORMAT函数进行研究，参照HELP文件，把一些用法写了下来。 现拿给大家共享。。。

--------------------------------- Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强制返回为文本 -------------------------------- 数字类型的格式化 --------------------------------

固定格式参数：

General Number 普通数字，如可以用来去掉千位分隔号 format$(\返回值 100123.12

Currency 货币类型，可添加千位分隔号和货币符号 format$(\返回值 ￥100,123.12

Fixed 格式为带两位小数的数字

format$(\返回值 100123.00

Standard 标准，即带千位分隔号和两位小数 format$(\tandard\返回值 100,123.00

Percent 百分数

VB常用函数（1）

一、 数学函数 在具体编程过程中，各类数学函数会被使用，数学函数用于数学计算，包括三角函数、求平方根函数、求绝对值函数、对数函数、指数函数等。它们与相应的数学定义相同。

使用数学函数时应注意一下几点：

1、 三角函数的参数应是弧度数，如sin300应写成：

Sin(30*3.14159/180)

2、Rnd()函数返回[0,1)之间的一个随机数，它往往和Randomise结合使用,后者将随机数初始化，避免Rnd()产生相同的随机数。

表1 常用数学函数

[探讨题1]请在屏幕上打印出[5,6）之间的随机数 Private Sub Command1_Click() Randomize a = Rnd()+5

Print a End Sub

[探讨题2]请在屏幕上打印出[5,11)之间的随机数

Private Sub Command1_Click() Randomize a = Rnd*6+5 Print a End Sub

[探讨3]请在屏幕上打印出[b,c )之间的随机数,并请同学熟记

Private Sub Command1_Click() Randomize a = Rnd*(c-b)+b

4．5 常用内部函数

为了满足用户编程的需要，VB在系统内部提供了若干个能完成某个特定功能的程序段，这些程序段称为内部函数。如求某个数的平方根的函数，求某个数的对数的函数等。 在程序中使用函数称为函数调用，函数调用的一般格式为： 函数名(参数1，参数2，?)

其中，参数(也称自变量)放在圆括号内，若有多个参数，参数间以逗号分隔。

函数调用后，一般都有一个返回值，即函数值。例如：

y=Sqr(7)

其中，Sqr是内部函数名，7为参数。运行时，该语句调用内部函数Sqr来求7的平方根，其计算结果由系统返回作为Sqr的值。本例把返回值赋给变量y。

在包含有函数的表达式中进行运算时，系统将优先进行函数调用。函数调用往往包含在表达式中，不能作为一条独立的语句使用。

VB的内部函数大体上分为四大类：数学函数、字符串函数、日期与时间函数和转换函数。

4．5．1 数学函数

表4-5列出了VB提供的10种常用数学函数。

表4–5 常用数学函数 函 数 Sin(x) Cos(X) Tan(x) Sqr(x) Exp(x) Log(X) Fix(x) 返回值类型 Double Double Double Double Double Double Double

字符函数 函数名 功能 示例 ASC

返回一个 Integer，代表字符串中首字母的字符代码。 Asc(string) CHR

返回 String，其中包含有与指定的字符代码相关的字符 Chr(charcode)

Format

返回 Variant (String)，其中含有一个表达式，它是根据格式表达式中的指令来格式化的。

Format(expression[, format[, firstdayofweek[, firstweekofyear]]]) Hex

返回代表十六进制数值的 String。 Hex(number) InStr

返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。 InStr([start, ]string1, string2[, compare])

InstrRev

返回一个字符串在另一个字符串中出现的位置，从字符串的末尾算起。 InstrRev(string1, string2

VB函数大全 Calendar 常数

可在代码中的任何地方用下列常数代替实际值： 常数 值 描述

vbCalGreg 0 指出使用的是阳历。

vbCalHijri 1 指出使用的是伊斯兰历法。

-------------------------------------------------------------------------------- Color 常数

可在代码中的任何地方用下列常数代替实际值： 常数 值 描述

vbBlack 0x0 黑色 vbRed 0xFF 红色

vbGreen 0xFF00 绿色 vbYellow 0xFFFF 黄色 vbBlue 0xFF0000 蓝色

vbMagenta 0xFF00FF 紫红色 vbCyan 0xFFFF00 青色 vbWhite 0xFFFFFF 白色

-------------------------------------------------------------------------------- Comparison常数

下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地

VB函数大全基本函数大全

VB 函数大全基本函数大全Abs And Array Asc 函数 运算符 函数 函数 返回数的绝对值执行两个表达式的逻辑连接。 执行两个表达式的逻辑连接。

返回含一数组的 变体 返回字符串首字母的 ANSI 字 符代码

Atn CBool

函数 函数

返回数的反正切值 返回已被转换为 Boolean 子 类型的变体的表达式

CByte

函数

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

CCur

函数

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

CDate

函数

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

CDbl

函数

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

Chr CInt

函数 函数

返回指定 ANSI 字符码的字符 返回已被转换为整数子类型的 变体的表达式

Class

对象

提供对已创建的类的事件的访

VB函数大全基本函数大全

问 Class Clear CLng 语句 方法 函数 声明类名 清除 Err 对象的所有属性设置 返回已被转换为 Long 子类型 的变体的表达式 Const Cos CreateObject 语句 函数 函数 声明用于字母值的常数。 声明用于字母值的常数。 返回角度的余弦值。 返回角度的余弦值。 创建并返回对“自动” 创建并返回对“

VB常用算法总结

一、变量值的交换

算法思想：若交换两个变量的值，必须引入第三个新的变量进行传递。 以下代码是错误的：

X=12 ：Y=34 ：X=Y ：Y=X 正确的代码是：

X=12 ：Y=23 ：T=X ：X=Y ：Y=T 二、判断一个数是否能被另一个数整除

算法思想：可以用整除的定义（余数为0）或X除以Y等于X整除Y等表达式进行判断。 条件表达式可以为：X mod Y=0 或 X＼ Y=X/Y 或 Int(X/Y)=X/Y 如果以上条件表达式为True，则表示X能被Y整除。 三、累加、阶乘、计数和求平均值

算法思想：使用循环语句，并用一个变量存放累加的中间及最终结果。 注： 累加求和时变量初值为0，计算阶乘时变量初值为1。

统计计个数（计数）时可用一个变量作为统计个数的累加变量，每次加1即可。 求平均值算法思想是先求和，再除以个数。 条件求和（或计数）：在循环语句中加入If－End If判断语句。

例题：计算1到10之间所有整数的累加和以及10！。 n=10

sum=0 ‘累加求和时，变量的初值一定为0

prod=1

Visual Basic 常用控件的属性、事件和方法 属性 1.Name名称属性 2.Caption标题属性 3.Height、width、top和left(大小 位置)属性 4.Enabled属性 5. Visible属性 6.Font属性 说明 创建的对象名称,有默认的名.在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。不能同名 该属性决定了控件上显示的内容。文本框控件无caption 属性 Top Left Width Heig 控件是否可操作. 当设置为False时,呈暗淡色,禁止用户进行操作. 控件是否可见.当设置为False时, 用户看不到，但控件本身存在。 在属性窗口可直接设置字体字体大小粗体斜体删除线下划线,字颜色 窗体的Font属性可使窗体上的对象字体设置相同。 在代码中可用一组Font属性设置： Fontname Fontsize Fontbold Fontitalic Fontunderline Fontstrikethru ForeColor 字体 字体大小 是否是粗体 是否斜体 是否带下划线 是否加一删除线 字体颜色 7. Forecolor前景颜色属性 设置控件的前景颜色（即正文颜色). 其值是一

龙源期刊网 http://www.qikan.com.cn

VB编程的常用技巧

作者：吴中宁

来源：《电脑知识与技术》2017年第11期

摘要：VisualBasic编程语言是目前比较热门的软件编程工具，因为其相对比较容易进行相关操作，受到各类学者以及软件爱好人员的喜爱，基于日常的应用，本文从介绍基础操作中的使用技巧以及相关原则出发，详细描VisualBasic编程语言中文本框、列表框以及工具栏的相关使用技巧，供只进行过初级训练的学者及软件爱好者等读者进行学习，与此同时，下面介绍一些VisualBasic编程语言中深入操作方面的使用技巧以及相关示例展示，列举出经典的编程例子。例如轻松实现撤消或恢复的功能、如何从屏幕上捕捉图像的相关技巧、在程序中添加Line控件实现相应功能以及学会利用进程内与进程外组件，让读者们既能够学会相应的编程语言，同时还能够发现VisualBasic编程语言的魅力和神奇的功能。 关键词：VisualBasic编程语言；系统编程；常用的技巧

随着计算机技术的飞速发展，软件产业在其中蓬勃的发展出现了空前的高涨。作为程序员，越来越意识到，为了提高应用的统一性、一致性和编程的效率，

VB常用算法----排序

1、选择法排序

(1) 利用循环从n个数中选出最小数的下标，结束循环后，将最小数与第一个数交换位置；

(2) 除第一个数外，在剩下的n-1个数中再按方法（1）选出次小的数，与第二个数交换位置；

(3) 以此类推，最后构成递增序列。 譬如：

8 2 2 2 2 2

6 6 3 3 3 3

9 9 9 6 6 6

3 3 6 9 7 7

2 8 8 8 8 8

7 7 7 7 9 9

第一轮交换后 第二轮交换后 第三轮交换后 第四轮交换后 第五轮无交换

程序代码如下：

Private Sub xzPaiXu(a() As Double, sheng As Boolean)

'a为需要排序的数组，sheng为True则为升序排列，为False，则为降序排列。 Dim i As Integer, j As Integer Dim temp As Double Dim m As Integer

For i = LBound(a) To UBound(a) - 1 '进行数组大小-1轮比较 m = i