精通
英语
和
开源
,
擅长
开发
与
培训
,
胸怀四海
第一信赖
本项目为小型MIS,模拟实现种植园财务管理功能,该项目基于VC6.0平台和Access数据库开发。功能组成图如下:
void state::OnButton_state() //实现统计功能的类 // TODO: Add your control notification handler code here UpdateData();//得到对话框输入的数据 CString str_salary1,str_salary2,str_salary3,str_salary4,str_salary5;//定义四个存放四种蔬菜的Cstring类对象 DOUBLE salary[5];//定义五个计算利润的变量 int i=0; vegRs rs_veg; rs_veg.m_strFilter="Year>=#" +m_start_time.Format("%Y-%m-%d") +"# and Year <#" +m_end_time.Format("%Y-%m-%d")+"#"; rs_veg.Open(); if (rs_veg.GetRecordCount()>0)//查询那一年四种蔬菜的信息 { salary[0]=atof(rs_veg.m_Yield)*atof(rs_veg.m_Price);//计算第一种蔬菜的利润 str_salary1.Format("%f",salary[0]); rs_veg.MoveNext();salary[1]=atof(rs_veg.m_Yield)*atof(rs_veg.m_Price); str_salary2.Format("%f",salary[1]); rs_veg.MoveNext(); salary[2]=atof(rs_veg.m_Yield)*atof(rs_veg.m_Price); str_salary3.Format("%f",salary[2]); rs_veg.MoveNext();salary[3]=atof(rs_veg.m_Yield)*atof(rs_veg.m_Price); str_salary4.Format("%f",salary[3]); salary[4]=salary[0]+salary[1]+salary[2]+salary[3];//计算总利润 str_salary5.Format("%f",salary[4]); } rs_veg.Close(); salaryRs rs(&db); rs.m_strFilter="year ='"+m_state_year+"'";//检查是否已经有当年的记录 rs.Open(); if (rs.GetRecordCount()==0)//如果没有当年的记录 { rs.AddNew(); rs.m_year=m_state_year; rs.m_salary1=str_salary1;//salary1 rs.m_salary2=str_salary2; rs.m_salary3=str_salary3; rs.m_salary4=str_salary4; rs.m_salary_sum=str_salary5; rs.Update(); } else //如果有当年的记录 { rs.m_salary1=str_salary1;//salary1 rs.m_salary2=str_salary2; rs.m_salary3=str_salary3; rs.m_salary4=str_salary4; rs.m_salary_sum=str_salary5; } rs.Close(); salaryRs rs2(&db); UpdataList(rs2);//更新列表框 }