VFP表单教学案例.docVIP

一、如何建立一个完整的VFP应用程序 建立一个完整的VFP应用程序的操作步骤为： 1. 建立一个项目文件, 将用到的文件添加到项目文件中(或者在项目文件中建立所需的文件), 将其中一个文件设置为主文件。 2. 连编，形成.exe文件，就可以在脱离VFP环境运行。 3. 关闭VFP, 双击.exe文件运行。 下面以求圆的面积为例，来讲生成VFP应用程序的步骤： 1. 建立一个项目文件，文件名为：圆面积.pjx 在其中新建一个程序文件，文件名为main.prg，作为主文件，主文件中的命令语句是运行一个求圆面积的表单文件，表单文件名为：yuan.scx。 将main.prg添加到项目文件中，当然也可以直接在项目文件中建立。将main.prg设置为主文件。在项目管理器窗口中目录树中选择“代码”中的“程序”，如果main.prg是黑体显示的，表明此文件已经是主文件，否则，选定此文件，用“项目”菜单中的“设置主文件”将其设置成主文件。 将表单文件yuan.scx也添加到项目文件中。同样也可在项目文件中直接建立。 （1）Main.prg文件的内容为： Set default to f:\xt 这里f:\xt要根据自己的文件地址写 Do form yuan.scx Read events （2）建立表单文件yuan.scx，运行如下图： 步骤如下： a. 选择 文件- 新建-表单,出现“表单设计器”窗口， b. 添加控件 在 “表单控件”工具栏，选择“标签”按钮，在表单空白处按下鼠标拖动，表单上显示标签控件label1 。同样方法，再做一个标签控件label2,两个文本框控件Text1和Text2,两个命令按钮Command1, Command2,如图分别设置他们的属性。 c.设置对象的属性： 分别选中lable1、label2、Text1、Text2及Command1、command2,按下表分别设置它们的属性： 对象 属性名 属性值 label1 Caption 输入圆的半径： label2 Caption 圆的面积为： Text1 Value 0 Text2 Value 0 Command1 caption 计算 Command2 caption 退出 d编写事件代码 为command1(“计算”按钮）编写click事件代码（即单击“计算”按钮时发生的事件）： 在“表单设计器”中双击“计算”按钮，弹出代码窗口，如下图 我们在该窗口的“过程”列表中选“click”，然后在窗口的编辑区中输入如下代码：r=thisform.text1.valuethisform.text2.value=3.14159*r*rthisform.refresh 同样方法，为command2(“退出”按钮)编写click事件代码： 其中的clear events语句与前面主程序中的read events相对应。在脱离VFP环境运行时，有这句才可以正常退出。 2. 连编，形成.exe文件，就可以在脱离VFP环境运行。 方法是：在项目管理器窗口中，单击“连编”按钮，选择“连编可执行文件”,即可生成.exe文件。 3 关闭VFP, 双击.exe文件运行。 通过这个例子可以看到，编写一个VFP应用程序并没有我们想像的难。 二、设计一个表单，实现求一元二次方程的解。 操作步骤： 1 建立一个表单文件，如下图添加控件，设置控件属性。文本框的Value属性值为0. 2 编写“计算”和“取消”这两个命令代码的click事件代码： （1）“计算”命令代码的click事件代码如下： （2）“取消”命令代码的click事件代码： 3保存表单文件，运行结果如下图： 三、设计一个如下表单，单击按钮显示或隐藏图片按钮。 操作步骤如下： 1 建立一个表单文件，如图添加4个命令按钮控件，设置caption属性; 设置上面按钮的picture属性值为某一张图片。 2 编写事件代码： （1）在form1的初始化init事件中输入： （2）在“显示”按钮的的click中输入： （3）在“隐藏”按钮的click中输入： （4）在“结束”的click中输入： thisform.release 3 保存表单文件，运行。 四、设计一个登录表单，学生的学号和姓名是在一个表文件中存放。 1 建立一个表单文件，如图添加控件，设置caption属性。 2 编写事件代码： （1）表单的load和 unload事件代码如下： （2）在“登录”按钮的click 事件中输入：（绿色的一行，将用于执行一个文件） （3）在“退出”按钮的click 事件中输入： 3 保存表单文件，运行。 五、设计一个如下登录表单，用户名为:abcdef，密码为：123456，用户最多允许输入三次。 1 建立一个表单文件