www成人免费视频_91视频合集_久久久999久久久_91字幕网_91漂亮少妇露脸在线播放_77久久

VIP标识 上网做生意,首选VIP会员| 设为首页| 加入桌面| | 手机版| RSS订阅
食品伙伴网服务号
 

第四课理解变量和变量的作用(1)

放大字体  缩小字体 发布日期:2006-06-16
4.1 代码存在的位置:模块

  VBA代码必须存放在某个位置,这个地方就是模块。有两种基本类型的模块:标准模块和类模块。模块中的每个过程或者是函数过程,或者是子程序概念.本课的最后部分将讨论函数过程和子程序的区别。

  新术语:
  模块:它是作为一个单元保存在一起的VBA定义和过程的集合。
  类模块:VBA允许你创建自己的对象,对象的定义包含在类模块中。

  你的大部分工作集中在标准模块中(简称为模块)当录制宏时如果不存在模块,EXCEL自动创建一个。EXCEL和VBA不关心代码存放在哪一个模块中,只要代码存在于打开的工作簿中即可。

  4.2 对模块的概览

  过程被定义为VBA代码的一个单元,过程中包括一系列用于执行某个任务或是进行某种计算的语句。工作簿的每个过程都有唯一的名字加以区分。

  有两种不同的过程:子程序和函数过程。子程序只执行一个或多个操作,而不返回数值。当录制完宏查看代码时,所看到的就是子程序。宏只能录制子程序,而不能录制函数过程。一个子程序的例子如清单4-1所示。

程序清单4-1 子程序的例子

Sub cmdSmallFont_Click()
With Selection.Font
.Name="Arial"
.FontStyle="Regular"
.Size=16
End With
End sub

  上面列出的过程实际上是一个事件过程。通过它的名字,就可以知道这是一个事件过程。这个过程的名字是由一个对象的名字CmdSmallFont和一个事件的名字Click组成的,两者之间用下划线分开。如果还不明白,可以告诉你,CmdSmallFont是一个命令按钮的名字。也就是说,当单击这个命令按钮时,就会运行这个事件过程。

  函数过程通常情况下称为函数,要返回一个数值。这个数值通常是计算的结果或是测试的结果,例如False 或True.正如前面所说,可以用VBA创建自定义函数。实际上可以在工作表上使用你创建的函数。程序清单4-2是一个计算价格的10%为运费的简单例子。

程序清单4-2 简单的用户定义函数示例。

Public Function Shipping(Price)
Shipping = Price * 0.1
End Function

  请注意,这个函数使用一个参数(Price).子程序和函数都可以使用参数。不论Price的值是多少,它都将决定运费额。Price可以是数字和单元格引用。函数返回计算出来的运费,这个函数可以用在单元格中。

A B 
1 Price 100
2 Shipping =shipping(B1)


  4.2.1 创建过程

  创建第一个过程需要两个基本步骤。首先,需要向工作簿中添加一个模块。接着需要向模块中添加一个工程。对于创建的每一个应用程序,只需添加一次模块。可以使用多个模块,但这是不必要的。某些开发者喜欢使用多个模块,以便根据他们的目的或者窗体对过程进行组织。在本练习中,创建的过程只显示一个消息框。

  在本练习中创建的过程只显示一个消息框。在本练习中使用Msgbox是为了提供一个可见的例子,虽然我们还没有介绍过Msgbox语句,但是在本例中将使用它。要创建该过程,请按如下步骤进行:

  1)打开一个新工作簿。
  2)选择"工具"-"宏"-"Visual Basic编辑器",打开VBA编辑器窗口。
  3)在`VBA编辑器的左面,可以看到“工程资源管理器”窗口。在工程资源管理器窗口的“Thisworkbook"上单击鼠标右键,选择“插入”-“模块”,这样就将一个模块添加到应用程序中了。(如果你没有看见“工程资源管理器”窗口,可以按Ctrl+R)
  4)选择“插入”“过程”,显示“添加过程”对话框。
  5)输入“第一个工程”作为过程名字。在“类型”分组框中,确认选择了“子程序”。单击“确定”按钮。这样一个新的过程就添加到模块中了。可以在模块中看到以 Public Sub 第一个过程()开始,以End Sub结束的语句结构。
  6)在过程中插入光标,输入以下语句并回车:
Msgbox "这是我的第一个过程"
在输入Msgbox后,会自动弹出一个消息框告诉你有关这条命令的信息,称之为自动列表技术。输入完成的过程如下所示:
Public Sub 第一个过程()
Msgbox "这是我的第一个过程"
End Sub

  VBA对子程序和函数有如下的命名规则:
  * 名字中可以包含字母数字和下划线。
  * 名字中不能包含空格句号惊叹号,也不能包含字符@ & $ #.
  * 名字最多可以包含255个字符。
 
  4.2.2 运行宏

  创建这个过程后,可以运行一下。运行一个过程有几种方法:可以直接使用“运行”菜单,“运行子程序/用户窗体”工具栏按钮或按下F5键。要运行一个过程,可以按照如下步骤:

  1)单击“运行子程序/用户窗体”工具栏按钮,过程执行并显示一个消息框。
  2)单击消息框之中的“确定”按钮,关闭该消息框。

  4.3 保存对模块所做的改变

  要保存新过程,需要保存过程所驻留的工作簿.可以用VBA编辑器保存工作簿.具体步骤如下:

  1)选择"文件"-"保存工作簿".因为本工作簿还没有保存过,所以要给它命名.
  2)输入"HOUR4"作为文件名并按回车键,则工作簿和模块与过程都保存下来了.

 
[ 网刊订阅 ]  [ 食品专题搜索 ]  [ ]  [ 告诉好友 ]  [ 打印本文 ]  [ 关闭窗口 ] [ 返回顶部 ]

 

 
推荐图文
推荐食品专题
点击排行
 
 
Processed in 0.472 second(s), 745 queries, Memory 2.55 M
主站蜘蛛池模板: 亚洲日韩av无码中文字幕美国 | 亚洲日本va中文字幕 | 久久免费99精品久久久久久 | 欧美成人亚洲欧美成人 | 免费观看成年人视频 | 成人午夜在线播放 | 日韩在线视频免费 | 美女视频大全网站免费 | 久久99热成人精品国产 | 国产小视频在线看 | 韩国三级大全久久网站 | 四虎在线最新永久免费 | 哪里可以免费看毛片 | 国产区第一页 | 午夜精品成人毛片 | 老少交欧美另类 | 亚州在线播放 | 亚洲av色香蕉一区二区三区 | 国产欧美日韩精品高清二区综合区 | 国产精品乱码人妻一区二区三区 | 狠狠躁天天躁中文字幕无码 | 亚洲国产精品久久久久秋霞影院 | 亚洲精品一区久久久久久 | 国产免费一级高清淫日本片 | 真人性生交免费视频 | 色婷婷婷丁香亚洲综合不卡 | 欧美乱人伦中文字幕在线不卡 | 无码人妻精品中文字幕免费东京热 | 啪啪免费网站入口链接 | 亚洲一区二区三区av无码 | 亚洲 欧美 日韩 小说 另类 | 四虎永久在线精品免费av | 极品魔鬼身材女神啪啪精品 | 国产午夜福利不卡在线观看 | 熟妇无码乱子成人精品 | 国产精品高清一区二区三区不卡 | 亚洲欧美精品网站在线观看 | 国产亚洲精品日韩综合网 | 中国老太卖婬hd播放 | 国产成人一区二区三区视频免费 | 精品久久久久久中文字幕一区 |