当前位置: 网学 > 设计下载 > VFP毕业设计 > 正文

基于VFP的学生综合素质管理系统的设计

来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 佚名 来源: 网络 发布时间: 13/05/10

文章导读:在新的一年中,各位网友都进入紧张的学习或是工作阶段。网学的各位小编整理了VFP毕业设计-基于VFP的学生综合素质管理系统的设计的相关内容供大家参考,祝大家在新的一年里工作和学习顺利!

QQ交谈客服咨询,网学网竭诚为您服务,本站永久域名:myeducs.cn

52登记学生基本信息模块的设计与实现

1程序流程图:

2、界面如下图:

 

界面包括的控件有标签、文本框、组合框、命令按钮。功能是提示用户输入学生的详细信息和备份已经输入的学生信息。

3、实现过程:

第一步将所需的控件放到表单的相应位置;方法:首先在“表单控件”工具栏先选中所需的控件图件,然后在表单的恰当位置上单击鼠标并拖动鼠标,即可把由所选取的控件生成的对象添加到表单上,此时,在属性窗口里显示了该控件对象的所有属性、事件。如下图为表单的属性设置窗口:

 

第二步双击相应的控件,在控件的相应过程中编写程序,如“民族组合框”的GotfocusInit过程如下:

 

其中 if this.listcount>=1

for i=1 to this.listcount

    this.removelistitem(i)

endfor

endif程序段的作用是判断组合框中是否有列表项;for i=1 to this.listcount

    this.removelistitem(i)

endfor的作用是将现有的列表框全部移除;涉及组合框的两个重要属性:listcount统计组合框的成员个数;removelistitem(i)移除组合框的第i个成员;

do while .not. eof()

  this.additem(民族)

 skip

enddo程序段的作用是将民族库(mzk.dbf)中的所有记录添加到组合框中,使用的一个重要属性是additem(字符串)

         按钮的作用是进行字典维护,如果在录入的过程中遇到一个少数民族在组合框中没有,我们便可以点按此按钮进行民族库的维护,如图

 

可以增加民族也可修改民族等。

此按钮的click过程如下:

 

如“添加入库并继续录入”按钮的click过程如下

if len(thisform.text1.value)<>0 .and. len(thisform.text2.value)<>0

use 学生基本情况表.dbf

locate for 学号=thisform.text1.value

if eof()

append blank

repl 学号 with thisform.text1.value

repl 姓名 with thisform.text2.value

repl 性别 with alltrim(thisform.combo2.value)

repl 民族 with alltrim(thisform.combo1.value)

repl 专业 with alltrim(thisform.combo3.value)

repl 系别 with alltrim(thisform.combo4.value)

use

thisform.text1.value=""

thisform.text2.value=""

thisform.combo1.value=""

thisform.combo2.value=""

thisform.combo3.value=""

thisform.combo4.value=""

messagebox("已入库,点<确定>继续录入学生基本情况!","继续录入")

thisform.text1.setfocus

else

    messagebox("该学号已经存在,请检查学号!","提示")

endif

else

messagebox("学号/姓名不能为空!","确认窗口")

endif

首先判断学号栏与姓名栏是否为空,如果不为空,则到库中寻找有没有该学号的学生,如果没有,则新增记录,如有则提示用户该学生已存在,如果学号/姓名栏为空,则提示用户学号/姓名不能为空。

其中判断学号栏与姓名栏是否为空,用的是函数len(),寻找某学号的学生,用的是locate for语句。提示信息用的是函数messagebox()

 


 

 

本站发布的计算机毕业设计均是完整无错的全套作品,包含开题报告+程序+论文+源代码+翻译+答辩稿PPT

本文选自计算机毕业设计http://myeducs.cn
论文文章部分只是部分简介,如需了解更多详情请咨询本站客服!QQ交谈QQ3710167

网学推荐

免费论文

原创论文

浏览:
设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
湘ICP备09003080号