数据库技术与应用-PPT演示文稿.ppt

  1. 1、本文档共462页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
9.6.1 子过程 子过程(Sub过程) 是一段代码块,能完成一系列操作并实现一定的功能,可以被其他过程多次调用。 过程的创建 [Public|Private] [Static] Sub <过程名>( [<参数列表>] ) <语句块> End Sub 过程的调用 就是使用已定义的过程来完成其功能 [Call] <子过程名> [<参数列表>] * 9.6.1 子过程 参数的传递 (1)按值传递 定义中用“ByVal”关键字 形参和实参有各自不同的存储单元,实参将值赋给形参后两者不再有任何关系 形参值的改变不影响实参。 (2)按地址传递 定义中用“ByRef”关键字; 形参得到的是实参的地址,两者共享同一存储单元; 形参的值发生改变时,实参的值也相应发生改变。 jc(ByVal x As Integer, ByVal y As Integer) a,b为实参 jc a,b x,y为形式参数,简称形参 jc(x As Integer, y As Integer) a,b为实参 jc a,b a 1000 2 3 b 1004 x 1000 1004 y * 9.6.1 子过程 【例9.18】计算5! + 10! * 9.6.2 函数过程(Function过程) 函数的定义 函数是一种特殊的过程,也是一个独立的过程。Function过程可以求得一个返回值,即函数值,而Sub过程主要是为了完成某些操作,没有返回值的概念。 [Public|Private] [Static] Function <函数名>( [<参数列表>] ) [AS <数据类型>] <语句块> <函数名>=<返回值> End Function 默认为:Public 函数过程的调用 <函数名> ( [<参数列表>] ) 例如:(几种函数调用方式) 序号 例子 说明 1 X=Fac(3) 赋值 2 Print Fac(5) 打印调用 3 Y= Sqr(2*Fac(6)-1) 函数嵌套 4 Call Fac(3) 使用CALL调用 * 9.6.2 函数过程 【例9.19】判断输入的字符是不是英文字母 。 注意: InputBox函数返回值类型是字符串类型,所以如果使用InputBox函数输入数值类型数据(整数或小数),则要将返回值转换为数值,如: x = InputBox("请输入一个数") 其中,假设x为数值类型变量;另外,若省略标题参数,系统会自动将工程名作为“输入框”对话框的标题。 * 9.6.3 变量的作用域和生存期 变量的作用域 是指变量的有效范围,根据作用域有: 局部变量 动态局部变量(用Dim 定义) 静态局部变量(用Static定义) 模块级变量 在VB.NET中,窗体类(Form)、类(Class)、标准模块(Module)都称为模块。 全局变量 Public关键字定义的变量 【例9.20】静态局部变量示例 * 9.4.1 选择结构——双分支举例 【例9.2】假设有x、y、z三个变量,x、y均已有值,现要将x、y中较大的值赋给z。 方法2: If y>x Then z=y Else z=x End If 方法1: z=x If y>x Then z=y End If 方法3: If y>x Then z=y Else z=x * 9.4.1 选择结构——多分支举例 【例9.3】将输入的一个百分制成绩转换为等级制成绩输出。等级的划分为:不小于90分为优,89-60为合格,小于60为不及格。 “转换”按钮的代码如下: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox1.Text >= 90 Then TextBox2.Text = "优秀" Else If TextBox1.Text >= 60 Then TextBox2.Text = "合格" Else TextBox2.Text = "不合格" End If End If End Sub * 9.4.1 选择结构 Select Case语句(多分支结构) 在需要完成多重判定的任务时使用 Select Case <变量或表达式> Case <表达式列表1> <语句段1> Case <表达式列

文档评论(0)

马家沟里的鱼 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档