OutPutValueByUnit
简述
单位转换。
OutPutValueByUnit(Data:Real,DataType_:String,DataUnit:Real) :Real
Date：实型，需转换的数据
DataType_：字符串，数据类型
DataUnit：实型，指定单位
返回：实数，转换单位后的数据
算法：
(1)若DataType_="Real"，则v= Data/ DataUnit；
(2)若DataType_<>"Real"，则v=Data；
(3)返回v。
范例：
//返回1234.5以10为单位转换后的结果
Return OutPutValueByUnit(1234.5,'Real',10);
//结果：123.45