一个简单的学生成绩管理软件(ODBC开发)

类别:编程语言 点击:0 评论:0 推荐:
一个简单的学生成绩管理软件(ODBC开发) 下载本文所附源代码
程序运行效果截图:


前面我写过一篇《一个完善的ODBC数据库程序》,大家可能看到过,有鼓励,也有批评,但是所有这一切只有一个目的就是学好VC。我学习VC已有接近一年的时间,水平菜鸟级,而VC知识库给大家提供了一个交流的地方,大家相互学习,共同提高。感谢VC知识库各版版主!!!
在《一个完善的ODBC数据库程序》我提到完善它的很多方面,做一个小软件。我按这个思路做下去,实现了一些基本功能。程序采用对话框,界面按属性页的方式分为两部分: “班级成绩”和“年级成绩”。

程序界面如图:
先介绍它的使用:
1. 选中“班级成绩”时,首先选择班级,这里我只实现了两个班级管理。按开始按钮,三个列表框显示选中班级的三个记录集。“开始”按钮禁止,而其余对记录集操作的按钮允许。实现了增加记录,删除记录,修改记录,查寻记录,记录排序功能。比以前完善的地方主要在查寻记录,记录排序上。查寻可以按多中情况,而排序通过单击列表头实现,可按升序和降序,每一列都可实现排序。因为用了多记录集,所以在功能实现上麻烦了很多,大家可以看源程序。大家看过以后,可能觉得班级各科目列表,老师列表用文件或数组更容易实现,因为它们记录个数有限,固定。我之所以用数据库,是想学好ODBC,掌握多记录集编程。增加记录,删除记录,修改记录跟以前思路相同,只是由于学生成绩列表的变化引起科目成绩的变化,大家在源程序中看处理过程。下面主要看一下查寻记录和记录排序。

查寻记录

void CBaDialog::OnFind()
{
// TODO: Add your control notification handler code here
CFinDialog dlg;
if( dlg.DoModal()==IDOK)
{
this->Select();
m_bSet.Close();

if(dlg.m_Getstring2==">=")
m_Set.m_strFilter.Format("[%s]>=%.2f",dlg.m_Getstring1,dlg.m_find);
if(dlg.m_Getstring2=="=")
m_Set.m_strFilter.Format("[%s]=%.2f",dlg.m_Getstring1,dlg.m_find);
if(dlg.m_Getstring2=="<=")
m_Set.m_strFilter.Format("[%s]<=%.2f",dlg.m_Getstring1,dlg.m_find);
m_ListCtrlx.DeleteAllItems();
m_Set.Requery();
if(m_Set.IsEOF())
{
AfxMessageBox("没有符合条件的记录");
m_Set.Close();
return ;
}
else
this->Show();

}
}

记录排序 void CBaDialog::OnColumnclickList3(NMHDR* pNMHDR, LRESULT* pResult)
{
NM_LISTVIEW* pNMListView = (NM_LISTVIEW*)pNMHDR;

if(FALSE== m_bS)
{
 int k= pNMListView->iSubItem;
 Sort(!m_bIsAsc,k);
 m_ListCtrlx.DeleteAllItems();
 this->Show();
}
*pResult = 0;
}

void CBaDialog::Sort(BOOL isAsc,int secol)

if(m_Set.IsOpen())
   m_Set.Close();
this->Select();
m_bSet.Close();
CODBCFieldInfo fieldInfo;
m_Set.GetODBCFieldInfo(secol,fieldInfo);
if(isAsc)
{
m_Set.m_strSort=fieldInfo.m_strName+" ASC";
    m_bIsAsc=TRUE;
}
else
{
m_Set.m_strSort=fieldInfo.m_strName+" DESC";
m_bIsAsc=FALSE;
}
m_Set.Requery();

}

2.选中"年级成级",先选中"全部记录"则整个年级的情况显示出来。这时最下面的"显示按钮"禁止取消,按一下,年级的各科情况显示出来。下面是"全部记录"和"显示记录"。

全部记录 void CNaDilalog::OnAll()
{
// TODO: Add your control notification handler code here
if(m_Set.IsOpen())
m_Set.Close();
m_ListCtrlx.DeleteAllItems();
m_Set.m_strFilter.Empty();
m_Set.Open();
m_nRecordCount=this->Show();
m_Set.Open(AFX_DB_USE_DEFAULT_TYPE,"[NO2STUDENT]");
m_nRecordCount+=this->Show();
CString s;
s.Format("%d",m_nRecordCount);
GetDlgItem(IDC_STATICALL)->SetWindowText(s);
GetDlgItem(IDC_SHOW)->EnableWindow(TRUE);

}

其中Show()用来显示在列表中,如下: int CNaDilalog::Show()
{

 int k=0;

 do
 { 
 CString s;
 s.Format("%d",m_Set.m_column1);
 m_ListCtrlx.InsertItem(k,s,0);
 m_ListCtrlx.SetItemText(k,1,m_Set.m_column2);
 s.Format("%.1f",m_Set.m_column3);
 m_ListCtrlx.SetItemText(k,2,s);
 s.Format("%.1f",m_Set.m_column4);
 m_ListCtrlx.SetItemText(k,3,s);
 s.Format("%.1f",m_Set.m_column5);
 m_ListCtrlx.SetItemText(k,4,s);
 s.Format("%.1f",m_Set.m_column6);
 m_ListCtrlx.SetItemText(k,5,s);
 s.Format("%.1f",m_Set.m_column7);
 m_ListCtrlx.SetItemText(k,6,s);
 s.Format("%.1f",m_Set.m_column8);
 m_ListCtrlx.SetItemText(k,7,s);
 s.Format("%.2f",m_Set.m_column9);
 m_ListCtrlx.SetItemText(k,8,s);

 k++;
 m_Set.MoveNext();

 } while(!m_Set.IsEOF());
 m_Set.Close();
 return k;
 
}

显示记录 void CNaDilalog::OnShow()
{
// TODO: Add your control notification handler code here
m_ListCtrlj.DeleteAllItems();
  CString s; 
  m_bSet.Open();
  int i=0;
  m_bSet.MoveFirst();
  do

  m_ListCtrlj.InsertItem(i,m_bSet.m_column1,0);
  i++;
  m_bSet.MoveNext();
} while(!m_bSet.IsEOF());
  m_bSet.MoveFirst();
  for(i=0;i<=4;i++)
  {  
  score[i][1]=m_bSet.m_column2;
  score[i][3]=(float)m_bSet.m_column4;
  score[i][4]=(float)m_bSet.m_column5;
  if(i!=4)
  m_bSet.MoveNext();
  }
  m_bSet.Close();

  m_bSet.Open(AFX_DB_USE_DEFAULT_TYPE,"[NO2OBJECT]");
  for(i=0;i<5;i++)
  {
score[i][1]+=m_bSet.m_column2;
score[i][2]=score[i][1]/m_nRecordCount;
score[i][3]+=(float)m_bSet.m_column4;
score[i][4]+=(float)m_bSet.m_column5;
if(!m_bSet.IsEOF())
  m_bSet.MoveNext();
  }
  m_bSet.Close();
 for(i=0;i<5;i++)
 {
s.Format("%.1f",score[i][1]);
m_ListCtrlj.SetItemText(i,1,s);
s.Format("%.2f",score[i][2]);
  m_ListCtrlj.SetItemText(i,2,s);
  s.Format("%d",(int)score[i][3]);
  m_ListCtrlj.SetItemText(i,3,s);
  s.Format("%d",(int)score[i][4]);
  m_ListCtrlj.SetItemText(i,4,s);
}
}

上面的函数都是对两个表的使用,大家可以详细看一下。 接下来介绍一下数据库和记录集的情况。采用一个数据库,内有六个数据表。按班级分 每班有三个表:学生成级表,各科成绩表,任科老师表。按记录集分,有三个记录集:学生成级记录集,各科成绩记录集,任科老师记录集。每记录集包括所有班级相同类型表。这样增加班级,只需增加表,记录集不变。

注意点:

1. 数据源由程序注册,读者提醒过在运行前先判断数据源是否注册过。我通过操作注册表设置键值和查寻键值实现。考虑到各主机的具体情况不同,操作系统不同,我没有把这部分加入,以免损坏你的注册表,有兴趣的可以一试。
2. 删除记录前可以在列表中选中,然后点击删除即可,不用对话框。修改前,选中记录,点击修改按钮,则记录值显示在修改对话框中,只需修改所需改动的地方即可。
这里没有用这种方法,考滤的是删除记录需要密码,有权限的才可以。修改可以采用这种方法,读者可以一试。
3. 程序达到实用的目的还有很远,可以增加导出记录和打印功能。增加参数设置,能增加班级,增减科目等。这需要建一个可重用基类,不很容易,我正在做。
4.程序刚完成,优化的比较少,层次不清晰,我正在优化。
最后,欢迎高手指教!

本文地址:http://com.8s8s.com/it/it24718.htm