学生信息管理—优化篇

优化系统是成为一个好的软件的基础，学生信息管理系统作为我们经历的第一个项目，优化是必不可少的，下面我来总结一下关于数据库几个需要优化的地方。
首先在退出系统的地方，不能直接用end 结束 站在用户的角度上就需要加上一个提示框

  a = MsgBox("确定退出系统吗？", vbOKCancel, "关闭程序")
  If a = vbOK Then
  End
  	Cancel = False
  End If

然后就是一些限制字符：
1.禁止所有输入

If KeyAscii > 0 Then
 	KeyAscii = 0
 End If

2.只能输入数字和后退键

Select Case KeyAscii
        Case 48 To 57
        Case 8
        Case Else
        KeyAscii = 0
End Select

3.只能输入汉字和字母、

    If KeyAscii >= -20319 And KeyAscii <= -3652 Or KeyAscii = 8 Or KeyAscii >= 65 And KeyAscii <= 90 Or KeyAscii >= 97 And KeyAscii <= 122 Then
    Else
    KeyAscii = 0
    MsgBox "只能输入汉字和字母", vbOKOnly + vbExclamation, "警告"
End If