在VBA中，如何把一大段程序注释掉

步骤一、首先打开一个EXCEL程序。

步骤二、然后打开VBA编程的界面。

步骤三、定义一个函数。

步骤四、然后使用“rem+空格+注释内容”。

步骤五、用英文字码罩符的上单引号“注释内容”。

步骤六、然悉森后“rem+空格+注释内容”。

步骤七、最后睁模亩对于幅值对象进行的赋值。

函数名: atoi

功 能: 把字符串转换成整型数

用 法: int atoi(const char * str) //函数签名

程序:

/***

*int atoi(char *str) - Convert string to int //将一个字符串转为一个整数

*

*Purpose: //意义

* Converts ASCII string pointed to by str to binary. //将由str所指向的ASCII型字符串转为二进制

*

*Entry: //输入

* str = ptr to string to convert //str，指向字符串的指针

*

*Exit: //输出

* return int value of the string //返还字符串所代表的整数晌凳值

*

*Exceptions: //异常

* None - overflow is not detected. //无。无法检测旦亩溢出

*

**************************************************************************/

#include <stdio.h>

#include <stdlib.h>

#include <assert.h>

int atoi(const char * str)

{

assert(str) //如果并未输入任何字符串或一个无效字符串则退出运行

int total = 0 //要输出的结果

int sign = 1 //数字的符号

if(*str == '-'){ //如果第一个字负号

sign = -1 //输出为负数

str ++ //移至下一个字模谨森符

}

else if(*str == '+'){ //如果第一个字符是正号

str++ //无改动，移至下一个字符

}

while(*str){ //当字符串还为结尾

unsigned int ch = *str - '0' //当下字符所代表的数字

assert(ch <= 9 &&ch >= 0) //如果该数字不再0至9的范围内退出运行

total = total * 10 + ch //原数字增加一位

str ++ //移动指针到下一个字符

}

return ret * sign} //返还所得到的整数，加入符号

最后一行是不是错了？ret根本没有定义，应该是total * sign才对。

Visual Basic 2003以上版本锋坦有两种注猜卖释方法:

第一种是用 \\' 符号进行注释，楼上已解析得很清楚。

第二种是用#region “” 和 #end region注释，这是一对括号型的注释方法，用方法1只穗基逗能在一行里注释，用#region 则可把整段程序用这个注释括起来。

---