设置宏 @extended 的值.
SetExtended ( 代码 [, 返回值] )
SetExtended(10) MsgBox(4096, "" , "@extended 的值为:" & @extended)