任何的系统在完成之前必须得优化,首先你的保证你做出来的软件得没有正常的逻辑问题,还得提高用户体验,让别人用着比较舒服对吧!所以优化就是一个不断完善的过程!
下边我为大家分享一下我的优化心得!
1.登录界面
首先你的保证你的登录界面不能随意乱输入,控制字符长度,而且要注意特殊字符的问题,防止别人输入特殊字符会出现报错的情况!而且用户的密码输入的时候不能让别人看到,保证用户密码的安全性!
字符长短在text的控件属性里边有个MaxLength的属性,你在里输入你想控制的密码长度就可以!而输入密码安全性怎是另一个属性passwordchar,你填入*就可以了,你输入的密码就都是*了!
特殊字符则可以通过控制输入text控件数据类型来控制,如下:
Private Sub txtUserName_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case 8 Case Asc("A") To Asc("Z") Case Asc("0") To Asc("9") Case Asc("a") To Asc("z") Case Is < 0 Case Else KeyAscii = 0 End Select End Sub 以上代码的意思就是我的用户名只能输入大小写字符和数字(汉字也可以输入,但是中文状态下的字符输入不会报错),这样就能控制字符的输入类型,以及特殊字符的问题了! 2.修改密码界面 修改密码的时候,为了更加人性化,你要提示用户,当前用户的是哪个吧!还有就是,你在改密码之前要验证一下当前密码,否则别人在用户不在的时候修改用户密码,这个系统就有安全隐患了! 提示当前用户代码如下:Private Sub Form_Load() Dim txtSQL As String Dim MsgText As String Dim mrc As ADODB.Recordset Dim name As String Me.Top = 0 Me.Left = 0 Text2.Text = "" txtSQL = "select * from user_Info where user_ID = '" & username & "' " Set mrc = ExecuteSQL(txtSQL, MsgText) name = Trim(mrc.Fields(0)) Label3.Caption = "当前用户名称为:" & name End Sub 从数据库中将用户名调出来。赋给Label3,显示在控件上!
验证原密码的代码如下:
If Trim(Text2.Text) <> Trim(mrc.Fields(1)) Then MsgBox "原密码输入不正确!", vbOKOnly + vbExclamation, "警告" Text2.SetFocus Text2.Text = "" Text1(1).Enabled = False Text1(2).Enabled = False Else next sub End If 这几行代码就是将用户输入的密码与原密码进行比较,判断用户输入的原密码是否正确,如果错的话,将无法输入新的密码!大家需要注意的问题就是,注意自己控件的名称要一一对应,书上有好多的控件名称与代码对应不上导致程序运行错误! 3.信息查询界面 大家在调试信息查询界面的时候,会发现控件表格的大小个挺烦的问题,因为有的信息可能比较长,导致部分的文字或是数字无法显示,其实也是空间的调整问题!代码如下:
myflexgrid.ColWidth(0) = 1000 这就表示你的表格的第一列的宽度为1000,大家可以根据实际信息来调整表格宽度!
4.课程添加界面
在添加课程的时候,会出现课程重复添加的问题!解决的代码如下:
Private Sub cmdAdd_Click() Dim i As Variant If listallcourse.ListIndex <> -1 Then If listselectcourse.ListIndex = 0 Then listselectcourse.AddItem listallcourse.List(listallcourse.ListIndex) End If For i = 0 To listselectcourse.ListCount - 1 If listselectcourse.List(i) = listallcourse.List(listallcourse.ListIndex) Then Exit Sub End If Next listselectcourse.AddItem listallcourse.List(listallcourse.ListIndex) End If End Sub 这几行代码就是当你添加的课程数据库里已经有了的时候,课程就无法添加上去了!而没有的则能够顺利的添加上! 5.小问题 在你添加完信息的时候要清理各个表格的内容!防止别人再次打开,看到你之前填写的数据,也能够让你连续填写数据更加的便利!这有两种方法可以解决! 第一就是在你完成输入指令之后,让所有控件的内容清空!例如text1.text=" " 第二就是在你输入完数据的时候,同时卸载窗体! 以上是我在进行学生信息管理系统优化时遇到部分的问题,以及找的解决的方法!希望能对大家有所帮助!剩下的问题我会在以后继续与大家分享!
