CEDURE optiongroup1. option1. click & &对选项组中第1 项定义单击时过程
if op = 10
op0= op0 + 1
n1 = op0
end if
IF recno () < 89
SKIP 1
3 ,4 say 题目3 记录数为10 个,结尾显示结果
if recno () < > 89
thisform. show
else
sele 2
use f s
......
return
ENDPROC
ENDDEFINE
建立主程序文件,其语句如下:
set talk off &&关闭对话模式
set safe off
set stat off
set dele on &&不处理已删除的记录
set cent on
set date to ansi
close all
RELEASE WINDOW 常用
_SCREEN.backcolor=rgb(80,150,180)
ZOOM WINDOW SCREEN MAX
_SCREEN.controlbox=.f.
deactivate window '综合素质测评'
mypath=left(sys(16),rat('',sys(16)))
set defa to (mypath)
set path to data;form;pic
open database kfgl
do form logo
read events
quit
最后给出的测量结果图之一如图2 所示,图中红点为测试结果所落在的位置,通过它可直观地看出被测者的基本个性。

图2 测量结果
建立可发布的应用程序与开发标准的Visual FoxPro 应用程序类似。创建可独立执行的程序并且需要在运行环境中对它进行测试,完成开发和测试之后,就可以开始此应用程序和相关文件的发布工作,可通过Visual FoxPro 8. 0 的发布向导或连编进行,在此略。程序经过测试运行,结果相符,可作为心理测量系统一个子系统也可单独使用。
3 结论
目前该系统已投入使用,运行情况良好,该系统提出了较为科学的设计方案,适应了高校素质教育改革要求和学分制管理的需要,对大学生综合素质信息数据准确、内容翔实、查找方便、结论客观。系统的模式先进、功能齐全、运行稳定、可靠性高。更好地利用了现有的校园网资源和环境,促进了高校学生管理工作的规范化、信息化建设。对推动高校的素质教育改革,构建管理育人的信息化平台,引导、培养和发展学生的综合素质,加强高校与用人单位的信息交流,促进学生就业都发挥了积极的作用。今后我们会进一步完善该系统的设计,拓展该系统的功能,加大推广应用的力度,使其发挥更大的社会效益。
参 考 文 献
1 魏茂林 数据库应用技术,[M]电子工业出版社, 2005 ,21
2 缠菁,大学生教育综合信息管理系统的研究[J]. 中国轻工教育2005.1
3 胡文东,王涛,等.计算机多媒体群体心理测量系统研制[J].第四军医大学学报.1999(3).
4 郭东恩,齐立磊.飞行员心理测试系统[J].科技资讯.2007.15
5 刘志光,高校校园网促进大学生综合素质发展的研究[J].网络教育,2007(1)
6 林阳.信息化教育社会学[J].电化教育研究,2006,(7):5~8.
7 胡昌盛,可视化数据库技术开发心理测验软件[J].数理医药学杂志,2007.20(5)
2/2 首页 上一页 1 2 |