2009.01.20问：vfp 如何去掉字符尾部连续0
clear
y=""
input "请输入带空格的字符串" to x
c=len(x)
for i=1 to c
if substr(x,i,1)space(1)
y=y+substr(x,i,1)
endif
endfor
?"去掉空格后的字符串是",y
return
计算机二级考试中VFP很可能会被取消,计算机这东西本身发展就挺快的,也该换了.
VFP在数据库管理方面作用是挺大的,其实用,方便,易学在一些学校管理,公司库存等多个方面应用还是很广泛的.
progan sstr
para n
ns=str(n,15,10)
for i=14 to 0 STEP -1
if right(ns,1)='0'
ns=LEFT(ns,i)
ELSE
exit
endif
endfor
return ns
调用STR()函数的地方改用调用SSTR()
N=SSTR(123.4500000)
round(N,n),N为数字，n 为要保留的小数位
乖宝宠物营收飙净利率未超6%去年主粮产能利用率7成
2018年至2021年,乖宝宠物实现营业收入分别为122,111.24万元、140,314.17万元、201,303.89万元、257,516.31万元,其中主营业务收入分别为121,852.29万元、140,009.01万元、200,461.69万元、256,007.73万元。 报告期内,公司归属于母公司所有者的净利润分别为4,452.20万元、416.02万元、11,148.41万元、14,027.41万元,扣除非...
WS 375.15—2016 疾病控制基本数据集 第15部分:托幼机构缺勤监测报告简 ...
——第20部分:脑卒中登记报告; ——第21部分:脑卒中病人管理; ——第22部分:宫颈癌筛查登记; ——第23部分:大肠癌筛查登记; 本部分为WS 375的第15部分。 本部分按照GB\/T 1.1—2009给出的规则起草。 本部分主要起草单位:上海市预防医学研究院、上海市疾病预防控制中心、上海市卫生和计划生育委员会。 本部分...
谁有08~09赛季英超联赛利物浦队德赛程表
08.09.16 Champions League Group Phase 欧冠小组赛 (a) 马赛 2:1 (杰拉德*2)08.09.20 Stoke City (h) 斯托克城 0:0 08.09.23 Carling Cup Rnd 3 联赛杯第三轮 (h) 克鲁 2:1 (阿格尔,卢卡斯)08.09.27 Everton (a) 埃弗顿 2:0 (托雷斯...
WS 375.14—2016 疾病控制基本数据集 第14部分:学校缺勤缺课监测报告简 ...
HDSB03.14.007 DE02.01.009.01 户籍地址一省(自治区、直辖市) 缺勤缺课人员户籍地址中的省、自治区或直辖市名称 S1 AN..70 HDSB03.14.008 DE02.01.009.02 户籍地址市(地区、州) 缺勤缺课人员户籍地址中的市、地区或州的名称 S1 AN..70 HDSB03.14.009 DE02.01.009.03 户籍地址县(区) 缺勤缺课人员户籍地址中...
公积金贷款
20 2011年9月 ￥183,847.11 ￥607.01 ￥11,759.91 ￥620.48 ￥12,789.90 ￥1,227.49 ￥24,549.80 21 2011年10月 ￥183,240.10 ￥609.05 ￥12,368.96 ￥618.44 ￥13,408.34 ￥1,227.49 ￥25,777.29 22 2011年11月 ￥182,631.05 ￥611.11 ￥12,980.07 ￥616.38 ￥14,024.72 ￥1,227.49 ￥27,004.78 23 ...
现金流量的内容包含哪些
五、现金及现金等价物净增加额 36 -138,743.58 -357,009.01 加:期初现金及现金等价物余额37 9,132,859.77 9,132,859.77 六、期末现金及现金等价物余额38 8,994,116.19 8,775,850.76 1.将净利润调节为经营活动的现金流量 39 净利润 40 284,593.79 -184,669.45 加:计提的资产减值准备 41 固定资产折旧 ...
现金流量的内容包含哪些
1、固定资产上的投资。包括固定资产的购入或建造成本、运输成本和安装成本等。2、流动资产上的投资。包括对材料、在产品、产成品和现金等流动资产上的投资。3、其他投资费用。指与长期投资有关的职工培训费、谈判费、注册费用等。4、原有固定资产的变价收入。这主要是指固定资产更新时原有固定资产的变卖...
璩眨立将： round(N,n),N为数字,n 为要保留的小数位
沂水县13373436737： vfp 求当1!+2!+3!+……+N!的和值不超过50000时的临界值及N的值 - ？
璩眨立将： CLEAR SET TALK OFF s=0 i=0 t=1 do while s<50000i=i+1t=t*is=s+t ENDDO ? i-1,s-t RETURN
沂水县13373436737： 1.vfp中,关系是一张表,一个数据库里有很多表.为什么所管理的关系不是若干个dbf文件? 2.一 - ？
璩眨立将： VFP的表之间的关联有永久关联和临时关联两种.永久关联由DBC文件保存和管理;临时关联由set relation to命令在程序执行时建立,程序运行完毕后关联自动解除.VFP可以管理很多个数据库,所以应该选D.
沂水县13373436737： vfp中,设计一个程序,功能是求出:1**2 - 2**2+3**2 - 4**2… - 100**2 - ？
璩眨立将： *你的1**2是指1的平方,2**2是2的平方否?*如果是,则程序如下:n = 0 for i = 1 to 100 if mod(i,2) = 0 n = n - i*i else n = n + i*i endif next*n即为你所要的值
沂水县13373436737： 怎么把Excel表中的日期格式19990120变成1999 - 01 - 20的格式呢 - ？
璩眨立将： 假设A1=19990120,在B1输入“=DATE(LEFT(A1,4),MID(A1,5,2),RIGHT(A1,2))”,不含引号.希望能帮到你.
沂水县13373436737： vfp问题.用 copy to 命令,将jy表中的dzh字段值的前两位为01且hsrq字段不为空的记录复制到jyb表中. - ？
璩眨立将： use jy copy to jyb for left(dzh,2)=＂01＂ and len(alltrim(hsrq))>0
沂水县13373436737： VFP表单设计里怎么设置日期 - ？
璩眨立将： 这个要用表达式才行:capation=alltrim(str(year(date())))+＂年＂+alltrim(str(month(date())))+＂月＂+alltrim(str(day(date())))+＂日＂
沂水县13373436737： VFP的2个小问题？
璩眨立将： sql语句中插入时间可以用 insert into 表(字段) values(to_data('2008-12-23','yyyy-mm-dd')) 这句话的意思就是将2008年12月23日! 第二个问题可以用代码控制,就是说你首先把编号为20-40的记录取出来,之后用程序把记录的某个字段加起来就可以了!
沂水县13373436737： 小王打一份文稿,如果按原计划打字12000个字后工效提高25%可提前40分完成如果一开始就提 - ？
璩眨立将： 一开始提高20%,那么实际时间是计划的1÷(1+20%)=6分之5 计划时间1÷(1-6分之5)=6时 一开始提高25%,那么时间是计划的1÷(1+25%)=5分之4 也就是6*5分之4=5分之24时=4时48分 比计划提前 6时-4时48分=72分 跟实际相差72-40=32分 小王原计划每分钟打12000÷[32÷(1-5分之4)]=75字 供参考.
沂水县13373436737： vfp编程问题 - ？
璩眨立将： s=0fz=1fm=1for i=1 to 20 a=fm fm=fz fz=a+fm s=s+fz/fmendfor? ＂前20项和=＂,s
