资源描述：
《cs程序综合设计设计要求》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、《C/S程序综合设计》课题设计要求实验课题一、人员档案的管理、物料档案管理设计实现对企业人员基本情况的档案的输入、删除与修改，企业人员基本情况主要包括：人员代码、姓名、性别、出生日期、身份证号、籍贯、家庭住址、联系电话、其它情况等。1．程序须包括主界面程序，程序名用“班级名＋座号＋main”，主界面可以通过菜单调用到其它所有子程序。2．人员档案的增加、修改、删除的程序，其中人员档案表在数据库中必须以“班级＋座号＋（表示人员的中英文信息）”来命名，人员档案的信息管理程序也必须以“班级＋座号＋（表示程序名的中英文信息）”来命名。其中人员代码不能为空，性别必须用“男”、“女”选择方式，出生日
2、期必须用日期控件来控制。修改、删除程序在执行修改删除操作前，都必须进行记录定位操作，所以必须有相应的查询程序，可以借用查询程序来完成记录定位。人员档案的增加、修改、删除程序也可以用三个程序名，分别编程。建表：CREATETABLEWL100323人员档案表(人员代码char(20)primarykey,姓名char(20),性别char(10)check(性别in('男','女')),出生日期datetime,身份证号char(30)uniquenotnull,籍贯char(30),家庭住址char(30),联系电话char(15),其它情况char(50),)insertintoWL
3、100323人员档案表(人员代码,姓名,性别,出生日期,身份证号,籍贯,家庭住址,联系电话,其它情况)values('1001',’luo','男','1991-12-12','111111','龙岩','fuzhou','11111','123123')模糊查询procedureTForm2.Button1Click(Sender:TObject);beginiftrim(edit1.Text)=''thenshowmessage('请输入姓名')elsebeginwithadoquery1dobeginclose;sql.clear;sql.add('select*fromWL10
4、0323人员档案表');sql.add('where姓名like''%'+edit1.text+'%''');open;end;ifadoquery1.recordcount=0thenshowmessage('没有找到符合条件的字段');end;end;beginiftrim(edit2.Text)=''thenshowmessage('人员代码不能为空')elsebeginclose;sql.Clear;sql.Add('select*fromWL100323人员档案表');sql.Add('where人员代码='''+edit2.Text+'''');open;//该查找代码的记
5、录ifADOQuery1.RecordCount<>0thenshowmessage('人员代码'+edit2.Text+'已存在，请重新输入！')elsebeginwithADOQuery1dobeginclose;sql.Clear;sql.Add('insertintoWL100323人员档案表(人员代码,姓名,性别,出生日期,身份证号,籍贯,家庭住址,联系电话,其它情况)');sql.Add('values(:v1,:v2,:v3,:v4,:v5,:v6,:v7,:v8,:v9)');parameters.ParamByName('v1').Value:=edit2.Text;
6、parameters.ParamByName('v2').Value:=edit3.Text;parameters.ParamByName('v3').Value:=radiogroup1.Items[radiogroup1.ItemIndex];parameters.ParamByName('v4').Value:=datetimepicker1.Date;parameters.ParamByName('v5').Value:=edit4.Text;parameters.ParamByName('v6').Value:=edit5.Text;parameters.ParamByNam
7、e('v7').Value:=edit6.Text;parameters.ParamByName('v8').Value:=edit7.Text;parameters.ParamByName('v9').Value:=edit8.Text;execsql;end;end;end;end;end.1．人员档案查询程序，程序名以“班级＋座号＋（表示程序名的中英文信息）”来命名，可以在查询框中输入人员姓名中的任何一个单字，查询出含该字的所有人员。cr
