《制作系统界面》由会员分享，可在线阅读，更多相关《制作系统界面（83页珍藏版）》请在金锄头文库上搜索。
1、,进一步研究项目设计方案 设计程序 制作界面,主要内容,各公司对项目设计方案再一次仔细研究，学生相互探讨，相互学习，设计出系统所需界面的版面,进一步研究项目设计方案,返 回,在前面各讲中，我们主要用菜单和命令方式操作数据库，但是要开发有实用价值的系统，必须采用程序设计方法。Visual FoxPro的程序设计包括结构化程序设计和面向对象程序设计。前者是传统的程序设计方法，主要用于过程和函数的编写，后者借助系统提供的辅助工具实现界面设计。在面向对象程序设计中，需要为对象编写事件代码，也要用到结构化程序设计的方法。就此而言，结构化程序设计是面向对象程序设计的基础。,设计程序,什么是程序? 程序是能
2、够完成一定任务的命令的有序集合。这组命令被存放在称为程序文件或命令文件的文本文件中。当运行程序时，系统会按照一定的次序自动执行包含在程序文件的命令。 程序方式的特点是什么? 可以利用编辑器，方便地输入、修改和保护程序；可以用多种方式、多次运行程序；可以在一个程序中调用另一个程序。 程序与交互操作的区别是什么? 交互操作一次只能执行一条命令，而程序一次能运行多条命令；程序文件一旦编成，即可长期保存并且可多次运行，而再次执行交互操作需重新输入命令；程序方式可以完成一些复杂的任务，而交互操作的功能是有限的。,程序中常用的几条命令,1、清除屏幕命令 命令格式：CLEAR 功能：清除屏幕上显示的信息 2
3、、注释命令 命令格式： NOTE * & 功能：程序的说明性语句，不执行 3、允许或不允许系统自动显示提示信息命令 命令格式： Set talk on|off 4、返回语句 命令格式： return 功能：返回系统调用本程序的位置,程序中常用的几条命令,5、INPUT命令 命令格式： INPUT TO 功能：该命令等待用户从键盘输入数据，用户可以输入 任意合法的表达式。当用户以回车键结束输入时，系统 将表达式的值存入指定的内存变量，程序继续运行。,INPUT“请输入圆的半径:“ TO R L=2*3.14*R S=3.14*R2 ?“半径为:“+ALLTRIM(STR(R)+“的圆的周长和面积
4、如下:“,程序中常用的几条命令,6、ACCEPT命令 命令格式： ACCEPT TO 功能：该命令等待用户从键盘输入字符串。当用户以回车键结束输入时，系统将该字符串存人指定的内容变量，程序继续运行。,USE xsqk .dbf accept “请输入姓名:“ to xm locate for 姓名= xm ?姓名,学号 Use,程序中常用的几条命令,7、WAIT命令 命令格式： WAIT TO 功能：该命令显示字符表达式之值作为提示信息，暂停程序的执行，直到用户按任意键或单击鼠标时继续程序的执行。,use xsqk.dbf list for 性别=“男“ wait “按任意键显示女学生的情况“
5、window timeout 15 list for 性别=“女“ use,程序文件的建立与执行,以命令方式建立、编辑程序文件 命令格式： MODIFY COMMAND | ? MODIFY FILE | ?,例1： 编写一个计算半径为10米的圆的周长和面积的程序，程序文件名为LS1.prg。,R=10 L=2*3.14*R S=3.14*R2 ?L,S,运行程序文件,方法1：菜单方式： 程序运行,打开“运行”对话框 从文件列表框中选择要运行的程序文件，并单击“运行”命令按钮 方法2：命令方式 命令格式：DO WITH 注意：DO命令默认运行.PRG程序， DO命令中的只需输入主文件名。要运行
6、其它程序，中须包括扩展名,程序的基本结构-顺序结构,执行过程： 按照语句排列的先后顺序依次执行，即从第一条执行到最后一条。,分支结构是在程序执行时，根据不同的条件，选择执行不同的程序语句，用来解决有选择、有转移的诸多问题。,分支结构,原理：首先判断的逻辑值，若条件为“真”时，执行。然后，再执行Endif后面的。若条件为“假”时，执行Else后面的。然后，再执行Endif后面的。,分支语句的嵌套 对于二分支以上的问题，需要使用分支语句的嵌套或多重分支选择结构。要求各个层次的IF语句之间不能交叉，每一层的If、Else以及EndIf必须一一对应。,use XSQK CLEAR Text 1.添加
7、2.修改 3.打印 Endtext input “请选择:“ to op DO CASE CASE OP=1 APPEND,循环结构 循环结构也称为重复结构，是指程序在执行的过程中，其中的某段代码被重复执行若干次。 被重复执行的代码段，通常称之为循环体。,循环结构,1、条件循环 DO WHILE LOOP EXIT ENDDO,说明1：在循环体中如遇到Loop短路语句，就不执行Loop与Enddo之间的所有语句，直接返回Do While循环起始语句，继续进行循环判断 ，如图所示：,说明2：在循环体中如遇到Exit命令，就强行退出循环，即不执行Exit与EndDo之间的所有语句，直接转向执行En
8、dDo语句后面的命令，结束循环。如图 所示 ：,例9：计算s=1+2+3+10000的和,名为sumdo.prg。,set talk off Clear sum=0 i=1 Do while i=10000 sum=sum+i i=i+1 Enddo ?“s=“,sum set talk on,注意： 随机次数的循环Do While .T. 随机次数的循环也称“永真”循环是用于进行随机次数的循环场合。它适合在数据表中，进行任意次数的查询、修改、增加、删除记录的操作。“永真”循环通常由操作者在需要时，用Exit命令来强制退出循环。,有限循环do While K=N 用于已知循环次数的场合，常用于
9、数值计算和图形显示。,库扫描循环Do While Not.Eof() 用于未知循环次数的场合，适合在数据表中进行统计。通常用SKIP（CONTINUE）命令来移动记录指针，用文件尾函数控制循环。当函数Eof()的值为.F.时，执行循环体。当EOF()的值为.T.时，终止循环,Clear All Use F:密码验证表 Count=1 Pwd=Space(9) Do While Count=3 ?“请输入准考证号：“ Set Console Off Accept To Pwd Set Console On Locate For 准考证号=Pwd If Found() Messagebox(“欢迎
10、使用学生成绩查询系统！“,48) Exit,Else If Count=3 Messagebox(“准考证号错！重输入“,48) Else Messagebox(“对不起，你不是合法用户！“,48) Exit Endif Endif Count=Count+1 Enddo Return,例10： 编程设计一个口令验证程序，只给三次机会,说明: 1、的值可正可负，默认值为1。 2、 和都可以是数值表达式。但这些表达式仅在循环语句执行开始时被计算一次。在循环语句的执行过程中，初值、 终值 和步长是不会改变的。 可以在循环体内改变循环变量的值，但这会影响循环体的执行次数。,例11、 用步长循环编写计
11、算s=1+2+10000的程序,Clear s=0 i=1 for i=1 to 10000 s=s+i endfor ?“s=:“,s &编写s=1+3+5+9999,3表文件扫描循环 SCAN FOR WHILE ENDSCAN,执行过程,说明： 1、Scan循环是内含Eof（）和Skip的一种循环处理。Scan为循环入口，EndScan为循环出口，必须配套使用。两者之间的内容即为循环体。,2、Scan 循环是针对某个数据表的操作，可以在语句中说明数据表的作用范围和For条件表达式，其意义是仅对指定范围满足For条件表达式的记录执行循环体语句操作。,3、执行循环体内容后，若遇到Loop语句
12、，记录指针移到下一条记录，返回Scan循环入口。若遇到Exit语句，强行结束扫描循环，执行EndScan后面的语句。,4、当For条件表达式为多个条件或进行多分支处理时，应在Scan循环内嵌套Do Case或If分支选择语句。,例13、 在学生档案表中，显示高考成绩大于520分的学生学号、姓名、籍贯和高考成绩并统计其个数。,Close all Clear Use F:学生档案表 Store 0 To S Scan For 高考成绩520 ?“学号：“+学号+Space(2)+“姓名：“+姓名+Space(2)+“籍贯：“+籍贯+Space(2)+“高考成绩：“+Str(高考成绩,5,1) S=
13、S+1 EndScan ? “高考成绩大于520分学生人数有：“+Str(S,3)+“人“ Return,多重循环,一个循环的循环体中又有另外一个循环时，称为多重循环，VFP程序可以使用多重循环。,返 回,表单（Form）是Visua FoxPro提供的用于建立应用程序界面的最主要的工具之一,创建表单方式： 1使用表单向导创建表单 ： 文件 新建命令，“ 工具” 菜单的“ 向导” 子菜单中选择“ 表单” 在项目管理器调用表单向导 2. 使用表单设计器 可以使用下面三种方法中的任何一种调用表单设计器： a、在项目管理器环境下调用b、 菜单方式调用c、命令方式调用 3.在命令窗口输入命令:CREA
14、TE FORM 表单名 4.在表单设计器环境下，可以调用表单生成器方便、快速地产生表单,利用表单设计器创建表单分为四步骤： 1打开表单设计器 方法1：在命令窗口中输入Create Form命令或在命令窗口中输入MODIFY FORM 表单名，进入表单设计器，建立或修改已存在的表单。 方法2： 执行文件新建，从“新建”对话框中选定“表单”、单击“新建表单”，进入表单设计器,方法3：执行文件打开，在“打开”对话框中，选择要打开的项目文件，在“项目管理器”窗口中，“新建表单”对话框中，单击“新建文件”按钮，进入表单设计器。,按钮锁定与生成器,表 单,表单的类型,子表单 子表单是包含在其他窗口之中的一
15、种表单，主要用于建立多文档界面（MDI）的应用程序。 浮动表单 浮动表单同子表单一样，同样隶属于某一父表单（主表单）。但是，它并不包含在父表单之中，可以移动到父表单之外而显示于Windows桌面上。 顶层表单 顶层表单是一个没有父表单的独立表单。主要用于创建一个单文档界面（SDI）的应用程序，或者作为一个MDI应用程序中父（主）表单。,创建顶层表单 1创建SDI菜单 SDI菜单是出现在单文档界面（SDI）窗口的菜单。具体方法 是： 从“菜单设计器”的“显示”菜单中选择“常规选 项”, 从打开的“常规选项”对话框中选择“顶层表单”。 2菜单应用到表单 在“显示” “常规选项”对话框中，选择“顶层
16、表单”复 选框。在表单设计时，将表单的Show Window属性的值设置为 ，使其成为顶层表单。在表单的Init 事件或Load事件中， 添加调用菜单程序文件的命令：DO with this,“菜单名”。在表单的destroy事件中，添加释放 菜单的命令。,标签（Label）控件,文本框控件,命令按钮控件,命令按钮控件,常用事件和方法,提示：首先将课程代码表添加到数据环境中。而后，利用数据环境设计器，将有关的字段拖曳到表单的适当的位置上，直接创建表单对象,编辑框,编辑框（Edit）和文本框一样，是用来输入、输出和编辑字符型数据的对象。不同的是，编辑框允许输入、输出多段文本，允许自动换行。因此，特别适合备注型字段的输入、输出和编辑。编辑框具有剪切、复制、粘贴等编辑特性，利用编辑框可以很方便地处理备注字段。,命令按钮组控件,列表框控件,组合框,页 框,例 设计一个页框，第一页面浏览学生信息，数据环境为学生档案表。第二页面浏览学生成绩，数据环境为学生
