VB 学习

VB学习

技术 2009-07-12 21:00 阅读20评论0

字号: 大大 中中 小

一.基本语句

1. 变量和常量

2. 条件语句

3. 循环语句

4. 其他语句

二.函数和过程

1. 基本函数

2. 自定义函数

3. 基本过程

4. 自定义过程

变量和常量

1.定义变量

格式: Dim 变量名 As 变量类型

说明: 常用的变量类型有: Integer 整型

Long 长整型

Single 单精度小数

Double 双精度小数

String 字符串

Boolean 布尔型(只有真“True”或假“False”两个值)

2.定义常量

格式: Const 常量名=值

说明:

3.定义变量数组

格式: Dim 变量名(下标)As 变量类型

说明: 即定义一组具有相同变量名和不同下标的变量。

示例: Dim a ( 9 ) As Integer

这一句定义了a (0),a (1),a (2),a (3)……a (9) 共10个变量。

注意:下标必须是一个大于0的整数且下标不能为变量。

基本过程

1. 关于VB标准过程

基本格式: Sub 对象名­_动作名(参数1,参数2,……,参数n)

一段程序

End Sub

说明: 对象名即被操作的对象的名字。动作名即操作的类型。

示例: 假设我创建了一个文本框对象,名字叫做Text1。我希望在单击它时执行一段程序。那么只要输入:

Sub Text1_Click () ‘这里的Click代表单击

一段程序

End Sub

当然,我也可以直接在程序中用鼠标选择它。

2. 关于动作名

由于各个控件的可执行动作各不相同,所以在这里我只列出常用的。

(1) Click()单击对象时执行,无参数。

(2) DblClick() 双击对象时执行,无参数。

(3) KeyDown(KeyCode As Integer, Shift As Integer) 按下某个键时执行,其中变量KeyCode代表所按下的按键的号码,变量Shift代表是否按下Shift键,如果是则Shift=1,否则Shift=0。

(4) KeyPress(KeyAscii As Integer)按下并松开某个键时执行,变量KeyAscii代表按键号码。

(5) KeyUp(KeyCode As Integer, Shift As Integer) 松开某个键时执行,其中变量KeyCode代表所按下的按键的号码,变量Shift代表是否按下Shift键,如果是则Shift=1,否则Shift=0。

(6) MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)按下鼠标按键时执行,其中Button是指按下鼠标的哪个键(1是左键,2是右键,4是滚轮),Shift代表是否按下Shift键,如果是则Shift=1,否则Shift=0,X代表鼠标在对象上的横坐标位置,Y代表鼠标在对象上的纵坐标位置。

(7) MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)松开鼠标按键时执行,其中各参数的意义同上。

(8) MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)鼠标移动时执行,其中各参数的意义同上。

(9) Load() 当打开窗体时执行,无参数。

(10) Unload(Cancel As Integer)当关闭窗体时执行,参数Cancel代表是否关闭窗体,当Cancel=1时不关闭。

(11) Resize()当对象大小改变时执行。

(12) Change()当显示内容改变时执行。

(13) Timer()定时执行。

基本函数

一. 数值型函数

1. Abs(表达式)返回表达式的绝对值

2. Atn(表达式) 返回表达式的反正切值

3. CDbl(表达式)将表达式转化为双精度小数

4. CInt(表达式)将表达式转化为整型(即四舍五入)

5. CLng(表达式)将表达式转化为长整型(即四舍五入)

6. Cos(表达式)返回表达式的余弦值

7. CSng(表达式)将表达式转化为单精度小数

8. Exp(表达式)返回e的平方

9. Int(表达式)返回表达式的整数部分

10. Log(表达式)返回表达式的自然对数值

11. Randomize(n)初始化第n组随机数

12. Rnd(n)返回0到1之间的一个随机数

13. Sin(表达式)返回表达式的正弦值

14. Sqr(表达式)返回表达式的平方根

15. Tan(表达式)返回表达式的正切值

16. Val(字符串)返回字符串中包含的数值

17. Asc(字符串)返回字符串中第1个字符的ASCII码

二. 字符串型函数

1. Chr(n)返回第n个ASCII字符(n在0到255之间)

2. CStr(表达式)将表达式转化为字符串型

3. LCase(字符串)将字符串转化为小写

4. Left(字符串,n)返回字符串中从左边起第n个字符

5. Len(变量)返回变量大小

三. 系统函数

1. Beep使扬声器发出一个声音

2. ChDir(路径)修改指定驱动器上的当前目录

3. ChDrive(驱动器名)改变当前驱动器

4. CurDir(驱动器名)返回当前路径

5. Dir(路径,?)

6. EOF(文件序号)返回一个值是否到达文件结束

7. Err()返回发生错误的错误号

8. Error(错误号)返回指定错误号的错误信息

9. FileCopy(源文件,目标文件)复制文件

10. FileDateTime(文件路径)返回文件的时间和日期

11. FileLen(文件路径)返回文件大小(以字节为单位)

12. FreeFile()返回open语句可使用的下一个文件序号

13. GetAttr(文件路径)返回一个文件的属性,目录和文件夹

14. Kill(文件路径)删除指定文件

四. 布尔函数

1. CBool(表达式)将表达式转化为布尔型

2. IsArray(变量名)判断变量是否数组

3. IsEmpty(变量名)判断变量是否已被赋值

4. IsError(表达式)判断表达式是否有错

5. IsNumeric(字符串)判断字符串是否数据

其他语句

1. 中途跳出

格式:Exit Sub

说明:用于中途跳出一段程序。

2. 结束程序

格式:End

说明:中断整个程序的运行。

3. 显示窗体

格式:窗体名.show

说明:显示一个窗体。

4. 加载窗体

格式:Load 窗体名

说明:将窗体加载到内存中。

5. 关闭窗体

格式:Unload 窗体名

说明:将窗体从内存中释放。

6. 隐藏窗体

格式:窗体名.Hide

说明:把窗体隐藏起来(但还占用内存)。

7. 弹出对话框

格式:MsgBox(内容,按键,标题,帮助文件路径,……)

说明:除内容必须输入外其他的参数均为可选。

条件语句

1.格式:If 条件1 Then 语句1

说明:如果 条件1 成立则执行语句1,否则执行下一句。

2.格式:If 条件1 Then 语句1 Else 语句2

说明:如果 条件1 成立则执行语句1,否则执行语句2。

3.格式:If 条件1 Then

语句组1

End If

说明:如果 条件1 成立则执行语句组1,否则跳过这一句组。

4.格式:If 条件1 Then

语句组1

Else

语句组2

End If

说明:如果 条件1 成立则执行语句组1,否则执行语句组2

5.格式:If 条件1 Then
VB 学习

语句组1

Else If 条件2 Then

语句组2

Else If 条件3 Then

语句组3

……

Else If 条件n Then

语句组n

Else

语句组n+1

End If

说明:如果条件1成立则执行语句组1,如果条件1不成立但条件2成立则执行语句组2,如果条件1和条件2都不成立但条件3成立则执行语句组3……如果条件n之前的条件都不成立但条件n成立则执行语句组n,如果所有条件都不成立则执行语句组n+1。

6.格式:Select Case 变量1

Case 表达式1

语句组1

Case 表达式2

语句组2

……

Case 表达式n

语句组n

Case Else

语句组n+1

End Select

说明:如果变量1等于表达式1则执行语句组1,如果变量2等于表达式2则执行语句组2,……,如果变量n等于表达式n则执行语句组n,如果变量1不等于任何一个表达式则执行语句组n+1。

循环语句

1. 定量循环

格式:For 变量a=起始值 To 结束值 Step 差量

语句组

Next 变量a

说明:反复执行语句组,直到变量a的值由起始值变为终值。其中每执行一次语句组变量a都增加一个差量。

示例:Dim a As Integer

Dim i As Integer

a=0

For i=1 To 5 Step 1

a=a + i

Next i

这段程序的执行过程是:a=0 , i=1 , a=a+i=0+1=1 , i=i+差量=1+1=2 , a=a+i=1+2=3 , i=i+差量=2+1=3 , a=a+i=3+3=6 , i=i+差量=3+1=4 , a=a+i=6+4=10, i=i+差量=4+1=5 , a=a+i=10+5=15.最后a=15。

2. 条件循环

(1) 格式:Do

语句组

Loop Until 条件

说明:执行语句组直到条件成立为止。

(2) 格式:Do Until 条件

语句组

Loop

说明:执行语句组直到条件成立为止。(与前一种格式的不同之处在于前一种格式中,语句至少要被执行一次。而这一种格式中,如果一开始条件成立,则语句组一次都不执行。)

(3) 格式:Do

语句组

Loop While 条件

说明:执行语句组直到条件不成立为止。

(4) 格式:Do while 条件

语句组

Loop

说明:执行语句组直到条件不成立为止。(与前一种格式的不同之处在于前一种格式中,语句至少要被执行一次。而这一种格式中,如果一开始条件不成立,则语句组一次都不执行。)

自定义过程

定义过程:

Sub 过程名(参数1 As 变量类型,参数2 As 变量类型,……,参数n As 变量类型)

程序内容

End Sub

说明:

输入“过程名(参数1,参数2 ,……,参数n )”时即可运行程序内容。

自定义函数

1. 格式:

Function 函数名(变量1 As 变量类型,变量2 As 变量类型,……,变量n As 变量类型) As 变量类型

语句组

End Function

2. 说明:

定义一个自定义函数,调用方法为: 函数名(参数1,参数2,……,参数n)

3. 示例:

Function 是否偶数( a As Integer ) As Boolean ‘定义一个叫做是否偶数的布尔型函数,这个函数有一个整型参数a

Dim b As Single ‘定义一个整型变量b

B = Cint(a /2) ‘B等于a除以2后进行四舍五入得到的值

If b = a / 2 Then

是否函数=True

Else

是否偶数=False

End If ‘如果b等于a除以2那么函数值为真,否则函数值为假

End Function ‘结束函数过程

在程序中输入以上代码后,我们要判断变量x是否偶数,并有一个布尔变量y,我们只要输入:y=是否偶数(x)

如果x是偶数,则y的值为真;否则为假。

  

爱华网本文地址 » http://www.413yy.cn/a/25101012/117045.html

更多阅读

photoshop学习教程

photoshop学习教程——简介photoshop是一款强大的图片处理软件,用它强大的功能,可以使我们达成很多目的。今天我就来教大家用ps去水印的方法。photoshop学习教程——工具/原料?psphotoshop学习教程——方法/步骤photoshop学习教程 1

四快学习法的价格问题

四快学习法的价格问题——简介随着现在的四快学习法的逐渐在我国的各个区域市场的畅销,很多的学生家长都开始积极地关注到这样的热门的教辅材料,因为很多人都想要了解到四快学习法的神奇之处,想要知道为什么简单的教辅方法就能够改

五笔打字学习教程:1 初学五笔的疑问解答

五笔打字学习教程:[1]初学五笔的疑问解答——简介一步一步地教会你使用五笔输入法打字,最终成为打字高手。请看我的系列经验。五笔打字学习教程:[1]初学五笔的疑问解答——工具/原料五笔输入法五笔打字学习教程:[1]初学五笔的疑问解答

洛克王国,怎样学习百变液化术?

洛克王国的百变液化术要怎么学习呢?洛克王国,怎样学习百变液化术?——学习方法洛克王国,怎样学习百变液化术? 1、点开任务档案-成长之路-魔法之路-液化术课程选择现在就过去! 洛克王国,怎样学习百变液化术? 2、来到实验工坊点击爱因斯坦对

关于儿童学习跆拳道的几个问题

关于儿童学习跆拳道的几个问题——简介练习跆拳道能提高吃苦耐劳的能力.无论练习哪种武术,都是要下苦功夫的,一个动作为了做的标准,有力量、有速度,可能要练习成百上千次,没有吃苦耐劳的精神是做不到的.强身健体.跆拳道也是一项体育竞技,

声明:《VB 学习》为网友懵圈儿分享!如侵犯到您的合法权益请联系我们删除