您好,欢迎访问三七文档
当前位置:首页 > 商业/管理/HR > 公司方案 > 第4讲过程菜单对话框
二级辅导过程二级辅导过程的应用:(1)使同样的操作不重复编写,一次写,多次用.(2)把一项复杂的工作分成多个简单的功能模块,分而治之。过程:完成一个独立功能,可供其他过程使用(调用)。二级辅导调用过程:负责调用其他过程调用过程:调用Sprg1调用Sprg1调用Sprg2子过程:Sprg1子过程:Sprg2二级辅导常用过程分类:Sub过程Function过程事件过程自定义子过程内部函数(标准函数)自定义函数过程1)过程是一段程序代码,是相对独立的逻辑模块。2)一个完整的VB应用程序由若干过程和模块组成。二级辅导两者区别:Sub子过程:完成一定的操作和功能,无返回值。Function函数过程:完成一定的操作和功能,并且可返回数据处理的结果。二级辅导函数过程的定义和调用例:计算圆的面积。公式如下:area=pi*R*R两个变量:area--圆面积R--半径符号常量:pi--圆周率二级辅导例子定义函数过程areaFunctionarea(R!)AsSinglearea=3.14*R*REndFunctionSubcommand1_click()S=area(5)msgbox(“面积=“&S)EndSub调用函数过程二级辅导6.1.2函数过程的定义定义函数过程的形式如下:[Public|Private]Function函数过程名(形参)[As类型]变量声明语句块Return表达式‘或函数名=表达式EndFunctionPublic全局函数过程,可被程序任何模块调用。Private仅供本模块中的过程调用。形参(或称哑元)只能是变量或数组名(),仅表示参数的个数、类型,没有数值。二级辅导函数过程的调用调用形式:函数过程名([参数列表])参数列表(称为实参或实元):必须与形参个数相同,位置与类型一一对应。可以是同类型的常量、变量、表达式。如:Rgb(255,255,0)二级辅导Subcommand1_click()DimR!R=inputbox(“请输入半径:”)S=area(R)msgbox(“面积=”&S)EndSub程序运行流程Functionarea(R!)AsSinglearea=3.14*R*REndFunction二级辅导子过程的定义子过程定义的方法同函数过程,形式如下:Sub子过程名[(参数列表)]局部变量定义语句EndSub子过程名、形参同函数过程中对应项的规定,当无形参时不要括号。二级辅导子过程与函数过程的区别:一般若程序有一个返回值时,函数过程直观;当有多个返回值时,习惯用子过程。函数过程必须有返回值,函数名有类型。子过程没有值,过程名没有类型,不能对子过程名赋值。二级辅导参数说明:形参没有具体的值,只代表了参数的个数、位置、类型;只能是简单变量、数组名,不能是常量、数组元素、表达式。形参是过程与主调程序交互的接口,从主调程序获得初值,或将计算结果返回给主调程序。二级辅导子过程的调用有两种形式:①Call子过程名[(实参列表)]②子过程名([实参列表])用Call关键字时,若有实参,则实参必须用圆括号括起,无实参圆括号省略。注意:若实参要获得子过程的返回值,则实参只能是变量。子过程调用二级辅导参数传递二级辅导一般是按位置传送,按实参的位置次序与形参的位置次序对应传送,与参数名没有关系。在调用标准函数时,只要知道形参的个数、类型、位置就可以。例如rgb函数形式:rgb(红色值%,绿色值%,蓝色值%)调用语句:label1.forecolor=rgb(255,0,0)则label1中的文字颜色变成红色。二级辅导传址与传值数据传递:有传址(ByRef)和传值(ByVal)两种方法。传址方式--将实参的地址传递给形参。因此在被调过程体中对形参的任何操作都变成了对相应实参的操作,实参的值就会改变。传值方式--系统将实参的值复制给形参,实参与形参断开了联系。在过程体内对形参的任何操作不会影响到实参。实参的值不会改变。二级辅导a的地址101010aaxx形参实参ByVal传值传地址形参获得实参的值形参获得实参的地址二级辅导传址与传值选用传值还是传地址如何选择:要将被调过程中的结果返回给主调程序,则形参必须是传址方式。这时实参必须是同类型的变量名。不希望过程修改实参的值,则应选用传值方式,减少各过程间的关联。因为在过程体内对形参的改变不会影响实参。形参是数组的都是地址传递。二级辅导形参是数组要以数组名加圆括号表示,不要给出维数上界;多维数组,每维以逗号分隔。在过程中通过Ubound函数确定每维的上界。实参是数组要给出数组名(不需要圆括号)。当数组作为参数传递时,系统将实参数组的起始地址传给过程,使形参数组也具有与实参数组相同的起始地址。数组参数的传递13579形参数组实参数组二级辅导菜单设计二级辅导菜单有下拉式菜单和弹出菜单(上下文菜单)。下拉式菜单的组成结构:快捷键热键子菜单标记主菜单菜单项子菜单名分隔线二级辅导菜单编辑器菜单列表框菜单项属性操作按钮分隔线:在标题栏输入一个连字符“-”标题热键:前面加&二级辅导菜单项有Name、Visible、Enabled等属性,还具有下列重要属性:(1)Text菜单项上显示的标题文本在字符前加一个&符号构成热键。例如,输入“新建(&N)”,则菜单显示“新建(N)”,N为热键。菜单项的分隔符,输入一个减号“-”。(2)ShortCut设置菜单项的快捷键。(3)Checked控制菜单项左边是否显示“√”菜单项的Click事件为菜单项编写程序二级辅导弹出菜单显示在窗体内的浮动菜单。显示位置取决于单击鼠标键时的位置。设计过程与普通菜单相同。菜单弹出的方法:[对象.]PopupMenu菜单名[,标志,x,y]标志——表示弹出的位置和触发的键SubText1_MouseDown(…)IfButton=2ThenPopupMenuMenuEndSub二级辅导通用对话框二级辅导VB提供了一组基于Windows的标准对话框。利用通用对话框控件可在窗体上创建打开文件、保存文件、颜色、字体、打印等对话框。添加通用对话框到工具箱:工程—部件—控件:microsoftcommondialogcontrol6.0二级辅导通用对话框的基本属性和方法(1)Action属性和Show方法打开对话框ShowHelp6帮助对话框ShowPrinter5打印机对话框ShowFont4字体对话框ShowColor3颜色对话框ShowSave2另存为对话框ShowOpen1打开文件对话框Show方法Action属性通用对话框的类型该属性只能在程序中赋值(2)DialogTiltle属性设置通用对话框标题二级辅导1.打开文件对话框由ShowOpen方法来实现重要属性:(1)FileName文件名称,包含路径(2)FileTitle文件名,不包含路径(3)Filter确定所显示文件的类型TextFiles|*.txt|所有文件|*.*显示文本文件、所有文件(4)FilterIndex文件列表中指定某类型文件(5)InitDir初始化路径二级辅导FilterFileNameInitDirFilterIndex二级辅导2.保存文件对话框由ShowSave方法来实现与打开文件对话框的属性基本相同,特有的属性是DefaultExt属性,用于设置缺省的扩展名。例7.11为例7.10中的另存为命令按钮编写代码,保存文本框内的信息。SubCommand2_Click()CommonDialog1.ShowSaveOpenCommonDialog1.filenameForOutputAs#1Print#1,Text1.Text'保存文件Close#1'关闭文件EndSub二级辅导3.颜色对话框由ShowColor方法打开颜色对话框重要属性Color,它返回或设置选定的颜色例7.12为例7.10中的颜色命令按钮编写事件过程,设置文本框的前景色。SubCommand3_Click()CommonDialog1.ShowColorText1.ForeColor=CommonDialog1.ColorEndSub设置文件框前景颜色二级辅导4.字体对话框由ShowFont方法来实现Font获取选择的字体Color选定的颜色二级辅导end
本文标题:第4讲过程菜单对话框
链接地址:https://www.777doc.com/doc-2110113 .html