欢迎来到天天文库
浏览记录
ID:5381215
大小:810.00 KB
页数:58页
时间:2017-11-09
《本章主要内容通用过程su》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、第7过程本章主要内容通用过程Sub过程/Function过程参数传递过程的嵌套与递归调用变量的作用范围多窗体与SubMain过程程序举例第7章过程VB应用程序是由过程组成的,过程是完成某种特殊功能的一组独立的程序代码。两大类过程。事件过程Sub过程通用过程Function过程事件过程是当某个事件发生时,对该事件作出响应的程序段,它是VB应用程序的主体通用过程是独立于事件过程之外,可供其他过程调用的程序段过程调用示例把相同的任务编成相对独立的“子过程”当事件过程需要执行这个任务时,可使用调用语句(如Call)实行调用。子过程执行完后,会返回事
2、件过程中调用语句Call的后续语句继续执行通用过程又分为Sub(子程序)过程和Function(函数)过程调用过程……CallSubA……CallSubA……CallSubB……子过程SubA子过程SubB7.1通用过程例7.1使用Sub过程的示例1PrivateSubForm_Load()ShowCallmysub1(30)Callmysub2Callmysub2Callmysub2Callmysub1(30)EndSub程序运行结果PrivateSubmysub1(n)PrintString(n,"*")EndSubPrivateSubmysub2()Prin
3、t"*";Tab(30);"*"EndSub7.1.1Sub过程Form_Load()事件过程Callmysub1(30)Callmysub2Callmysub2Callmysub2Callmysub2Callmysub1(30)Mysub1过程Mysub2过程调用过程在上述事件过程Form_Load()中,通过Call来分别调用两个Sub过程在Sub过程mysub1(n)中,n为参数(也称形参),当调用过程(即Form_Load())通过Callmysub1(30)(30称为实参)调用时,就把30传给n,这样调用后就输出30个“*”号过程mysub2()不带参数,其
4、功能是输出左右两边的“*”号定义格式:[Private|Public|Static]Sub过程名([参数表])语句块[ExitSub]EndSub说明:·局部(Private)过程、全局(公用,Public)过程和静态(Static)过程·参数表定义格式:[ByVal
5、ByRef]变量名[()][As数据类型]…ByVal表示该参数按值传递,ByRef表示该参数按地址传递·通过参数表传送参数Sub过程可以获取调用过程传送的参数,也能通过参数表的参数,把计算结果传回给调用过程1.Sub过程的定义Sub过程可以保存在两种模块中:窗体模块(.frm)和标准模块(.b
6、as)可以在代码窗口中直接键入来创建Sub过程选择“工具”菜单中的“添加过程”命令2.Sub过程的建立事件过程是通过事件驱动和由系统自动调用的,而Sub过程则必须通过调用语句实行调用调用Sub过程有以下两种方法:(1)使用Call语句。格式:Call过程名([实参表])(2)直接使用过程名,格式:过程名[实参表]例如,调用名为SubCal的过程:CallSubCal(10)SubCal103.Sub过程的调用PrivateSubForm_Load()ShowPrint"VB的基本特点是:"CallSub_ContPrint"面向对象的可视化编程"CallSub
7、_ContPrint"事件驱动的编程机制"CallSub_ContPrint"结构化的设计语言"EndSub在事件过程Form_Load()中,有三处调用Sub过程Sub_Cont()PrivateSubSub_Cont()DimrespAsStringDoWhileTrueresp=InputBox("是否继续(y/n)?")IfUCase(resp)="N"ThenEndIfUCase(resp)="Y"ThenExitDoLoopEndSub例7.2使用Sub过程示例2因为计算5!和10!都要用到阶乘n!(n!=1×2×3×…×n)所以把计算n!编成Sub过程采
8、用Print直接在窗体上输出结果,程序代码:PrivateSubForm_Load()ShowDimyAsLong,sAsLongCallJc(5,y)s=yCallJc(10,y)s=s+yPrint"5!+10!=";sEndSub程序运行结果:5!+10!=3628920PrivateSubJc(nAsInteger,tAsLong)DimiAsIntegert=1Fori=1Tont=t*iNextiEndSub注意参数n及t的调用情况例7.3计算5!+10!允许用户自定义函数过程(又称Function过程)1.定义Function过程可
此文档下载收益归作者所有