学生信息管理系统之年级课程设置
2012-07-30 10:03
267 查看
大家先来看一下它的窗口布局
年级是默认加载的,但是当我们选择年级时,如果此年级已经设置好了课程,那么在已经选择课程中应该显示出来,当我们单击设置课程时,此年级的所有课程也应该显示,当然这些都很简单
第一个显示所选课程我们只需在单击选择年级时,执行
第二个显示,执行
这些内容都不是很难,主要是我们要明白它的思考过程,为什么要这样做?然后我们以后做系统,不光只是敲代在敲之前要多思考,一个好的程序员不光只是要实现这个功能,还要思考如何让自己的代码简单,干练,实现能力更强!
年级是默认加载的,但是当我们选择年级时,如果此年级已经设置好了课程,那么在已经选择课程中应该显示出来,当我们单击设置课程时,此年级的所有课程也应该显示,当然这些都很简单
第一个显示所选课程我们只需在单击选择年级时,执行
ListSelectCourse(1).Clear '先清空列表 '从年级课程里查找出相同年级的信息,将课程名称添加到列表里 txtsql = "select*from gradecourse_info where grade='" & ComboGra.Text & "'" Set mrc = executesql(txtsql, msgtext) If Not mrc.EOF Then For i = 1 To mrc.RecordCount ListSelectCourse(1).AddItem mrc.Fields(1) mrc.MoveNext Next End If mrc.Close
第二个显示,执行
'先将以前的课程清空,在重新添加所有课程 ListAllCourse(0).Clear ListAllCourse(0).Enabled = True ListSelectCourse(1).Enabled = True CmdModify.Enabled = True txtsql = "select * from course_info" Set mrc = executesql(txtsql, msgtext) '添加信息 While (mrc.EOF = False) ListAllCourse(0).AddItem mrc.Fields(1) mrc.MoveNext Wend mrc.Close但是,当我们单击确认设置时,它是如何避免年级重复,如何思考的,下面我们来看看这段代码
txtsql = "select * from gradecourse_info where grade='" & ComboGra.Text & "'" Set mrc = executesql(txtsql, msgtext) If mrc.EOF Then '如果是新添加的年级则将已选的课程添加进去 For i = 1 To ListSelectCourse(1).ListCount mrc.AddNew mrc.Fields(0) = Trim(ComboGra.Text) mrc.Fields(1) = Trim(ListSelectCourse(1).List(i - 1)) mrc.Update Next mrc.Close MsgBox "设置课程成功" Else mrc.Close '如果是已存在的年级就将这个年级删除再重新添加 txtsql = "delete from gradecourse_info where grade='" & ComboGra.Text & "'" Set mrc = executesql(txtsql, msgtext) txtsql = "select * from gradecourse_info" Set mrc = executesql(txtsql, msgtext) For i = 1 To ListSelectCourse(1).ListCount mrc.AddNew mrc.Fields(0) = Trim(ComboGra.Text) mrc.Fields(1) = Trim(ListSelectCourse(1).List(i - 1)) mrc.Update Next mrc.Close 'mrcc.Close MsgBox "设置课程成功" End If
这些内容都不是很难,主要是我们要明白它的思考过程,为什么要这样做?然后我们以后做系统,不光只是敲代在敲之前要多思考,一个好的程序员不光只是要实现这个功能,还要思考如何让自己的代码简单,干练,实现能力更强!
相关文章推荐
- ASP.NET学生信息管理系统-班级建制(三) 课程(科目)设置
- 学生信息管理系统—课程设置窗体中怎么一次性添加或删除课程
- 学生信息综合管理系统开发记录(数据库课程设计)
- 学生社团管理系统 任务:通过此系统可以实现如下功能(包含但不限于以下功能,可自行设计): 1、社团信息包括:社团编号、社团名称、成立时间…… 2、学生信息包括:学号、姓名、性别、年级、专业…… 3
- 数据结构课程设计论文--学生信息管理系统
- JAVA课程设计-学生信息管理系统(个人博客)
- 课程设计~学生信息管理系统代码
- 课程设计--学生信息管理系统
- JAVA课程设计---学生基本信息管理系统(201521123039 王兴)
- 学生信息管理系统-数据结构课程设计
- 课程设计--学生信息管理系统
- 学生管理系统之课程设置
- 学生信息管理系统(课程设计)
- 课程设计--学生信息管理系统
- 数据结构课程设计——学生信息管理系统
- C语言课程设计——学生信息管理系统(BUG挺多,敬请指正)
- 课程设计:学生信息管理系统设计
- 数据结构课程设计论文--学生信息管理系统
- ASP.NET学生信息管理系统-班级建制(二) 班级专业设置
- 数据结构课程设计---学生信息管理系统