浅谈vb 6.0中变量、过程的定义、调用及作用域

《浅谈vb 6.0中变量、过程的定义、调用及作用域》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、浅谈VB6.0中变量、过程的定义、调用及作用域　　(呼伦贝尔学院信息科学分院，内蒙古海拉尔021008) 　　摘要：在VB6.0这种面向对象的可视化程序设计中，深刻的理解和掌握变量的声明及作用域和过程的定义、调用及作用域极为重要，本文结合实例分别来介绍。 　　关键词：VB6.0；变量；过程；作用域；调用 　　中图分类号：TP312文献标识码：A文章编号：1007—6921(XX)07—0088—02 1变量的声明及作用域 1.1变量的声明 　　变量是程序执行过程中，其值可以改变的量用来存放程序中所需的数据。它的命名规则是以字母或汉字开头，后可跟汉字、字母、数字或下划

2、线组成，长度小于等于255个字符；不能用VB中的关键字；不区分大小写。变量的声明分为显式声明和隐式声明(变量声明也称变量定义)。 　　显式声明格式：Public

3、Private

4、Dim

5、Static变量名［AS类型］或Public

6、Private

7、Dim

8、Static变量名类型符。 　　注：由关键字Static声明的变量为静态变量，其他方式声明的为动态变量。静态变量的值在整个程序的运行中可以一直保留，而动态变量每次调用过程时都会重新初始化。 　　隐式声明变量：未进行上述的声明而直接使用，其类型为Variant类型，赋值后由值的类型决定变量的类型。建议不使用。 　　注意：

9、由于VB允许隐式变量的使用，如果同一变量拼写出错，在隐式声明中无法查出，初学者可以在通用声明处加OptionExplic语句可强制显式声明变量，要求所有变量必须先声明后使用。 1.2变量的作用域 　　变量的作用域是指变量的有效作用范围，即变量可以被访问的范围。 VB中变量的作用域分为： 　　局部变量：在过程内用声明的变量，只能在本过程中使用。 　　窗体/模块级变量：在“通用声明”段中用Dim语句或用Private语句声明的变量,可被本窗体/模块的任何过程访问。 　　全局变量：在“通用声明”段中用Public语句声明的变量，可被本应用程序的任何过程或函数访问。 变量作用

10、域对照表如表1。 2过程的定义、调用和作用域 　　VB应用程序是由过程组成的，除了系统中提供的内部函数过程和事件过程外，在应用程序的编写中，有时问题比较复杂，按照结构化程序设计的原则，可以把问题逐步细化，分成若干个功能模块，通过VB提供的自定义过程将功能模块定义成一个个过程，供事件过程多次调用。使用过程的好处是程序简练、便于调试和维护。在VB6.0中，自定义过程可分为以下几种：以Function保留字开始的为函数过程；以Sub保留字开始的为子过程；以Property保留字开始的为属性过程；以Event保留字开始的为事件过程。 　　下面主要介绍函数过程和子过程的定义、调用及

11、作用域。 　　740)this.width=740"border=undefined> 2.1过程的定义 2.1.1函数过程的定义 　　①利用“工具”菜单下的“添加过程”命令——选择函数，定义生成一个函数过程的框架。②利用代码窗口直接定义，一般格式： 　　Function函数过程名(［参数列表］)［As类型］ 局部变量或常数定义 函数过程名=返回值 ExitFunction］ 语句块 EndFunction 　　函数过程名：命名规则同变量名；参数列表形式:［ByVal］变量名［()］［As类型］称为形参，仅表示参数的个数、类型，无值；函数名=返回值在函数体内至

12、少对函数名赋值一次；［ExitFunction］：表示退出函数过程。 2.1.2子过程的定义 　　①利用“工具”菜单下的“添加过程”命令——选择子程序，定义生成一个子过程的框架。②利用代码窗口直接定义，一般格式： Sub子过程名［(参数列表)］ 局部变量或常数定义 ［ExitSub］ 语句 EndSub 　　2.1.3举例：进制转换,把二至十六任意进制的字符串转换成十进制整数 ①用函数过程定义。 　　PrivateFunctionconvert(ByValsAsString,ByValrAsInteger)AsLong's表示任意进制的字符串，r表示进制 　

13、　Dimn%,i%,cAsString*1,p n=Len(s):p=0 Fori=1Ton c=UCase(Mid(s,i,1)) SelectCasec Case“0”To“9” p=p*r+Val(c) Case“A”To“Z” p=p*r+Asc(c)-55 EndSelect Nexti 　　convert=p'函数过程名中存放转换后的十进制整数 EndFunction ②用子过程定义。 　　PrivateSubconvert(ByValsAsStrin