【烟花原创】VBA零基础之第8篇 第一个过程

在代码窗口中所录入的代码一般包含以下几个部分
      1.定义：变量和常量的定义，非可执行语句
      例如：
            dim strName as string
            const PI=3.1415926

2.过程：Sub、Property（这个是类模块里才有的）、Function都属性于过程
      所有可执行的代码必须包含在过程或函数内，一过程不能套在其它过程中。

3.注释：针对代码的说明备注，非可执行语句。
      注释语句在默认情况下是以浅绿色的字体显示。
      例如：
            '第一个代码，主要用于演示过程
            REM 2013-11-1 23:51分

下面大家就跟我来完成 第一个过程
      1.打开VBE
      2.在 工程资源管理器 窗口中 右键 插入 模块

3.双击刚刚插入的模块1，进入模块1的代码窗口
      4.录入以下代码

1. Sub HelloWord()

2. '---------------------------------------------------------------------------------------

3. ' Procedure : HelloWord

4. ' Author    : hwc2ycy

5. ' Date      : 2013/11/1

6. ' Purpose   :

7. '---------------------------------------------------------------------------------------

8. '

9. Dim str As String

10. '定义一个字符串变量，变量名为str

11. str = "HelloWord!"

12. '给变量str赋值 HelloWord!

13. Range("a1").Value = str

14. '给当前活动工作表的A1单元格赋值 HelloWord!

15. ActiveSheet.Name = str

16. '给当前活动工作表改名，新的工作表名为HelloWord!

17. MsgBox prompt:=str, Title:="第一个过程"

18. '显示一个对话框,对话框的标题为第一个过程，提示信息为HelloWord!

19. End Sub

复制代码

5.执行代码
      方法1：光标定位在HelloWord过程内，按F5执行代码
      方法2： 直接F5，在对话框中选择HelloWord，执行
      方法3：工具栏 运行 图标（绿色倒三角形）

执行完后，回到工作表中看当前活动工作表的表名，A1单元格，对话框。

1.jpg (56.48 KB, 下载次数: 107)

下载附件

2013-11-2 00:13 上传

运行HelloWord过程后，代码实现上图效果后，大家可以试着改变下工作表名，换个单元格写入数据 。
     ：-），本来是要命名为HelloWorld的，就将错就错吧。