tceic.com
学霸学习网 这下你爽了
相关标签
当前位置:首页 >> 英语 >>

03


VB补充内容

1. 当型循环结构
格式: – While 条件
语句块 条件为真?

N

– Wend 功能: – 首先判断条件,当条件为 真时,反复执行语句块, 当遇到Wend时,返回到 While对条件进行测试;当 条件不为真时,转到Wend 之后执行。

Y


语 句 块

2014年3月

Visual Basic程序设计

No.2

例1. 利用当型循环编程求n! . 代码如下: Private Sub Form_Click() Dim f As Long Dim n As Integer, i As Integer n = Val(InputBox("请输入自然数n")) f = 1& i=1 While i <= n f=f*i i=i+1 Wend Print n; "!="; f End Sub
2014年3月 Visual Basic程序设计 No.3

例2 从键盘上输入字符,对输入的字符进行计数,当输入字符为“?” 时,停止计数,并输出结果。 代码如下: Private Sub Form_Click() Dim char As String * 1 Const ch$ = "?" Counter = 0 msg$ = "请输入一个字符" char = InputBox(msg$) While char <> ch$ Counter = Counter + 1 char = InputBox(msg$) Wend Print "字符个数为:"; Counter End Sub
2014年3月 Visual Basic程序设计 No.4

2. 数组的清除
数组一经定义,就在内存中分配了相应的存储空间, 其大小是不能改变的,即在一个程序中,同一个数 组只能定义一次。 有时候可能需要清除数组的内容或对数组重新定义, 这个可用Erase语句来实现,其格式为: Erase 数组名[, 数组名] …… – 说明:
该语句用来初始化静态数组的元素,如果是动态数组, 则释放其存储空间

2014年3月

Visual Basic程序设计

No.5

注意: – 如果把Erase用于静态数组时,如果数组是数值 型数组,则把所有数组元素变为0;如果是字符 串数组,则把所有元素变为空字符串;如果是用 户自定义数据类型的数组,则根据该类型中每个 具体数据项重新进行设置。 – 如果把Erase用于动态数组,则释放该数组所占 用的内存。 – 如果把Erase用于变体数组,则每个元素的值为 Empty。 – 用Erase清除掉的动态数组,在下次使用该数组 时,必须用ReDim重新定义该数组。
2014年3月 Visual Basic程序设计 No.6

例3. Erase语句功能示例。
Private Sub Form_Click() Dim test(1 To 20) As Integer For i = 1 To 20 test(i) = i Print test(i); Next i Erase test Print Print "清除后的数组Test:" For i = 1 To 20 Print test(i); Next i End Sub

2014年3月

Visual Basic程序设计

No.7

3. For Each…Next语句
与For…Next语句类似,但主要用于数组或对象集合的反 复操作。 格式: For Each 成员 In 数组

循环体 [ Exit For ] ……
Next [成员] 说明: – 这里的成员是一个变体变量,实际上代表数组中的每个 元素。 – 数组只给出名称,不给括号和下标。 – 不能利用成员来改变数组元素的值。
2014年3月 Visual Basic程序设计 No.8

例4. For Each … Next 语句示例。
Private Sub Form_Click() Dim a(1 To 20) Randomize For i = 1 To 20 a(i) = Int(Rnd * 100) Next i For Each x In If x > 50 Print Sum = End If a Then x; Sum + x

If x > 95 Then Exit For End If Next x Print
2014年3月 Visual Basic程序设计 No.9

4. 闲置循环与DoEvents语句
VB属于事件驱动型语言,在一般情况下,只有当 发生事件时才执行相应的程序。如果没有事件发 生,则应用程序处于“闲置”状态。 另一方面,如果VB在执行一个事件过程(即应用 程序牌“忙碌”的状态),则必须等待这个过程 执行完毕后,其它过程才能开始。等待执行的过 程必须排队。 为了改变这种状态,VB提供了闲置循环(Idle Loop)和DoEvents语句。

2014年3月

Visual Basic程序设计

No.10

所谓闲置循环,就是程序处于闲置状态时,用一 个循环来执行其他操作。 如果要在循环执行的过程中,可以执行其它操作, 则可以通过DoEvents语句来实现程序控制权的转 让。 例如在射击游戏中,射出的子弹的飞行过程是一 个事件过程,如果没有DoEvents之类的处理机制, 则只有把子弹飞行过程执行完了,其它的物体或 操作才能被处理。但由于可以采用DoEvents,使 得子弹在飞行过程中,计算机仍然可以处理其它 事件,如被射击目标的飞行、躲避,游戏玩家的 连续射击等。
2014年3月 Visual Basic程序设计 No.11

DoEvents用法 – 格式: [窗体号=] DoEvents [( )] – 即DoEvents既可以做为语句使用,也可以做 为函数使用。

2014年3月

Visual Basic程序设计

No.12

例5. 设计如下窗体,事件代码见实例,演示 DoEvents用法。

2014年3月

Visual Basic程序设计

No.13

5. 可选参数与可变参数
1. 可选参数 – 即Sub过程或Function过程的参数是可选的。 – 例: Sub multi(fir as integer, sec as Integer, Optional third) N=fir * sec If Not IsMissing(third) Then N=n*third End If ?n End Sub – 其中的第三个参数third为可选参数。

2014年3月

Visual Basic程序设计

No.14

说明: – 可选参数可以是一个,也可以是多个; – 可选参数必须放在参数表的最后; – 可选参数通过Optional关键字指定; – 可选参数必须是Variant类型; – 可通过IsMissing测试是否传递了可选参 数。

2014年3月

Visual Basic程序设计

No.15

2. 可变参数 – 即参数的个数是可变的。 – 可变参数通过ParamArray命令来定义,格 式为: Sub|Function 过程名(ParamArray 数组名) – 说明:
可变参数中的数组只给名字,不给下标; 数组是变体类型,因此可以传递任何类型参数。 数组也可以是集合

2014年3月

Visual Basic程序设计

No.16

例: Sub Add(ParamArray a()) N=1 For each x in a
N=n*x

Next x ?N End Sub

Private Sub Form_Click() Dim a%, b%, c%, d% A=6: b=8 C=12: d=2 Add a,b,c,d End Sub
Visual Basic程序设计 No.17

2014年3月

点睛培训

2014年3月

Visual Basic程序设计

No.18


推荐相关:

合同法03任务

合同法03任务_电大_成人教育_教育专区。合同法 03 任务一、单项选择题(共 20 道试题,共 40 分。 ) 1. 张某与租赁公司签订小汽车借用合同,合同约定了租金和...


商标注册03类细分

除指甲油制剂 030088, 熏衣草水 030090, 带香味的水 030091, 花露水 030092, 脱毛剂 030096, 脱毛制剂 030096, 除汗毛用蜡 030097, 化妆品 030102, 化妆...


水泥厂设备安装验收规范JCJ-03-90

水泥厂设备安装验收规范JCJ-03-90_建筑/土木_工程科技_专业资料。第一章 总则 第一节 主题内容与适用范围及一般规定 第 1.1.1 条 主题内容与适用范围 一、本...


《工程项目管理》第03章在线测试

《工程项目管理》第 03 章在线测试《工程项目管理》第 03 章在线测试 剩余时间:54:32 答题须知:1、本卷满分 20 分。 2、答完题后,请一定要单击下面的“...


《西方经济学(宏观)》第03章在线测试

《西方经济学(宏观)》第03章在线测试_经济学_高等教育_教育专区 暂无评价|0人阅读|0次下载|举报文档《西方经济学(宏观)》第03章在线测试_经济学_高等教育_教育...


《合同法》03任务_图文

《合同法》03任务_电大_成人教育_教育专区。电大形成性考试03任务 合同法 03 任务一、单项选择题(共 20 道试题,共 40 分。 ) 1. 张某与租赁公司签订小汽车...


《商务谈判》第03章在线测试

《商务谈判》第03章在线测试_计算机软件及应用_IT/计算机_专业资料。《商务谈判》第 03 章在线测试《商务谈判》第 03 章在线测试 答题须知:1、本卷满分 20 分...


ISO 105 E03氯水

ISO 105 E03氯水_学习计划_计划/解决方案_实用文档。ISO氯漂牢度ISO ISO 105-E03:1994(E) 氯水洗色牢度(泳池水) 1. 仪器和试剂 1.1 合适的仪器应包括一个...


word2003的三种页码设置方法

word2003 的三种页码设置方法 在使用 Word 时,经常要根据实际情况来编排页码,那么只要掌握了下面列出的 几种常见页码的编排方法,就可以做到 word 页码随意定: 一...


政府经济学网上作业03任务

政府经济学网上作业03任务_经济学_高等教育_教育专区。政府经济学网上作业 03 任务 03 任务_0001 一、单项选择题(共 10 道试题,共 10 分。 ) 1. 1776 年...

网站首页 | 网站地图
All rights reserved Powered by 学霸学习网 www.tceic.com
copyright ©right 2010-2021。
文档资料库内容来自网络,如有侵犯请联系客服。zhit325@126.com