HOME
ID : 112
#Define
功能
定义宏。
格式
#Define 宏名 编码
指定项目
- 宏名
- 指定宏名。为函数型宏时，用“（）”括起自变量。
- 编码
- 指定替换宏名的编码。
解说
用编码替换程序中的宏名。为函数型宏时，还将替换自变量。
宏名和编码之间必须留有1个以上的空格字符。
宏名是根据命名规则命名的。
宏名和括起编码的( )之间不得留有空格字符。
宏名必须在64个字符以内。
相关项目
注意事项
双引号“ ”内字符串中的文本不能替换。
不进行递归替换。
#Define AA 5
#Define BB(x) 100*x + sin(x)
PrintDbg BB(AA) '不完全编译。上述示例中的bb(aa)通过预处理工序生成100*aa + sin(aa)编码。并非100*5 + sin(5)。
#Define AA BB
#Define BB 100
PrintDbg AA '不完全编译。上述示例同样，PrintDbg AA生成PrintDbg BB编码。
应用示例
'!TITLE "定义宏"
' 显示宏名指定的字符串和计算结果
Sub Sample_Define
' 将"Desno Corporation"分配至称为NAME的宏
#Define NAME "Denso Corporation"
' 将mAREA(radius)作为宏定义
#Define mAREA( radius ) PI * Pow( radius, 2 )
Dim aaa As String
Dim bbb As Double
' 在aaa中代入"Denso Corporation"
aaa = NAME
' 在bbb中代入PI * （10的2次方）的计算结果
bbb = mAREA( 10 )
' 在讯息输出视窗中显示"Denso Corporation"
PrintDbg aaa
' 在讯息输出视窗中显示计算结果
PrintDbg bbb
End SubID : 112