实验一、Ⅴ isual FoxPro60的启动、退出和工作环境设置 面向对象圆方程序设计 实验目的 1、掌握ⅤFP的启动与退出方法 2、能正确操作和设置FP窗口菜单、工具栏和工作环境设置 3、用表单设计器设计面向对象圆方程序,进行程序调试、运行体会面向对象程序的特 点 实验操作步骤 1、VFP的启动与退出方法 (1)、启动ⅤFP ①、由“开始”——“程序” Microsoft visual Foxpro 6.0 “ Microsoft visual Fox Pro60”启动 ②、在 Windows桌面上建立ⅤFP快捷方式图标,用鼠标左键双击启动ⅤFP (2)、退出ⅤFP ①、关闭VFP窗口退出Ⅴ sual Foxpro ②、在VFP命令窗口输入命令:Qut回车 2、VFP窗口定制与工作环境设置 (1)、菜单命令的调用 (2)、工具栏的设置 (3)、命令窗口的启用与隐藏 (4)、VFP帮助的使用 (5)、配置VFP—“工具”菜单一—“选项”对话框 3、面向对象圆方程序设计 (1)、执行“文件”菜单下的新建一一选择新建“表单”一一单击“新建”一一进入表 单设计器; (2)、选择“显示”菜单下“表单控件工具栏”显示表单控件工具栏;选择“显示” “属性”显示属性窗口 (3)、在空白表单上新建以下对象:标签对象( labell)、形状对象( Shapel)、三个单命 令按钮( Command 1、 Command2、 Command3) 标签( labell)属性不变。形状对象属性只改高( Height):120,宽( Width):120 三个命令按钮的属性及事件代码如下 Command 1的Name属性为 Circle, Caption属性为“圆” Command2的Name属性为Obox, Caption属性为“方框” Command3的Name属性为 Close, Caption属性为“关闭” 圆命”令按钮的Clck事件代码为: thisform. shapel fillstyle=0 thisform. shapel curvature=99 thisform. shapel fillcolor-rgb(255,0,0) thisform. labell caption="LAl 方框”命令按钮的Cick事件代码为 thisform. shapel fillstyle=0 thisform. shape l curvature=0
实验一、Visual FoxPro 6.0 的启动、退出和工作环境设置 面向对象圆方程序设计 一、实验目的 1、 掌握 VFP 的启动与退出方法; 2、 能正确操作和设置 VFP 窗口菜单、工具栏和工作环境设置; 3、 用表单设计器设计面向对象圆方程序,进行程序调试、运行体会面向对象程序的特 点。 二、实验操作步骤 1、 VFP 的启动与退出方法 (1)、启动 VFP ①、由“开始”——“程序”——“Microsoft Visual FoxPro 6.0”——“Microsoft Visual FoxPro 6.0”启动。 ②、在 Windows 桌面上建立 VFP 快捷方式图标,用鼠标左键双击启动 VFP。 (2)、退出 VFP ①、关闭 VFP 窗口退出 Visual FoxPro ; ②、在 VFP 命令窗口输入命令:Quit 回车。 2、 VFP 窗口定制与工作环境设置 (1)、菜单命令的调用 (2)、工具栏的设置 (3)、命令窗口的启用与隐藏 (4)、VFP 帮助的使用 (5)、配置 VFP——“工具”菜单——“选项”对话框 3、 面向对象圆方程序设计 (1)、执行“文件”菜单下的新建——选择新建“表单”——单击“新建”——进入表 单设计器; (2)、选择“显示”菜单下“表单控件工具栏”显示表单控件工具栏;选择“显示”— —“属性”显示属性窗口。 (3)、在空白表单上新建以下对象:标签对象(label1)、形状对象(Shape1)、三个单命 令按钮(Command1、Command2、Command3)。 标签(label1)属性不变。形状对象属性只改高(Height):120,宽(Width):120。 三个命令按钮的属性及事件代码如下: Command1 的 Name 属性为 Ocircle,Caption 属性为“圆” Command2 的 Name 属性为 Obox,Caption 属性为“方框” Command3 的 Name 属性为 Close,Caption 属性为“关闭” “圆命”令按钮的 Click 事件代码为: thisform.shape1.fillstyle=0 thisform.shape1.curvature=99 thisform.shape1.fillcolor=rgb(255,0,0) thisform.label1.caption="圆" “方框”命令按钮的 Click 事件代码为: thisform.shape1.fillstyle=0 thisform.shape1.curvature=0
thisform. shapel. fillcolor=rgb(255, 255, 255) thisform. labell caption="方框 “关闭”命令按钮的Cick事件代码为: thisform release 计器-园与方 回x 河圆 回凶表单控件 Label 圃圓 睏图 万 关闭 程序运行结果为: 叫xp因与方程 方
thisform.shape1.fillcolor=rgb(255,255,255) thisform.label1.caption="方框" “关闭”命令按钮的 Click 事件代码为: thisform.release 程序运行结果为: