Visual Basic for Applications

日期常量由符号“#”将字符括起来，如#2012-1-1#。

系统定义常量有3个：True、False和Null。

固有常量是编程时引用的对象库定义的常量。所有固有常量都可以在宏或VBA代码中使用。通常，固有常量通过前两个字母来指明定义该常量。来自VB库的常量则以“vb”开头。来自Access的常量以“ac”开头。可以使用对象浏览器来查看所有对象库中的固有常量列表。

可以自行定义常量。如：

Global Const 符号常量名称 = 常量值

例如：

Private Declare Function getFrequency Lib "kernel32" _ Alias "QueryPerformanceFrequency" (cyFrequency As Currency) As Long
Private Declare Function getTickCount Lib "kernel32" _ Alias "QueryPerformanceCounter" (cyTickCount As Currency) As Long

Sub 過程名(參數表)
    語句塊
    Exit Sub
    語句塊
End Sub

Function 函數名(參數表) As Type
   語句塊
   函數名=表達式
   Exit Function
End Function

可以是Private、Public、Friend、Static等修飾。

调用函数/过程时，可以加括号或者不加括号。如果调用表达式作为一行的一部分，那么必须用参数，例如函数调用的返回值赋给变量。 调用过程时， 可以使用/不使用call关键字。使用call语句调用过程，如果无参数，则不加括号；如果有参数，必须加括号。如果调用时用括号包住单个参数，则该参数强行按值传递。需要特别注意，不用call不加括号的调用，形参与实参是传值(passed by value)而不是传引用(passed by reference)，这会导致一些对象的方法调用失败。例如：

    Dim cn As ADODB.Connection
    Set cn = CurrentProject.Connection
    Dim rs As New ADODB.Recordset    
    rs.Open "SELECT * FROM myTable" , cn

    Dim ExcelApp As New Excel.Application
    Dim ExcelWst As Worksheet
    Set ExcelWst = ExcelApp.Workbooks.Add.Worksheets(1)

    ExcelWst.Range("A2").CopyFromRecordset(rs) '失败，无法执行该行
    ExcelWst.Range("A2").CopyFromRecordset rs  '可成功执行该行

VBA的常用内置函数列表参见：

• MsgBox
• InputBox
• 舍入函数：Fix 向0取整,Int向下取整, Round四舍五入
• Rnd 返回0-1内的单精度随机数
• 字符串函数：
  • Filter：对字符串的一维数组的过滤
  • InStr([Start, ]<Str1>,<Str2>[, Compare])与InStrRev： 查找子串
  • Len 字符串长度
  • Join：连接一维数组中的所有子字符串
  • Left,Right,Mid 截取子字符串
  • Space(数值) 生成空格字符串
  • Ucase,Lcase 大小写转换函数
  • Ltrim, Rtrim,Trim 删除首尾空格
  • Replace
  • Split：分割一个字符串成为一维数组
  • StrComp：字符串比较
  • StrConv：字符串转换
  • String(number, character)：制定字符重复若干次
  • StrReverse
• 日期/时间有关函数：
  • Year, Month, Day, WeekDay,Hour,Minute,Second 截取日期时间分量
  • DateAdd 日期/时间增量函数
  • DateDiff(<间隔类型>,<日期1>,<日期2>[,W1][,W2])日期/时间的距离函数
  • DatePart(<分割类型>,<日期>[,w1][,w2])时间分割函数
  • DateSerial(<表达式1>,<表达式2>,<表达式3>) 合成日期；DateValue(“字符串表达式”)返回日期；
  • Date,Time,Now,Timer 返回日期时间
  • DateValue
  • TimeSerial：由时间序列得到时间对象
  • TimeValue：由时间字符串得到时间对象
  • Weekday：获得日期的周几
  • WeekdayName
• 转换函数：CBool、CByte、CCur、 CDate、 CDbl、CDec、CInt、 CLng、CLngLng、CLngPtr、CSng、CStr、CVar、CVErr、Asc(<字符串表达式>)返回第一个字符的Ascii编码值、Chr(ASCII码)返回字符、Hex、Oct、Str(<数值表达式>)返回字符串、Val(string)、Format、FormatCurrency、FormatDateTime、FormatNumber、FormatPercent、MonthName
• Nz(表达式或字段属性值[,规定值])如果是空，则返回0或者""或者函数的第二个参数值
• 验证函数：isNumeric、isDate、isNull、isEmpty IsArray、IsError、IsMissing、IsObject
• 数学函数：Abs、Sqr、Tan、Atn（即atan）、Sin、Cos、Exp（e为基的指数）、Log自然对数
• Array:构造一个Array对象
• CallByName: get or set a property, or invoke a method at run time using a string name.
• 控制流：Choose:类似于C语言的select语句、IIf相当于IF-ELSE语句、Switch
• Command：获取命令行参数
• CreateObject：创建ActiveX对象
• CurDir：返回指定驱动器的当前工作路径
• 由基本数学函数导出的函数：Sec、Cosec、Cotangent、Cotan、Arcsin、Arccos、Arcsec、Arccosec、Arccotan、HSin、HCos、HTan、HSec、HCosec、HCotan、HArcsin、HArccos、HArctan、HArcsec、HArccosec、HArccotan、LogN
• DoEvents：暂时把CPU控制权交回给系统。
• Environ：返回环境变量的值
• 文件操作：
  • Dir：返回满足条件的所有文件、目录的名字
  • EOF
  • FileAttr
  • FileDateTime
  • FileLen
  • FreeFile Function
  • GetAttr：返回文件、目录的属性值
  • Input：读取文件
  • Loc：文件指针位置
  • LOF：文件打开时的指针位置
  • Seek：文件指针定位
  • Spc：使用Print做position output
  • Tab：用于Print函数
• Error:错误号对应的错误消息
• Windows Registry中的数据：GetAllSettings、SaveSetting、DeleteSetting、GetSetting
• GetObject：ActiveX组建的引用
• IMEStatus：返回当前Input Method Editor (IME)。
• Macintosh平台：MacID、MacScript
• 金融函数：
  • DDB：使用double-declining balance计算贬值
  • FV:计算固定利率的年金
  • IPmt：计算利率
  • IRR：计算利率
  • MIRR：计算利率
  • NPer：计算周期数
  • NPV：计算net present value
  • Pmt：计算支付数
  • PPmt：计算本金支付数
  • PV：计算present value
  • Rate：利息率
  • SLN：straight-line depreciation
  • SYD：计算sum-of-years' digits depreciation
• Partition：返回字符串，表示一个数值名字落在各个range内。常用于SQL select语句
• QBColor：颜色值
• RGB：颜色值
• TypeName：得到变量的类型名
• VarType：得到变量的类型数

比较特殊的运算符有指数运算^，浮点除法/，整数除法\，取模运算Mod，不等逻辑比较运算<>

維基教科書中的相關電子：Visual Basic for Applications

• 官方網站：
  • Docs - Office Dev Center
  • 文档 - Office 开发人员中心