液位安全监控系统登录界面设计
建立一套可靠而又有效率的监控系统是非常必要的,以便更安全、实时地监测液位数据采样作业。下面将着重介绍我用VB软件开发的液位安全监控系统登录界面。
一、开发及运行环境
1.运行平台:Window xp/Winfow 2003/Window 2000 电脑内存2G
2.系统开发平台:Visual Basic 6.0软件
3.数据库管理系统软件:Microsoft SQL 2000 数据库
二、界面具备的功能
1.实现用户注册功能;
2.实现用户密码验证登录功能;
3.实时显示系统时间;
4.界面退出功能。
三、详细内容设计
1.关于VB 6.0软件介绍
VB 6.0是微软公司推出的一个基于Windows环境的可视化编程工具、它是微软Visual stdio家族的一个产品。VB 采用事件驱动机制,用户必须编写代码控制这些事件的响应方法。它支持面向对象的程序设计语言,并支持多种数据库的访问机制。具有强大的数据库管理功能。
2.程序设计
1)使用的基本控件
根据界面的需求,我使用了一些标准控件。比如说Label控件,通过设置属性或者编程的方法, Label1.Caption = "用户名",Label2.Caption = "密码",Label3.Caption = "某公司液位安全监控系统"Label3.Caption = "某公司液位安全监控系统",实现文字显示。而注册必须采用命令控件Command。当点击“注册”按钮后,则进入注册窗口,并将注册信息(包括用户名、密码)保存到数据库当中。而用户名和密码一栏采用了Textbox 文本控件,以便用户输入。
2)登录满足的条件
当用户名、密码都正确时方可登录。否则登录会提示“用户名错误”或者“密码错误”。当输入三次错误密码,系统会提示“请5分钟后再登录”的警告。
3)时间显示
界面提供实时的时钟显示,方便管理者。这里采用了时钟控件Timer,通过编程实现。
Private Sub Timer1_Timer()
Timer1.Interval = 500 ‘设置时间间隔
stime.Caption = Time ‘调用系统时间
End Sub
4)通过回车键实现光标的移动(代替鼠标)
当输入完用户名可通过鼠标点击密码输入框来输入密码,本系统采用回车键实现同样的功能。
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Text2.SetFocus
End Sub
采用同样的方法,当输入完密码按回车键,则实现“登录”功能。
5)界面图形加载的实现:为了使界面更美观,选择一张图片作为背景,因此要进行图片加载。
Private Sub Form_Load()
Me.Picture = LoadPicture(App.Path & "\液位安全.bmp")
End Sub
6)点击退出按钮,则界面消失。。
3.软件调试
1)编程之前的界面设计
2)编程之后(下图只显示了部分程序)
点击执行程序按钮,则出现如下界面:
3)登录时用户名错误情况
4)密码错误情况 ,当输入的密码不是设置密码=“123456”时,点击登录会出现如下密码错误提示。
5)三次输入密码错误情况:连续输入3次错误密码,则系统提示需要过5分钟才能使用。
6)用户名和密码都正确的情况。
当用户名为“水中鱼”,密码为“123456”时,点击“登录”按钮,此时进入监控系统。
四、结论
通过VB编程以及不断调试,终于基本上实现了上述功能,由于时间关系,本人只是实现了用户名为“水中鱼”,密码“123456”的登录,没有使用数据库的功能,即“注册”功能没有实现,这将是我后续的工作。在此,也巩固了不少知识。
楼主最近还看过