学生系统优化篇(三)Check Box深层优化 + 项目完成总结

      学生信息管理系统终于要结束了，进行的时间太长了，其实早就完成了，可一直拖延，这才造成了今天完成才完成的局面，惭愧啊。

       下面来介绍下学生管理系统最后的一个优化，Check Box 控件

（1） 在没有选中Check控件的时候 txt 文本框不能输入任何内容。

代码如下：

                           ’定义当Check 未选中时候 txt文本框不可输入内容！
Private Sub Check1_Click()

    Dim a As Long

    a = Check1.Value


  If a = 1 Then                 ’当选中时候文本框可用

    txtSID.Text = ""

    txtSID.Enabled = True         

  Else

    txtSID.Text = ""

    txtSID.Enabled = False       ’未选中时文本框不可用

  End If

End Sub

  当我们代码写完运行的时候我们发现在  进入界面第一次的时候功能还没有实现，而是在Check打勾之后，取消打勾第二次的时候才能实现  ”没有选中Check“ 的时候不在文本框里输入，

  这时候我们就应该在   From Load 里加写代码

 

 From Load 加写代码如下：

Private Sub From Load_()

                       ’当Check控件未选中的时 txt文本框不能输入内容！刚进入窗体时候就得实现
      txtSID.Enabled = False      

  然后逐个控件加写代码就 OK 了！

 

（2）把登陆键设置成默认的 Enter 键

     我们都知道，QQ等很多软件都可以按下Enter键就可以登陆，那么我的登陆也可以，其实很简单，只需要简简单单的一一步就可以了。

      首先我们打开我们窗体的登陆界面，然后点击登陆键（Command）的属性，然后找到 “Default” 属性，然后把 False 设置成 True,这样就可一把 Enter键给设置成默认的登陆键了。

              

 

  好了，学生管理系统就到圆满完成了，这次的拖延症真的有点厉害，本来一个月之内就能完成，硬是拖延了一个多月。

在学习 “学生信息管理系统” 的时候学到了很多的东西，最多的就属优化部分，学会了独立自主优化和调试 Bug 部分，这对我学习编程的过程至关重要！   在验证项目的时候验证了两次     得感谢平平师傅的严格把关，是个负责任的好师傅！  

      在学习的过程中充分的学会了自主学习，利用网上的资料和 CSDN同学们总结的博客。

       在我们软件项目的时候，一定要站在用户的角度上去设计软件，一切要方便用户使用。

                    这就 OK 了