学生信息系统之优化（一）

前言

  

    学生管理系统完成后，接下来就是优化的时间了，我一共进行了三次优化，随着优化的深入，我收获到了很多的知识，下面给大家分享一下我的收获。

主要内容

1.文本框的格式限制和输入问题

    程序的设计尽量全面，减少用户犯错误的概率，而文本框的格式限制正好可以做到这一点，通过代码和控件属性的设置来提高用户操作的正确率。

  （一）修改文本框的MaxLength属性，同时修改数据库表的Char（工具-选项-设计器-允许修改）就可以设计文本框的输入位数上限

  （二）限制特殊字符

Private Sub txtUserName_KeyPress(KeyAscii As Integer)
    Dim cTemp As String
    cTemp = "`~!@#$%^&*()-=_+[]{};:'\|<>/?.‘“”’、，。——+（）《》？,~·……￥！：；【】" & """ '禁止输入特殊的字符"
    If InStr(1, cTemp, Chr(KeyAscii)) <> 0 Then KeyAscii = 0
End Sub

  （三）Combox框只允许下拉选中  

    修改style属性 2

  （四）只能输入文字

Private Sub txtName_KeyPress(KeyAscii As Integer)  
       If (KeyAscii < 0) Or (KeyAscii >= 65 And KeyAscii <= 90) Or(KeyAscii >= 97 And KeyAscii <= 122) Or (KeyAscii = 8) Then  
       Else  
           MsgBox "姓名由字母和汉字组成", vbOKOnly,"提示"  
           KeyAscii = 0  
           txtName.SelStart = 0  
           txtName.SelLength = Len(txtName.Text)  
       End If  
End Sub  

2.窗体的优化

  （一）修改窗体出现位置  StarUpPositon=中心

  （二）美化窗体的背景，添加IMAGE控件，修改Picture属性添加图片，添加代码。

imgMain.Move 0, 0, me.Width, me.Height

  （三）修改控件字体，修改控件对齐方式。

  通过修改Alignment属性和修改Font属性

3.日期问题

  受别人博客的启发，我也对日期问题的优化进行了优化，程序的设计要求让程序更加快捷，简单地达到用户的目的，而利用控件代替文本框输入可以减少用户操作，提高用户体验。

  （一）引用相关控件

    工程——部件——控件——Microsoft  Windows  Common  Control-2 6.0(SP6)

添加DTPicker控件

  （二）添加txtbox控件，初始值为默认，这样让用户看起来更加舒服。

小结

  

    这次优化让我摆脱了一直站在程序员的角度看问题，应该更加站在用户的角度，去提高用户的体验度。