关系数据库基础电子教案电子课件基于单表用户界面设计.docVIP

用户界面（窗体）设计-课程部分（1） 目标1：快速使用向导完成界面设计 方法：使用向导。 目标2：1、改变窗体的标题。2、增加浏览数据的按钮，3、在按钮上增加快捷键，4、在窗体上增加“课程管理”题目，字号24，字体为粗体。 方法：修改向导生成的界面（即窗体）。步骤： 1、修改窗体的标题“课程1”为“课程管理”。 方法：在设计视图中，将鼠标放在窗体的位置，打开属性窗口，然后在下拉表中选择窗体，将标题中的“课程1”修改为“课程管理”。 2、增加浏览数据的按钮：最前、向前、向后、最后，退出。 使用向导完成，注意可以改变按钮名字。 3、在按钮上增加快捷键 如果需要在“最前”按钮上增加快捷键，则选中该按钮，然后在“前”字的后面输入F即可。执行时按“ALT-F”时，则执行“最前”的按钮。 4、在窗体上增加“课程管理”题目，字号24，字体为粗体。 在工具栏中选择标签控件，修改标题为“课程管理”。 目标3：增加查询、维护数据的功能。在课程简介部分增加选项组，修改选项组的名字为：课程简介。选择效果，让其有立体感。 目标4：在数据维护按钮周围增加方框，并凹进去（有立体感）： 目标5：使窗口不能最大化。 方法：选择窗体左上角的方格，然后打开“属性”窗口，将“最大最小化按钮”的值修改为“最小化按钮”。 目标6：使窗口不能最大化与最小化。 目标7：删除导航条。 方法：打开窗体的属性窗口，将“导航按钮”的值修改为“否”。 目标8：消除窗体的滚动条、记录选定器、导航按钮和分隔线 目标9：消除窗体页眉页脚。 在“视图”菜单中选择“窗体页眉页脚” 目标10：改变控件顺序。 目标11：完善课程窗体。获得光标（亦称焦点）位置 在“课程”窗体时，点“录入”按钮后，没有光标位置。现在解决该问题，在单击“录入按钮后，自动将光标置于“课程号”控件的位置上。 方法：打开“录入”按钮的属性窗口，点击“事件”标签，然后选择“单击按钮”右侧的按钮。添加一行脚本Me![课程号].SetFocus “录入“按钮的脚本如下： Private Sub Command25_Click() On Error GoTo Err_Command25_Click DoCmd.GoToRecord , , acNewRec Me![课程号].SetFocus Exit_Command25_Click: Exit Sub Err_Command25_Click: MsgBox Err.Description Resume Exit_Command25_Click End Sub 测试，按“录入”按钮后，自动将光标位置置于要输入的课程号位置。 目标12：在录入一行数据后，保存时没有反馈是否成功保存的信息。解决：在按“保存”按钮时给用户一个反馈信息。显示“保存成功”。 方法：选中“保存”按钮，鼠标右键，选中“属性”。 点击“单击”右侧的…按钮，打开代码窗口： 在DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70语句下面增加一行语句： MsgBox (已成功保存！), vbExclamation /*显示带感叹号图标的消息框*/ 测试：用课程界面输入数据，然后按保存按钮，则显示： 目标13、完善“课程”窗体。在录入数据时，按“放弃”按钮后，会给出要求用户确认的按钮，如果选择确定，则放弃，否则不放弃。并且置焦点位置。 解决方法：修改“放弃”按钮的单击脚本： Private Sub Command26_Click() On Error GoTo Err_Command26_Click If MsgBox(确实需要放弃吗？, vbYesNo, 课程管理界面) = vbYes Then DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70 Me![CouNo].SetFocus End If Exit_Command26_Click: Exit Sub 目标14、完善“课程”窗体。在按“删除”按钮后，会给出要求用户确认删除的信息“确实需要删除吗”如果选择确定，则放弃，否则不放弃。并且置焦点位置。 输入IF行和ENDIF行，其中“删除数据”为显示的确认窗口的名字。 如看代码，按下面的按钮： 数据库原理与应用 2005-2006-1学期 05级 8