Visual FoxPro数据库程序设计实训指导实验8 表单设计.pptVIP

8.2　实验内容 8.2.4　表单控件的使用 命令按钮组的使用 2 (3)添加命令按钮组控件，并设置其属性。 8.2　实验内容 8.2.4　表单控件的使用 命令按钮组的使用 2 (4)命令按钮组Commandgroup1中各按钮的事件代码如下： Command1的Click事件代码： THISFORM.Width=THISFORM.Width+20 Command2的Click事件代码： THISFORM.Width=THISFORM.Width—20 Command3的Click事件代码： THISFORM.Height=THISFORM.Height+20 Command4的Click事件代码： THISFORM.Height=THISFORM.Height—20 8.2　实验内容 8.2.4　表单控件的使用 命令按钮组的使用 2 (5)表单Example的相关事件代码如下： Example的Click事件代码： THISFORM.BackColor=RGB(0,0,0) Example的RightClick事件代码： THISFORM.BackColor=RGB(192,192,192) (6)保存、运行表单。 8.2　实验内容 8.2.4　表单控件的使用 标签和文本框的使用 3 　　【例8\|7】设计一个能接受口令的表单。文本框用来输入口令（口令在屏幕上显示为相同个数的*号），如口令正确，则显示“欢迎使用!”，并出现一个关闭按钮；否则显示“对不起，口令错！”。 8.2　实验内容 8.2.4　表单控件的使用 标签和文本框的使用 3 设计步骤如下： (1)执行命令CREATE FORM，打开“表单设计器”窗口。 (2)在表单上添加控件：1个文本框、2个标签和1个命令按钮控件。 (3)属性设置：见表。 对象 属性 属性值 说明 Form1 Caption 输入口令 按钮访问键为Q Command1 Caption 关闭(\\Q) TabStop .F. Visible .F. 对象属性设置表 8.2　实验内容 8.2.4　表单控件的使用 标签和文本框的使用 3 对象 属性 属性值 说明 Label1 Caption 请输入您的口令： AutoSize .T. FontName 黑体 FontBold .T. FontSize 18 Label2 AutoSize .T. FontName 隶书 FontBold .T. FontSize 18 对象属性设置表 8.2　实验内容 8.2.4　表单控件的使用 标签和文本框的使用 3 对象 属性 属性值 说明 Textl PasswordChar * 内容显示为*号 Value (无) FontName 宋体 FontSize 14 对象属性设置表 (4)编写事件代码。 (5)保存、运行表单，运行后的表单。 8.2　实验内容 8.2.4　表单控件的使用 选项按钮组和复选框的使用 4 　　【例8-8】设计一个表单，表单运行后的窗口。可利用两个选项按钮组来控制输入文本的字体颜色和背景颜色，利用复选框来控制字体风格。 8.2　实验内容 8.2.4　表单控件的使用 选项按钮组和复选框的使用 4 　　设计步骤如下： 　　(1)执行命令CREATE FORM，打开“表单设计器”窗口。 　　(2)为表单添加控件：1个文本框控件、2个标签控件、2个选项按钮组控件、3个复选框控件以及1个命令按钮控件。 8.2　实验内容 8.2.4　表单控件的使用 选项按钮组和复选框的使用 4 (3)设置属性：见表。 8.2　实验内容 8.2.4　表单控件的使用 选项按钮组和复选框的使用 4 8.2　实验内容 8.2.4　表单控件的使用 选项按钮组和复选框的使用 4 (4)Optiongroupl的Click事件代码： DO CASE CASE THIS.Value=1 THISFORM.Text1.ForeColor=THIS.Option1.BackColor CASE THIS.Value=2 THISFORM.Text1.ForeColor=THIS.Option2.BackColor CASE THIS.Value=3 THISFORM.Text1.ForeColor=THIS.Option3.BackColor ENDCASE Company Logo Company Logo Company Logo Company Logo Company Logo Company Logo Company Logo Company Logo Company Logo 实验8　表单设计 8.1　实验目的 (1) 掌握利用表单向导创建表单的方法。 (2) 掌握利用表单设计器创建和修改表单的方法。 (3) 掌握如何设