2013-1VFP第10部分(数据库与表基本操作)课件.ppt

Visual Foxpro 6.0;要点： 1.掌握表中的数据类型 2.掌握基于数据表的表单设计方法 3.掌握数据表中指针定位命令、 数据的更新命令、数据删除命令 4. 了解记录数据与数组之间的传递;基于数据表的表单设计方法;⑤ 设置表单中各个控件的默认操作顺序； ⑥ 设计对象的事件驱动程序，也就是这些事件一旦发生，将完成什么功能； ⑦ 将其他的菜单、工具栏与表单联系在一起，用一个主程序驱动，就构成一个完整的Windows应用程序。;(教材P108) 【例4-10】建立如表4.4所示的数据表：管理员.dbf，设计如图所示的系统图书管理系统的登录表单。将表单中的组合框与数据表中的用户名字段绑定。; 在表单空白处单击右键，在快捷菜单中选择“数据环境”，弹出“打开”对话框，选择管理员.dbf，单击“确定”按钮，在弹出的“添加表或视图”对话框中可以选择并添加多个数据表，在这里我们选择“关闭”按钮，则数据表成功添加到表单中，如图所示。 ;〖温馨提示〗在该对话框中可以只选择姓名字段，或只选择管理员编号，为了避免错误的选择管理员，最好两个字段都选择。 ;表单执行后， ①选择一用户名，输入密码，如果密码正确（与数据表中的密码字段对应），单击“进入系统”按钮，可以调用系统主菜单“图书管理系统菜单.MPR”(该菜单的设计在第8章完成); ②如果密码不正确，最多允许输入3次，每次给出错误提示，如果3次均不正确则直接退出系统，返回操作系统； ③单击“退出”按钮，可以退出本系统，返回操作系统。 ; 通常情况下， ①文本框text、组合框combo等可以作为输入类的控件； ②标签label、文本框、编辑框edit、列表框list、表格grid、图像、Active绑定控件等作为输出类的控件； ③命令按钮command、命令按钮组commandgroup、复选框check、选项按钮组optiongroup、计时器timer可以作为控制类的控件。 ;数据表中记录指针的定位 ; 在Visual FoxPro 系统环境下，表中的每一列数据是通过字段名来标识的，而每一行数据是通过记录号来标识的。; 在Visual FoxPro 系统内部，有一个用以确定当前记录的记录指针，记录指针指向哪一个记录，这一个记录就是当前操作的记录，即当前记录。当表打开时，当前记录为第一个记录。可以用函数recno()来测试当前记录号。; 每一个数据表都有开始和结束标志，可以用函数bof()和eof()来测试。;在一个空表中，bof( )和 eof( )的值为：.T.； recn( )的值为1。; 利用命令进行记录定位：绝对定位和相对定位 1. 绝对定位 ;(教材P117) 【例5-1】在“图书信息管理”项目中建立一个管理图书信息的表单，保存为“图书信息.scx”，实现“首记录”、“末记录”按钮的功能，使得表单上能够看到图书表的第一条记录或最后一条记录。 ;表示commandgroup1;2. 相对定位 ;【例5-2】 打开【例5-1】的图书信息.scx表单，进一步完善表单的功能，实现“上一条”、“下一条”按钮的功能，使得表单上能够逐一查看“图书”表的所有记录。 ;修改Commandgroup1命令按钮组click事件代码，为原多分支case语句增加两个判断分支，代码如下： case this.value=2 skip -1 if bof() go top messagebox(已经是第一条记录。) endif case this.value=3 skip if eof() skip -1 messagebox(已经是末记录。) endif ;记录的维护 ;append [blank];【例5-3】在“图书信息管理”项目中建立如图所示的管理读者信息的表单，保存为“读者信息维护.scx”，单击“添加读者”按钮，可以通过表单录入新的读者信息。 ;“添加读者”命令按钮的Click事件代码如下： choice=messagebox(确认添加新读者？,4+32+256,确认) if choice=6 append blank endif thisform.refresh ;用SQL命令添加记录;表格（Grid）;1、表单数据环境中添加了数据表，表格控件会显示该数据表的内容 ;2、表单数