毕业论文

打赏
当前位置: 毕业论文 > 计算机论文 >

VF薄板厂能源数据库的设计+需求分析+文献综述(13)

时间:2017-01-03 11:41来源:毕业论文
B 数据输入子菜单的设计,见图3.4 图 3.4 数据输入菜单的建立 C 数据修改子菜单的设计,见图3.5 图 3.5 数据修改菜单的建立 D 报表子菜单的设计,见图3.6


B    “数据输入”子菜单的设计,见图3.4
 
图 3.4 “数据输入”菜单的建立
C    “数据修改”子菜单的设计,见图3.5
 
图 3.5 “数据修改”菜单的建立
D    “报表”子菜单的设计,见图3.6
 
图 3.6 “报表”菜单的建立
E    “图表”子菜单的设计,见图3.7
 
图 3.7 “报表”菜单的建立
(3)    常规选项的设计,见图3.8
 
图 3.8 “常规选项”的建立
(4)    从菜单文件生成菜单程序nyglcd.mpr
(5)    菜单运行后情况如图所示3.9
 
图 3.9 菜单运行图
3.2.2    系统主文件
在项目管理器的“代码”选项卡中建立主文件,见图3.10
 
   图 3.10 菜单运行图

    主文件代码编写如下:
set talk off
Close all
public rq,rql,rqy,rqm
rq=date()
rq1=date()
rqy=2009
rqm=12
do form fm
modify windows screen title'能源数据库管理系统'
clear
read event
quit
3.2.3    封面表单的设计
封面表单设计(fm.scx)如图3.11所示。
 
图 3. 11封面表单
其中主要控件的事件代码如下:
    Timer1的Timer事件过程的代码:
if thisform.label1.left+353>thisform.width
thisform.label1.left=8-353
else
thisform.label1.left=thisform.label1.left+2
endif   
    
    Timer2的Timer事件过程的代码:
 if thisform.label5.left<1
 thisform.label5.left=thisform.width-8
 else
 thisform.label5.left=thisform.label5.left-2
 endif
    
    Command1的Click事件过程的代码:
Do form xtdl
3.2.4    “系统登陆”表单
“系统登录”表单(xtdl.scx)如图3.12所示。    
 
图 3.12 系统登陆表单
    先在表单菜单中选择“新属性”菜单项,建立变量i=0
    右击鼠标选取快捷菜单中数据环境,将数据环境窗口中添加“用户.dbf”。
    双击“Command1”输入其Click事件过程的代码。
thisform.i=thisform.i+1
sele 用户
locate for 用户名=alltrim(thisform.container1.combo1.value)
if found() and 密码=alltrim(thisform.container1.text1.value)
do nyglcd.mpr
thisform.release
else
if thisform.i<3
=messagebox("操作员密码错!"+chr(13)+"再试一次!",48,"警告")
thisform.container1.text1.value=""
thisform.container1.setfocus
else
           =messagebox("对不起,您已错三次了!"+chr(13)+"非法用户,请;您退出系统",48,"严重警告")
thisform.release
endif
endif

 双击“Command2”输入其Click事件过程的代码。
release thisform
 
 双击“Command3”输入其Click事件过程的代码。
release thisform
close all
quit
3.3    模块设计
3.3.1    系统管理模块
(1)    “用户管理”表单(yhgl.scx),如图3.13所示
     用户管理的功能主要是可以设置可以添加和修改进入系统的用户。 VF薄板厂能源数据库的设计+需求分析+文献综述(13):http://www.751com.cn/jisuanji/lunwen_1744.html
------分隔线----------------------------
推荐内容