大二上学期末复习二周.pptx

三种读文件操作的区别;过程

P125;过程;函数过程;事件过程;PrivateSubForm_事件名[(参数列表)]

[局部变量和常数声明]

语句块

EndSub

注意

过程名由“Form”、下划线和事件名组成

过程名前的“Private”，用于限定其使用范围是模块级的（在本窗体中有效）

事件过程有无参数，由VB决定;PrivateSub控件名_事件名[(参数列表)]

[局部变量和常数声明]

语句块

EndSub ;自定义过程;引例;Dimn%,m%,i%,s1#,s2#,s3#

n=Val(InputBox(输入N))

m=Val(InputBox(输入M))

s1=1

Fori=1Ton

s1=s1*i

Next

s2=1

Fori=1Tom

s2=s2*i

Next

s3=1

Fori=1Ton-m

s3=s3*i

Next

Printn;选;m;有;s1/(s2*s3);种组合！;自定义函数过程（Function）P125;Function自定义函数过程定义;注意：

1.函数过程命名规则同变量

2.函数名有值、有类型

3.参数列表形式:[ByVal]变量名[As类型]

称为形参或哑元，仅表示参数的个数、类型，无值。

4.在Function之前可加表示过程作用域的定义符

Public（公有的）：

可被应用程序（工程）中的任何模块调用(默认)

Private（私有的）：

只可由本模块(文件)中的过程调用;注意：函数在定义和使用时，无论是否有参数，圆括号一定不能省。

特点：不能独立存在，必须参加表达式的运算;练习;计算多边形面积，可将多边形分解成若干个三角形。

计算三角形面积的公式如下：;函数过程的调用

PrivateSubCommand1_Click()

a=InputBox(输入边长a)

…………

S1=area(a,b,c)

…………

PrintS1+S2+S3

EndSub;子过程的定义与调用P129;自定义子过程（Sub）;自定义子过程的定义;自定义子过程的调用;问题;例：编写判断素数的函数过程Prime(n)，函数的返回值类型为布尔型。;FunctionPrime(n%)AsBoolean

tag=True

Fori=2Ton-1

IfnModi=0Then

tag=False

ExitFor

EndIf

Next

EndFunction;例：判断素数，并求范围内的素数之和。