公共函数XtoF（STR作为货币，可选fenm整数= 32）为字符串只限于分分数。
昏暗的CFM为货币
昏暗的cfmmod为整数
错误erroreof

CFM = 1 / FENM
= xtof
如果str = 0然后xtof = ：退出功能

模糊点为整数
弦弱力
昏暗的观点作为货币
昏暗的探讨，fint1 fint2，为整数
如果STR＞0，那么
如果是1
点=仪器（1，STR，，
如果点0
xtof = str：
退出功能
其他的
力=中（STR，1，点- 1）
各自的观点=（0 中（STR，点+ 1））
探讨=仪器（1，XtoF（的观点）， /
fint1 = Cint（MID（XtoF（的观点），1到1）））
fint2 = Cint（MID（XtoF（的观点），探讨+ 1）））

xtof = CSTR（力* fint2 + fint1）或CSTR（fint2）

最后如果
其他的
如果fenm MOD Cint（个/立方英尺）= 0
xtof = 1 / + CSTR（fenm / Cint（个/立方英尺））
其他的
cfmmod = maxgys（fenm，CInt（个/立方英尺））
xtof = CSTR（CINT（个/立方英尺/ cfmmod））+/+ CSTR（CINT（fenm / cfmmod））
最后如果
最后如果
其他的
xtof =0
最后如果
退出功能
Erroreof：
= xtof
端功能
函数的Maxgys（num1为整数，num2为整数）整数
昏暗的minnum，i为整数
minnum = num1
如果num1 num2然后minnum > = num2
我minnum = 1
如果（（num1 MOD我）= 0）和（（num2 MOD我）= 0）然后Maxgys =我

下一个我
端功能