学生档案维护表单档案学生表格档课件.pptVIP

六.应用表单设计实验- 8 创建“学生档案维护”表单（dawh.scx），并运行表单。 操作步骤: 打开“表单设计器”，在设计器窗口单击鼠标右键，选择“数据环境” →“数据环境设计器” →将表xsda添加到该窗口中。 在 “数据环境设计器”窗口中，将表xsda中的“字段”拖到表单Form1窗体中。 在“表单设计器”窗口中，删去“txt性别”文本框、“chk团员否”复选框，再添加2个标签、1个线条、1个文本框、1个命令按钮和1个单选按扭组。 打开“显示”菜单 →“属性” →定义表单及表单对象的属性。 * 对象 属性名 属性值 Form1 Caption 数据维护 Height 260 Width 400 AutoCenter T Icon C:\Program Files\Microsoft Office\Office\Forms\2052\Distlstl.ico 表单控件的属性设置 * 控件名 属性名 属性值 Optiongroup1 AutoSize T ButtonCount 2 ControlSource Xsda.性别 Height 26 Left 50 Top 136 Width 78 “选项按钮组”控件的属性设置 * 控件名 属性名 属性值 Txt团员否 ControlSource Xsda.团员否 Height 20 Left 62 Top 204 Width 20 “文本框”控件的属性设置 * 控件名 属性名 属性值 CommandGroup1 ButtonCount 7 Height 197 Left 310 Top 48 Width 70 “命令按钮组”控件的属性设置 * 控件名 属性名 属性值 Command1 (命令按钮) Caption 第一个 Height 25 Left 5 Top 5 Width 60 Command2 Caption 上一个 Top 32 其他属性与Command1相同 “7个命令按钮”控件的属性设置 * 控件名 属性名 属性值 Command3 Caption 5 Top 59 其他属性与Command1相同 Command4 Caption 最后一个 Top 86 其他属性与Command1相同 “7个命令按钮”控件的属性设置 * 控件名 属性名 属性值 Command5 Caption 增加 Top 113 其他属性与Command1相同 Command6 Caption 删除 Top 140 其他属性与Command1相同 Command7 Caption 退出 Top 167 其他属性与Command1相同 “7个命令按钮”控件的属性设置 * 操作步骤: 打开“显示”菜单 →“代码” →“代码编辑”窗口。 定义Command1对象的Click事件代码： go top this.enabled=.f. thisform. commandGroup1. command2. enabled=.f. thisform. commandGroup1. command3. enabled=.t. thisform. commandGroup1. command4. enabled=.t. thisform. refresh * 定义Command2对象的Click事件代码： skip -1 if bof() messagebox(“已是第一个记录”，48，“信息窗口”) this. enabled=.f. mand1.enabled=.f. else this. enabled=.t. thisform. mand1.enabled=.t. endif thisform. mand3.enabled=.t. thisform. mand4.enabled=.t. thisform. refresh * 定义Command3对象的Click事件代码： skip if eof() messagebox(“已是最后一个记录”，48，“信息窗口”) this. enabled=.f. mand4.enabled=.f. skip -1 else this. enabled=.t. mand4.enabled=.t. endif mand1.enabled=.t. mand2.enabled=.t. thisform. refresh *