pb判定是否64位操作系统

FunctionBooleanIswin64bits()LIBRARY"winis64bits.dll"ALIASFOR"Iswin64bits"ifIswin64bits()thenmessagebox('提示','64位操作系统')elsemessagebox('提示','32位操作系统')endif