前言
今天整理印象笔记，发现了这篇草稿，遂发到CSDN上。
正文
学生验完项目后，发现系统有些小Bug，界面很乱更不用谈美观了。于是就有了这篇文章，学生系统优化开始了~
主窗体加入状态栏控件
加入状态栏控件可以实时反映系统中各个状态的变化。
如何在文本框中限制输入特殊字符
代码如下：Private Sub txtUserName_KeyPress(KeyAscii As Integer)
Dim cTemp As String
cTemp = "`[email protected]#$%^&*()-=_+[]{};:'\|<>/?.‘“”’、，。——+（）《》？,~·……￥！：；【】" & """ '禁止输入特殊的字符"
If InStr(1, cTemp, Chr(KeyAscii)) <> 0 Then KeyAscii = 0
End Sub
简单来说，这里使用KeyPress事件，运用ASCLI码来进行限制。敲击符号时，不能在文本框里显示，但没有提示信息。这里是需要限制的符号太多，也太繁琐，机智的你有没有更棒的招，欢迎来教教我。
如何删除表中冗余行
这里其实就是简单应用删除语句，规则如下删除行：delete from 表名 where 字段名 = ‘主键名称’
如何单击确认后，重新输入数据文本框为空
在添加学籍成功后，文本框中的内容没有删除，既不便于再次输入新数据，又显得不美观。这就又需要优化喽！
这里添加一系列 控件名 = ""就OK了
嗯哼？咋数据都没了，这时再仔细看一遍输入的代码顺序 ，明白了。代码是按输入顺序执行的，先为空，后添加数据；添加多少次都没用哈。我们把代码位置换一下就可以了！
结语
学生这个项目自己进行的又拖沓又不认真，值得自己反思。下个项目见~