长安幻夜小说坑了吗:研究过 [乔客] 源程序的请进！

来源：百度文库编辑：高校问答时间：2024/05/07 12:44:25

function fix_num(f_num,f_type)
dim fnum:fnum=f_num
if not(isnumeric(fnum)) then fix_num=0:exit function
select case f_type
case 0
fix_num=int(fnum)
case 1
if instr(fnum,".")=0 then
fix_num=fnum
else
fix_num=int(fnum)+1
end if
case 2
if instr(fnum,".")=0 then
fix_num=fnum
else
if cint(mid(fnum,instr(fnum,".")+1,1))>=5 then
fix_num=int(fnum)+1
else
fix_num=int(fnum)
end if
end if
end select
end function
这个函数实现什么功能？另有对乔客感兴趣的请联系我qq147144799

研究过 [乔客] 源程序的请进！研究过《三国群英传V》的大虾们请进对数码相机有过研究的请进来！研究中文的请进我好困惑呀```````````结过婚的或是对结婚有研究的请进研究托福考试的请进！iBT的题目！对酒有研究的请进来对美容有研究的请进` 对星座有研究的请进对发型有研究的请进```