教案VBsub过程PPT课件

精品课件
112 2
• 2、单击窗体时，下列程序的执行结果为( )。 • Sub Procl(x As Integer，ByVal y As Integer，z As Integer) • x=3*z • y=2*z • z=x+y • Print x；y；z • End Sub • Private Sub Form_Click() • Dim x As Integer，y As Integer，z As Integer • x=1：Y=2：Z=3 • Call Procl(X，X，Z) • Call Procl(X，Y，Y) • End Sub
精品课件
113 3
·用Call语句调用一个Sub过程时，如果过程本身没有参数， 则省略<实参表>和括号。
．格式二省略了Call关键字，同时<实参表>两边也不能带括
号。
精品课件
99
Sub过程的调用
精品课件
110 0
子过程与函数过程区别
(1)函数过程名有值，有类型，在函数体内至少赋值一次； 子过程名无值，无类型，在子过程体内不能对子过程名赋
精品课件
33
3．有如下函数与调用过程：
Private Sub Command1_Click() i=Val(InputBox("请输入一个数")) a=fact(i) Print a End Sub
Function fact(x As Integer)As Long
Dim P As Long，i As Integer
值； (2)调用时，子过程调用是一句独立的语句。
函数过程不能作为单独的语句加以调用，必须参与表达式 运算。 (3)一般当过程有一个函数值，使用函数过程较直观；
反之若过程无返回值，或有多个返回值，使用子过程较直 观。
精品课件
1111
上机练习
• 1、有一个过程如下： • Sub Cmax(X，Y，max) • max=Iif(x>Y，x，Y) • End Sub • 调用过程如下： • Private Sub Command1_Click() • i=Val(InputBox("请输入第1个数")) • j=Val(InputBox(" 请输入第2个数")) • Cmax i，j，a • Print a • End Sub • 程序运行后，分别输入12、56，结果为( )。
• Next i
• Print z
• A．ABA
B． BBABBA
• C． ABBABA D． AABAAB
精品课件
22
复习提问
2．下列定义Myfun．函数过程的语句中，( )是错误的。 A．Private Public Myfun(a) As Integer B．Static Function Myfun(a) C．Function Myfun(a As Integer)As Integer D．Private Function Myfun(a As Integer)
Biblioteka Baidu
P=1
For i=1 To X
P=P*i
Next i
fact=P
End Function
程序运行后，若输入5，则运行结果为( )。
A．120 B．60 C.80 D.100
精品课件
44
重点
1、过程的定义方法 2、过程的调用 3、过程与函数的区别
精品课件
55
Sub过程
当需要定义的过程返回一个值时，使用前 面介绍的Function过程很容易实现，但在实际 应用中，可能希望过程不需要返回值，例如， 使用过程打印一个图形，或需要返回多个值；
精品课件
77
说明
• 格式中各项含义同Function过程。Exit Sub用于退出Sub过 程。
• Sub过程的<过程名>与Function过程的<函数过程名>的含义 与作用不同，<过程名>只在调用Sub过程时使用，不具有值的 意义，在Sub过程中不能给<过程名>赋值，也不能给<过程名> 定义类型。
如，利用过程对一批数据进行排序，或 者要进行较复杂的操作，等等。在这些情况下 就要利用Sub过程来实现。
精品课件
66
Sub过程的定义
Sub过程的格式 [Private | Public][Static] Sub <过程名> [(<形参表>)] [<语句组>] [Exit Sub] [<语句组>] End Sub
定义一个Sub过程之后，必须使用Call语句调用该过程。 调用格式一：Call <过程名> [(<实参表>)] 调用格式二：<过程名> [<实参表>]
·<过程名>：要调用的Sub过程名。
·<实参表>：要传送给Sub过程的常量、变量或表达式，各参 数之间用逗号分隔。如果是数组参数，则要在数组名之后跟
一对空括号。
• 过程可以返回0到多个值，且由<形参表>中的参数返回这些 值。因此，使用函数过程可以实现的功能，也可以用Sub过程 实现。
• Sub过程的建立方法与Function过程的建立方法相同，可以 在代码窗口中直接输入，也可通过执行“工具”菜单中的 “添加过程”命令生成过程模板。
精品课件
88
Sub过程的调用
Visual Basic程序设计
第七章 控制结构
7.4 过程和函数 sub()过程
精品课件
11
复习提问
• 1、执行以下程序段,输出的结果为( )
• a$="abbacddcba"
• For i=6 To 2 Step -2
• x=Mid(a,i,i): y=Left(a,i)
• z=Right(a,i): z=UCase(X & Y & z)