资源描述:
《vf实习练习试题.汽车修理管理信息系统方案》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、可编辑版VFP及其应用系统开发实习报告姓名:肖梦班号:080122学号:20121003361指导老师:於世为时间:2014.01.11-2014.01.15Word完美格式可编辑版实习内容表1职工工资表姓名分厂基本工资奖金扣款应发工资备注李民1500.00200.0050生产优秀奖王华1400.0050.0040.00胡立1280.0080.0040.00彭伟2350.0060.0040.00张良2480.0080.00200.00生产事故合计99一、根据表1,作如下操作练习1.Creategz20121003361Word完美格式可编辑版2、添
2、加:usegz20121003361appendblank(在表末尾添加空白记录)插入:insertintogz20121003361("姓名","分厂",基本工资,奖金,扣款)value("肖梦","3",300.00,60.00,50.00)删除:go7Delete(逻辑删除)Pack(物理删除)修改:replace基本工资with基本工资+100.003、记录指针移动:go3?recno(),bof()skip-2?recno(),bof()skip5?recno(),bof()Word完美格式可编辑版4、排序:usegz2012100336
3、1listsorttojzxon奖金for分厂="1"usejzxlist索引:单索引:indexon扣款tokqxList复合索引:clearusegz20121003361Listindexon奖金tagjzdescendinglistindexon分厂+str(奖金,6,1)tagfcjjdescendinglistindexon基本工资+奖金-扣款tagyfgzcandidatelistWord完美格式可编辑版统计:countfor分厂="2"tofc?"2分厂人数:",fc求和:sum奖金tomjj?"总奖金:",mjj二、简单编程练习、
4、1、程序:modifycommandyzcWord完美格式可编辑版*yzc.prgclear@10,5say"请输入所求圆的半径"?input"半径:"tors=2*pi()*r?sreturn2、程序:modifycommandyfbx*yfbx.prgclear@2,5say"请输入您的储户存款"?input"储户存款:"toxinput"存款时间:"tondocasecasen=1y=x*(5.0/100+1)casen=2y=x*(5.5/100+1)casen=3y=x*(6.2/100+1)endcase??"应偿还本息金额:",yre
5、turnWord完美格式可编辑版3、程序:modifycommandqg*qg.prgclearinput"输入一次项系数"toainput"输入二次项系数"tobinput"输入常数项系数"tocn=b*b-4*a*cdocasecasen<0?"无实数解"casen=0x=(-b+SQRT(n))/(2*a)?"x1=x2=",xcasen>0x1=(-b+SQRT(n))/(2*a)x2=(-b-SQRT(n))/(2*a)?"x1=",x1?"x2=",x2endcasereturn4、程序:modifycommandQH*qh.prgcl
6、ear@3,5say"计算S=1+2+3+……+N"input"输入求和项数:"toNS=0fori=1toNS=S+inext?"S=",S三、根据表1,用命令方式和程序方式分别完成以下任务1.计算每个人的应发工资及各项工资合计计算应发工资:命令语句:Word完美格式可编辑版usegz20121003361listreplaceall应发工资with基本工资+奖金-扣款list程序:*应发工资.prgclearusegz20121003361listreplaceall应发工资with基本工资+奖金-扣款list各项工资合计:命令语句:usegz
7、20121003361listdimensions(1,4)Sum基本工资,奖金,扣款,应发工资tos(1),s(2),s(3),s(4)go6gatherfromsfields基本工资,奖金,扣款,应发工资Word完美格式可编辑版list程序:*工资合计.prgclearusegz20121003361listdimensions(1,4)Sum基本工资,奖金,扣款,应发工资tos(1),s(2),s(3),s(4)go6gatherfromsfields基本工资,奖金,扣款,应发工资list2、按分厂汇总,生成全厂工资汇总表gzhz??.dbf
8、,其格式如下:分厂基本工资奖金扣款应发工资1299命令语句:usegz20121003361indexon分厂tagfct