数据库及程序有效设计第7章表单有效设计和有效应用.pptVIP

数据库及程序有效设计第7章表单有效设计和有效应用 【例】设计表单计算并显示1+2+3+…+100的累积和。 s=0 for i=1 to 100 s=s+i Endfor thisform.text1.value = alltrim(str(s)) 7.5.4 命令按钮组（CommandGroup）控件 1．命令按钮组功能 命令按钮组是包含一组命令按钮的容器控件，用户可以单个或作为一组来操作其中的按钮。 2．命令按钮组常用属性 Buttoncount：命令按钮组中命令按钮的数目。 Value：默认情况下，命令按钮组中的各个按钮被自动赋予了一个编号，如1，2，3，等，当运行表单时，一旦用户单击某个按钮，则Value将保存该按钮的编号，于是在程序中通过检测Value的值，就可以为相应的按钮编写特定的程序代码。如果在设计时，给Value赋予一个字符型数据，当运行表单时，一旦用户单击某个按钮，则Value将保存该按钮的Caption属性值。 Buttons：用于存取命令按钮组中每个命令按钮的数组，代码中可以通过该数组访问命令按钮组中的各个按钮. 【例】在表单上有一个命令按钮和命令按钮组，该命令按钮组包括3个命令按钮。 当单击命令按钮组中某个按钮时，命令按钮组的背景色变成相应按钮指定的颜色；单击还原命令按钮，命令按钮组背景色还原成默认的颜色，其界面如图所示。 操作步骤： （1）选择控件 本例中使用一个命令按钮组控件和一个命令按钮控件。 （2）属性设置 命令按钮组默认的命令按钮个数为2个，如果要添加更多命令按钮，方法如下。 a.用鼠标右键单击命令按钮组 b.在属性窗口中设置Buttoncount属性，本例中设为3 Commandgroup1中的3个命令按钮的标题属性和Command1的标题属性设置。 （3）编写代码 选择命令按钮和命令按钮组的Click事件来完成相应的功能，代码如下： Do Case Case This.Value=1 This.Backcolor=Rgb(255,0,0) Case This.Value=2 This.Backcolor=Rgb(255,255,0) Case This.Value=3 This.Backcolor=Rgb(0,0,255) Endcase 还原命令按钮的Click事件代码： Thisform.Commandgroupl.Backcolor=Rgb(192,192,192) 7.5.5 编辑框（EditBox）控件 1．编辑框控件的功能 用于显示或编辑多行文本信息。编辑框实际上是一个完整的简单字处理器，在编辑框中能够选择、剪切、粘贴以及复制正文，可以实现自动换行，能够有自己的垂直滚动条。 2．编辑框常用属性 ControlSource：设置编辑框的数据源，一般为数据表的备注字段。 Value：保存编辑框中的内容，可以通过该属性来访问编辑框中的内容。 SelText：返回用户在编辑区内选定的文本，如果没有选定任何文本，则返回空串。 SelLength：返回用户在文本输入区中所选定字符的数目。 Readonly：确定用户是否能修改编辑框中的内容。 Scroolbars：指定编辑框是否具有滚动条，当属性值为０时，编辑框没有滚动条，当属性值为２（默认值）时，编辑框包含垂直滚动条。 7.5.6 复选框(CheckBox)控件 1．复选框的功能 用于标识一个两值状态，如真(.t.)或假(.f.)。当处于“真”状态时，复选框内显示一个对勾，当处于“假”状态时复选框内为空白。 2．复选框常用属性 Value：用来指明复选框的当前状态,如下表 ControlSource属性：用于指定复选框的数据源 属性值 说明 0或.F. （默认值），未被选中 1或.T. 被选中 =2或null 不确定，只在代码中有效 7.5.7 选项组(OptionGroup)控件 1．选项组控件的功能 选项组又称为选项按钮组，是包含选项按钮的一种容器。一个选项组中往往包含若干个选项按钮，但用户只能从中选择一个按钮。当用户单击某个选项按钮时，该按钮即成为被选中状态，而选项组中的其他选项按钮，不管原来是什么状态，都变为未选中状态，被选中的选项按钮中会显示一个圆点。 2．选项组常用属性 ButtonCount：指定选项组中选项按钮的数目。 Value：用于指定选项组中哪个选项按钮被选中。 ControlSource：指定选项组数据源。 Buttons：用于存取选项组中每个选项的数组。 【例】命令按钮组、选项组、复选框、编辑框应用示例，按如图设计一个表