《visualfoxpro程序设计：属性、事件代码的编写》由会员分享，可在线阅读，更多相关《visualfoxpro程序设计：属性、事件代码的编写（30页珍藏版）》请在金锄头文库上搜索。
1、1,本次课的教学内容： 5.5 常用控间的使用 本次课的教学目的与要求： 1、标签、文本框、编辑框、微调按钮 2、列表框、计时器、图像 本次课的教学重点与难点： 重点：属性、事件代码的编写 难点：事件代码的编写 讲授课时：2学时,2,常用控件,3,一、标签（Label控件),标签用以显示文本。显示内容可通过Caption属性设置。 一般被设置的属性为： 1、Caption:可通过代码设置在运行时改变其值，注意数据类型只能是字符型 2、Autosize:自动调整标签大小 3、Alignment:标签文本在控件中的对齐方式 0：左对齐（默认方式）； 1：右对齐；2：居中对齐,4,4、BackCol
2、or:标签背景色 5、BackStyle:设置标签是否透明，如果透 明，则BackColor设置无效 6、Font开头的属性用来设置显示内容的字体属性，如红色宋体字等 7、ForeColor:标签显示内容的颜色 8、标签位置设定Left/Top/Width/Height，一般用布局工具栏 9、Visible:标签隐藏否，可编程控制,5,标签控件事件方法,1、Click事件:点击该标签时发生，在里面写上你要执行的代码， 2、DblClick事件:双击该标签时发生 3、MouseMove事件:当鼠标移动到该标签上时发生,6,控件布局,选取多个控件时设置,选定单个控件也可设置,7,例1 设计一应用程
3、序封面 例2 设计一封面上有蓝色椭圆，点击时变红色，放开时变绿色，椭圆中有黄色文字“中南林学院”字样。,8,二、命令按钮（CommandButton控件),主要用来启动某个事件、完成特定功能。 如：添加记录，移动记录，退出表单等 常用属性： Caption、Default(可用Enter键确认)、Cancel（可用Esc键取消）、Enabled(能否被选择或响应)、Picture(图片按钮） 常设置的事件： Click、RightClick、DoubleClick,9,三、命令按钮组（CommandButton控件),包含多个命令按钮的容器控件。 常用属性： ButtonCount(按钮数目）
4、、 Buttons（按钮数组,buttons(n)代表第n个按钮）Value(指定命令组当前选定状态。可为数值或字符型。若为数值n,表示第n个按钮被选定） 常设置的事件： Click,10,例：如图所示，在表单中设置一组按钮，可完成对应功能。,操作步骤： 1、添加标签和文本框，一组命令按钮,并在环境中打开sb表 2、设置外观格式 3、对按钮组添加代码 P230 do case case this.value=1 . case this.value=2 .,11,四、文本框（TextBox控件),利用它可在内存变量、数组元素或非备注字段中输入或编辑数据。 一般被设置的属性为： ControlSo
5、urce:为文本框指定一个字段或变量。运行时显示变量值，也可修改。 Value:用户输入的值，如果要限制输入类型，设计时先赋初值。如初值为，则只能输入日期 PasswordChar: 若文本框输入密码，输入时不想让别人知道，可输入指定字符。如“*”，真正内容保存在Value中。,12,InputMask:指定在一个文本框中如何输入和显示数据，即模式匹配格式。如此处输入6个“!”，则只能输入6个大写字母。 Centruy、Hours、Seconds和DateFormat设置日期格式,13,文本框控件事件,文本框控件事件，除了与标签相同的事件以外，有自己几个特有事件。 名字解释：焦点-表单中有多个
6、对象时，任一时刻只能有一个对象被激活，当光标进入该对象时，叫该对象获得焦点，光标离开该对象时，叫该对象失出焦点， 要使某一对象获得焦点则调用其方法Setfocus(),获得焦点时发生When事件，失去焦点时发生Valid事件,14,文本框控件事件,1、When事件：当光标进入文本框时发生 2、Valid事件：当光标离开文本框时发生 3、SetFocus事件：使文本框获得焦点,15,Text有三个超级属性：Selstart,Sellength,Seltext，这三个属性设计时不可用，运行时，当按左键选择了一 段文字，这三个属性的值记下了选择字符的情况。 例1 设计一表单，两文本框，要求：在第一文
7、本框输入字符，选择其中一段，拷贝到第二文本框中。 步骤： 1）生成两文本框 2）选Text1中的Valid事件， thisform.text2.value=this.seltext 或者 选Text2中的When事件， this.value=thisform.text1.seltext 3)运行表单,16,例2 设计一个登录界面，指定用户名为user1,password为：1234,步骤：1、创建表单，添加一些控件 2、设置Caption属性，命令按钮的default属性, 文本框的PasswordChar还可设置其Inputmask 3、为确认命令按钮添加Click事件 4、如要统计输入次数
8、，需添加一个属性存储计数值，并将其默认值设置为数值,mao11,17,18,五、选项组控件（OptionGroup),包含多个选项按钮，但只能选择一个，被选中按钮显示一个圆点,常用属性：ButtonCount、Value、ControlSource、enabled 常用事件 P240,19,例：设计一选项组，能进行表单背景的选择 P240,8.scx,20,六、复选框,用于标记一个两值状态 如：真或假，当为真时，框内显示,否则,显示空白。,常用属性： caption value ControlSource,21,例、统计新生有多少人,form9.scx,store 0 to bm1,bm2,b
9、m3,bm4 if thisform.check1.value=1 count for 考生类别=“城镇应届” to bm1 endif if thisform.check2.value=1 count for 考生类别=“城镇往届” to bm2 endif if thisform.check3.value=1 count for 考生类别=“农村应届” to bm3 endif if thisform.check4.value=1 count for 考生类别=“农村往届” to bm4 endif thisform.label1.caption=共有：+str(bm1+; bm2+bm3
10、+bm4,2)+人。,22,23,七、编辑框（Editbox),可编辑长文本或备注字段，利用它可选择、剪切、复制文本。,24,编辑框与文本框的主要区别： 1、编辑框只能用于输入或编辑文本数据，即字符型数据；而文本框可适用于数值型等4种类型的数据。 2、文本框只能供用户键入的一段数据；而编辑框能输入多段文本，即回车键不能终止编辑框的输入。,25,例：设计一个表单，要求当文本框得到焦点时能立即显示在编辑框中选定的文本。 步骤： 1)创建表单，在表单上创建一文本框 和一编辑框。 2) edit1编辑框的lostfocus事件代码编写如下： This.Hideselection=.f. 3)Text1
11、文本框的gotfocus事件代码编写如下：This.value=thisform.edit1.seltext 4)执行表单,26,另：清除在edit1编辑框中选定的文本： Thisform.edit1.seltext=“ “ 将edit1编辑框中选定的文本送剪贴板： _cliptext=thisform.edit1.seltext,27,八、列表框（ListBox),显示的是一组项目,而不是可以编辑的文本。用户可从中选择一个或多个条目。还可配合滚动条浏览。,常用属性： （教材P241） 常用事件：KeyPress DblClick Click,28,九、组合框（ComboBox),与列表框类似
12、,提供一组条目供用户选择。但只有一个条目可见,可通过下拉按钮选择其它项，而且也只能选择一项，不能多选。,组合框有：下拉列表框和下拉组合框两种。 前者只能在列表选择，后者还可从编辑框输入。,常用属性与列表框类似： RowSourceType、RowSource、Value等 常用事件：InteractiveChange（更改值时发生）,15.scx,29,例1 将一列表框中选定拷贝到另一列表框中。,例2 建立一表单，在表单上创建一组合框，一列表框和一按钮，按一下按钮，从组合框中移动一列表项到列表框中。,30,作业： 一、书面作业 Visual Foxpro程序设计上机与考试指南中P197考试练习题八、考试练习题九。 二、磁盘作业 在表单上制作一标签、一命令按钮和一文本框，要求文本框初始内容为今年元旦，光标进入时自动变成今日日期，光标离开时今日日期显示在标签中,
