今天我们做一个学生信息窗体的实例，来回顾和温习之前学习的内容，通过实例使大家掌握窗体的实际应用。
首先，我们通过窗体向导来创建一个空白窗体，并通过“窗体设计工具”的设计选项下，在窗体的页眉处添加徽标和标题，同时在窗体页眉上适当的位置，再放置一个按钮，标题和按钮都写上相应的内容，并通过窗体设计工具设计选项在窗体主体中添加“子窗体”控件，在属性表中设置子窗体源对象，将学生信息表与子窗体进行关联，在窗体页眉上设置“学生信息录入”按钮：
此时运行窗体进入到窗体视图，看一下我们设计的界面效果，可以看到学生信息表在子窗体中显示：
下一步如何对学生信息表添加新的记录呢？首先，创建学生信息录入界面窗体，该窗体界面之前我们已经创建完成，但是需要通过属性表删除我们需要录入信息的控件来源项，则在设计视图下显示未绑定，我们暂时录入班级，姓名和性别项，对该窗体进行简单的界面设计，并在页眉处添加一个“输入信息后录入”按钮：
完成后，右键点击刚刚添加的“输入信息后录入”按钮，点击事件生成器进入到代码窗口，并在代码窗口键入信息录入代码：
VBA程序代码：
PrivateSubCommand73_Click()DimrstAsADODB.RecordsetDimstrsqlAsStringstrsql="select*from学生信息"Setrst=NewADODB.Recordsetrst.Openstrsql,CurrentProject.Connection,adOpenKeyset,adLockOptimisticrst.AddNewrst!班级.Value=Me.班级.Valuerst!姓名.Value=Me.姓名.Valuerst!性别.Value=Me.性别.Valuerst.Updaterst.CloseSetrst=NothingMsgBoxMe.姓名.Value"录入成功"EndSub
保存并运行窗体进入到窗体视图后，可以输入班级，姓名和性别等项进入学生信息的录入啦，录入完信息后点击“输入信息后录入”按钮，会显示录入信息成功：
前面我们还缺少一步，就是在主窗体界面的学生信息录入按钮加入代码，以此来显示“学生信息表”窗体：
点击事件生成器后进入到代码窗口，输入代码后，再次点击主窗体界面按钮，则弹出学生信息表窗体：
代码：
PrivateSub录入_cmd_Click()DoCmd.OpenForm"学生信息表"EndSub
点击主窗体界面“学生信息录入”按钮后：
会弹出学生信息录入窗体，这样就可以录入信息了：
以上讲的只是一个小小的实例切入点，应用access窗体来制作属于自己的管理系统很灵活，很方便，也很实用，难度系数较小，适合各种中小型公司及中小型数据库管理系统。
结语：喜欢的请