一：基本知识
1，变量首字母大写，常量全部大写
2，switch（<表达式1>,条件为1时的值，【……】）
3，动态数组，Dim 数组名() As Integer ReDim [Preserve] 数组名(*to*,*to*) As Integer,Preserve关键字可以保证数组大小改变时，值还存在
4,使用ubound保证不会越界
5，Dim A As Variant（Dim A()） A = Array(10,20,30)
二：文件操作
1，open 文件名 For [output,input,append] As #文件号
2，output或append方式时，使用print #文件号,[输出列表]
3，output或append方式时，使用write #文件号,[输出列表]------这种方式，输出列表间自动用逗号隔开，字符串自动加双引号
4，output或append方式时，输出列表后面要加上分号，否则自动换行
5，output或append方式可以自动实现文件不存在则创建，很方便
6，使用output方式时，文件已经被清空，即使不写内容，当关闭文件的时候也是清空的
7，使用input方式时，Do While Not EOF(1) Line input #文件号,变量名 Loop
8，curdir(),dir(目录或者文件名，当目录时，使用第二参数vbDirectory<>""，vbcrlf，MKDIR
9，name path_name1 as path_name2 移动文件
10，返回当前工作薄的路径ThisWorkbook.Path
方法一，该方法可以用于excel2003，excel2007不可用
方法二，该方法可以用于excel2003和excel2007
copy