实验五 开发一个学生信息管理系统Word格式文档下载.docx

1、 图2 工具设置分别用标签，文本，按纽来设计，文字更改用见图3部分功能提示：1.表单调用部分：提示：调用下一表单命令 Form2-Show（）; 隐藏当前表单命令 Form1-Hide（）; 注意要先用include # unit2.h包含2提示 提示窗口: ShowMessage（）;3 文本框取值： Form1-Edit1-Text 变量取值： “ + 变量名+” 4 识别为空的情况If（Edit1-Text=”|Edit2-Text=”） ShowMessage（用户名或密码不得为空）; return; 图3 属性设置5 设置密码属性能 图4密码属性6 数据库的连接：（1） 建数据连接：

2、ADO ADOQuery1- connctionstring（2） 建数据源： Dataaccess-datasource-dataset =ADOquery1见图4 图5 图6 图7 图8（3） 从数据库中读密码语句AnsiString an1=select * from mm; an1+= where user1=+ Edit1-Text+ /定义SQL查询语句 and password1=+Edit2- ADOQuery1-SQL-Add（an1）; /将SQL语句加入到缓冲区Open（）; /执行SQL语句 if （ADOQuery1-RecordCount=0） /识别是用户名及密码

3、是否正确 ShowMessage（非法用户名或密码 Return;7 文件存盘如图9点文件菜单save project as 图9文件按默认文件名，选一个新目录保存，如图10 图10二 综合窗口菜单的设计三信息录入判断学号是否存在：void _fastcall TForm3:Edit1Exit（TObject *Sender） AnsiString an1=select * from student where sno=+Edit1-Clear（）;Open（） ; if（ADOQuery1-RecordCount=1） ShowMessage（对不起，已经存在该学号，请重新输入 Edit1-

4、SetFocus（） ;增加代码：AnsiString rq,xb; rq=ComboBox2-+ComboBox3-+ComboBox4-Text; if（Form3-RadioButton1-Checked=1） xb=男 else女 ; AnsiString an1=insert into student values（ +Form3- ,Edit2-+xb+ComboBox1-+rq+）ExecSQL（）;Close（）; ShowMessage（增加成功四信息查询： 查询代码 if（Edit1-Text!=） and if（Edit2- sname=。其它代码自己补齐 year（cs

5、rq）1900 RecordCount=0）对不起，没有你要查的同学五学生信息修改修改中查询代码：if（Form3-Text=请查询输入学号请查询输入要查询的学号select sno,sname,sex,sdept,year（csrq） as nn,month（csrq） as yy ,day（csrq） as rr from student where /为各个变量赋值Text=ADOQuery1-FieldValuessno; Edit2-sname AnsiString xb; xb=ADOQuery1-sex if（xb= RadioButton1-Checked=true; Radi

6、oButton2-ComboBox1-sdept ComboBox2-nn ; ComboBox3-yy ComboBox4-rr修改代码：AnsiString xb,rq; if（RadioButton1-Checked=true） xb=Text+- update student set + Edit2- sex=, sdept= csrq= where sno= ShowMessage（an1）;ExecSQL（） ;修改成功六信息删除删除查询代码：if（Text=+Form4- DBGrid1-DataSource=DataSource1;删除代码int aa; aa=MessageBox（NULL,真的要删除该生记录吗？,询问窗口,4）; if（aa=6） ADOQuery1-delete from student where ShowMessage（删除成功 return;七统计：统计代码：select count（sno） as xsrs from student Label2-Caption=学生人数 Label3-Caption=ADOQuery1-xsrs/-select avg（grade） as pjcj from sc 平均成绩