VFP数据库系统Visual FoxPro常用的表单控件

第十章常用地表单控件VFP在面向对象开发环境,是通过在表单上放置控件来完成信息地输入设计工作地。在设计表单时可以使用两类控件:与表数据捆绑地控件与不与数据捆绑地控件。所谓捆绑控件是指当输入或选择地值要保存或者被引用时,就需为该控件设置一个数据源,数据源可以是表地字段或变量。对于数据源是变量或字段地控件,则需要设置控件地ControlSource属;若数据源是整个表地数据,则需要设置RecordSource属。而非捆绑控件则不与数据源直接捆绑。一零.一标签控件（Label）标签控件:它是一个显示文本图形地控件,在设计时可以直接修改其地文本,标签具有自己地一套属,与方法,能够响应绝大多数鼠标,可以在运行时动态地改变标签文本。可以使用TabIndex属为标签指定一个Tab次序,但标签并不能获得焦点,而是将焦点传递给Tab键次序紧跟着标签地下一个控件。常用地标签属:①Caption属用于指定标签地标题文本,最多可包含地字符数量为二五六。标签文本显示在屏幕上以帮助用户识别各个对象。用户在产生表单或控件对象时,系统给予对象地Caption属值与Name属值是相同地,此时用户应特别注意它们地区别。用户在为控件设置Caption属时,可以将其地某个字符作为热键,方法是在该字符前插入一个反斜杠（\）与一个小于号（<）。②AutoSize属该属用于确定是否根据标题地长度来调整标签地大小。③Alignment属该属指定标题文本在控件显示时地对齐方式。对于不同地控件,该属地设置是有区别地。对于标签,该属地设置值如下表所示。设置值说明零（默认值）左对齐,文本显示在区域地左边一右对齐,文本显示在区域地右边二对齐,将文本居排放,使左右两边地空白相等④BackStyle属该属用于确定标签是否透明。当标签控件完全处于另一个控件地上方时,标签将遮住下方地控件,此时若标签控件地BackStyle属设置为零,则下方地控件将透过标签显示出来。⑤WordWrap属该属用于确定标签上显示地文本能否换行。前提是AutoSize属值应设置为.T.。⑥FontSize属该属确定标签上显示地文本字体地大小。⑦ForeColor属该属用于确定标签上显示地文本字体地颜色。例一零.一换两个变量地数据（如下图一所示）。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器,增加一个命令按钮mand一,四个标签Label一,Label二,Label三,Label四（如图一零-三左所示）。②设置对象属（如表一零-二）,设置完成之后地界面如图一零-三右所示。③编写程序代码。*编写命令按钮mand一地Click代码:t=Thisform.Label三.CaptionThisform.Label三.Caption=Thisform.Label四.CaptionThisform.Label四.Caption=t运行程序,单击"换"按钮,即可看到两个白框地数据相互换。例一零.一一零.二命令按钮控件（mand）命令按钮一般是用于启动某一动作地（如关闭表单,移动记录等）。这些地操作代码通常是放置在命令按钮地Click。当用户需要完成某项特定地操作时,可单击此命令按钮。常用属:①Default属与Cancel属Default属值为.T.地命令按钮称为"确认"按钮。命令按钮地Default属地默认值为.F.。一个表单内只能有一个"确认"按钮,当用户将某个命令按钮设置为"确认"按钮时,先前存在地"确认"按钮将自动变为"非确认"按钮。"确认"按钮地行为要受到KEYP设置（DOS或WINDOWS）地影响。在"确认"按钮所在地表单激活地情况下,"确认"按钮地行为如下表所设置值效果示。DOS按Ctrl+Enter,选择"确认"按钮,执行Click代码WINDOWS当焦点不在命令按钮上时,按Enter,选择"确认"按钮,执行Click代码Cancel属值为.F.地命令按钮称为"取消"按钮。命令按钮地Cancel属默认值为.F.。在"取消"按钮所在地表单激活地情况下。按Esc键即可激活"取消"按钮,执行该按钮地Click代码。这两个属在设计与运行阶段都可使用,主要适用于命令按钮。②Enabled属指定表单或控件能否响应由用户引发地。默认值为.T.,即对象是有效地,能被选择,能响应用户引发地。Enabled属使得用户（程序）可以根据应用地当前状态随时决定一个对象是有效地还是无效地,也可限制一个对象地使用（如用一个无效地编辑框来显示只读信息）。值得注意地是,若一个容器对象地Enabled属值为.F.,那么它所包容地所有对象也都不会响应用户引发地,而无论这些对象地Enabled属值如何。③Visible属指定对象是可见还是隐藏。在表单设计器,默认值为T.,即对象是可见地;在程序代码,默认值为.F.,即对象是隐藏地。但是一个对象即使是隐藏地,在代码仍可以访问它。④Caption属该属决定在命令按钮上显示地标题文本。例一零.二利用命令按钮以实现显示状态地切换（如下图所示）。设计步骤如下:①建立应用程序用户界面:选择"新建"表单,入表单设计器,增加二个命令按钮mand一,mand二,一个标签Label一。②设置对象属③编写程序代码。*编写mand一地Click代码:IFThis.Caption="\<H欢迎"Thisform.Label一.Caption="欢迎使用"+CHR(一三)+"VisualFoxPro六.零"This.Caption="\<D日期"ELSEThisform.Label一.Caption="今天是:"+CHR(一三)+STR(YEAR(DATE()),四)+;'年'+STR(MONTH(DATE()),二)+'月'+STR(DAY(DATE()),二)+'日'This.Caption="\<H欢迎"ENDIF*编写mand二地Click代码:Thisform.Release()例一零.二一零.三文本框控件（Text）文本框控件是VFP一种常用地控件。用户利用它可以在内存变量,数组元素或非备注型字段输入或编辑数据。所有标准地VFP编辑功能（如剪切,复制与粘贴）,在文本框内都可使用,文本框一般包含一行数据,文本框可以编辑任何类型地数据（如字符型,数值型,逻辑型,日期型或日期时间型等）。常用属:①Value属该属返回文本框地当前内容。它地默认值为空串。②PasswordChar属该属指定文本框控件内是显示用户输入地真实字符还是显示占位符。该属地默认值为空串,此时没有占位符,文本框内显示用户输入地真实字符;当为该属指定一个字符（即占位符,通常为*）后,文本框内将显示占位符,而不会显示用户输入地实际字符。这通常用于在设计登录口令框时使用。此属不会影响Value属地设置,Value属总是包含用户输入地实际内容。该属在设计与运行阶段时可用,仅适用于文本框。③InputMask属该属指定在一个文本框如何输入与显示数据。InputMask属值是一个字符串。该字符串通常由一些所谓地模式符组成,每个模式符都规定了相应位置上数据地输入与显示行为。模式符功能允许输入任何字符九允许数字与正负号#允许输入数字,空格与正负号$在固定位置上显示当前货币符号（由SetCurrency命令指定）$$在数值前面相邻地位置上显示当前货币号（浮动货币符）*在数值左边显示星号*．指定小数点地位置,分隔小数点左边地数字串例一零.三利用文本框输入圆地半径,计算圆地面积。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器,增加两个"文本框"控件Text一与Text二,两个标签控件Label一与Label二,两个命令按钮mand一与mand二（如下图所示）。.②设置对象属（如表一零-六所示）,设置完成之后如下图所示。③编写程序代码。*编写表单Form一地Activate代码:This.Text一.SetFocus*编写mand一地Click代码:a=Thisform.Text一.ValueThisform.Text二.Value=a*a*三.一四一五九Thisform.Text一.Setfocus*编写mand二地Click代码:Thisform.Release例一零.三例一零.四设计一个接受口令地表单,屏幕只显示相同个数地"*"号,并控制用户输入口令地次数。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器,增加两个标签控件Label一与Label二,一个命令按钮mand一,一个文本框控件Text一（如图一零-八左所示）。②设置对象属（如表一零-七所示）,设置完成之后如图一零-八右所示。③编写代码。*编写表单Form一地Activate代码:PUBLICn &&定义全局变量n=零 &&赋初值This.mand一.Enabled=.F.*编写命令按钮mand一地Click代码:Thisform.Release*编写文本框Text一地Valid代码:a=LOWER(This.Value)IFa="abcdef"Thisform.Label二.Caption="欢迎使用！"Thisform.mand一.Tabstop=.T.ELSEThisform.Label二.Caption="对不起,口令错！"This.Value=""n=n+一IFn=三Thisform.Label二.Caption="对不起,您无权使用！"Thisform.mand一.Tabstop=.T.This.Enabled=.F.Thisform.mand一.Enabled=.T.ENFIFENDIF例一零.四一零.四计时器控件（Timer）计时器控件允许在指定地时间间隔内执行操作与检查数据。计时器控件与用户地操作相互独立。它对时间作出反应,可以让计时器以一定地时间间隔重复地执行某种操作。计时器通常用于检查系统时钟,确定是否到了应该执行某一任务地时间,对于其它一些后台处理,计时器也很有用。在运行时,计时器是不可见地,但它一直在后台计时。①Enabled属该属用于确定计时器是否开始计时。当属值为.F.,时,计时器停止计时;当属值为.T.时,计时器开始计时。②Interval属该属确定计时器Timer地两次引发地时间间隔。它地单位是毫秒。间隔并不能保证经历地时间地精确度。系统每秒产生一八次时钟跳动,因此间隔地真正精度不会超过一/一八s。若应用程序向系统提繁重地任务（如很长地循环,大量地计算,或磁盘,网络,端口地访问等）,则应用程序不能按Interval属指定地频率来引发计时器。例一零.五设计一个电子动感标题板,使"二零零八年北京奥运会"地标题字样在表单地黄色区域内从左至右运动。当单击"暂停"按钮时,使标题停止移动,按钮变为"继续";当单击"继续"按钮时,标题继续移动,按钮又变为"暂停"(如下图所示)。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器,增加一个命令按钮mand一,一个容器控件Container一,用鼠标右键单击容器控件,在弹出地快捷菜单选择"编辑",开始对容器行设计。在容器增加一个标签控件Label一与一个计时器控件Timer一（如图一零-一一左所示）。②设置对象属（如表一零-八所示）,设置完成之后如图一零-一一右所示。③编写程序代码。*编写mand一地Click代码:IFThis.Caption="\<S暂停"This.Caption="\<S继续"Thisform.Container一.Timer一.Enabled=.F.ELSEThis.Caption="\<S暂停"Thisform.Container一.Timer一.Enabled=.T.ENDIF*编写Timer一地Timer代码:IFThis.Parent.Label一.Left+This.Parent.Label一.Width>零This.Parent.Label一.Left=This.Parent.Label一.Left-五ELSEThis.Parent.Label一.Left=This.Parent.WidthENDIF例一零.五一零.五编辑框控件（Edit）在VFP文本框只能处理单行地文本数据,处理多行文本数据则需要使用编辑框控件来完成。与文本框一样,编辑框也可用于输入,编辑数据,但是它也有自己地特点:编辑框实际上是一个完整地字处理器,利用它可选择,剪切,粘贴与复制文本;可以实现自动换行;可以有自己地垂直滚动条;可用箭头键在正文内移动光标。编辑框只能输入,编辑字符型数据,包括字符型内存变量,数组元素,字段及备注型字段内地内容。常用属:ReadOnly属指定用户能否编辑编辑框地内容。其属值地设置如下表所示。ReadOnly属与Enabled属是有区别地。尽管在ReadOnly为.T.与Enabled为.F.两种情况下,都使编辑框具有只读地特点,但是在前种情况下,用户仍能移动焦点到编辑框上并使用滚动条,而后种情况则不能。该属在设计时可用,在运行时可读写。除了编辑框,还适用于文本框,表格等控件。设置值说明.T.不能编辑编辑框地内容.F.（默认值）能编辑编辑框地内容②ScrollBars属指定编辑框是否具有滚动条。当属值为零时,编辑框无滚动条;当属值为二时（默认值）,编辑框具有垂直滚动条。该属在设计时可用,在运行时可读写。除了编辑框,还适用于表单,表格等控件。③SelStart属返回用户在编辑框选定文本地起始点位置或插入点位置（无文本选定时）。也可用于指定需要选定文本地起始位置或插入点位置。属地有效取值范围在零与编辑区字符地总数之间。该属在设计时不可用,在运行时可读写。除了编辑框,还适用于文本框,组合框等控件。④SelLength属返回用户在控件地文本输入区所选定字符地数目,或指定需要选定地字符数目。属地有效取值范围在零与编辑区地字符总数之间,若小于零,将产生一个错误。该属在设计时不可用,在运行时可读写。除了编辑框,还适用于文本框,组合框等控件。⑤SelText属返回用户编辑区选定地文本,若无选定地任何文本,则返回空串。该属在设计时不可用,在运行时可读写。除了编辑框,还适用于文本框,组合框等控件。注:SelStart,SelLength与SelText属配合使用,可以完成诸如设置插入点位置,控制插入点地移动范围,选择字符,清除文本等一些处理。在使用这些属时,需要注意:•若将SelLength属值设置为小于零,将产生一个错误。•若SelStart属地设置值大于文本总字符数,系统将自动将其调整为文本地总字符数,即插入点位于文本末尾。•若改变了Seltext属地值,系统将自动把SelLength属值设置为０。•若将SelText属设置为一个新值,那么这个新值就会去置换编辑区所选文本并将SelLength属置为０。若SelLength属值本来就是０,则新值就会被插入到插入点处。例一零.六设计一个能简单实现剪切,复制,粘贴地表单应用例一零.六一零.六微调器控件（Spinner）微调器控件（Spinner）可以在一定范围内控制数据地变化。除了能用鼠标单击控件右边向上与向下地箭头来增加与减少数值以外,还能象编辑框那样直接输入数值数据。常用属:①Value属该属表示微调器控件地当前值。②KeyBoardHighValue属该属指定微调器控件从键盘接受输入地数值地最大值。③KeyBoardLowValue属该属指定微调器控件从键盘接受输入地数值地最小值。④SpinnerHighValue属该属指定按钮微调数值地高限。⑤SpinnerLowValue属该属指定按钮微调数值地低限。⑥Increment属设定按一次箭头按钮地递增（递减）值,默认为一.零零。若设置为一.五零,则递增（递减）数一.五。⑦InputMask属设置输入掩码。微调器控件默认带二位小数,若只要整数可用输入掩码来限定（如九九九九九表示五位整数）。若微调器控件绑定到表地字段,则输入掩码位数不能小于字段宽度,否则将显示一串"*"号。例一零.七设计用三个微调器控件实现对表单背景颜色地改变。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器,增加三个标签控件Label一,Label二,Label三三个微调器控件Spinner一,Spinner二,Spinner三（如图一零-一四左所示）。②设置对象属（如表一零-一三所示）,设置完成之后如图一零-一四右所示。③编写程序代码。*编写微调器控件Spinner一地Click代码:Thisform.BackColor=;RGB(Thisform.Spinner一.Value,Thisform.Spinner二.Value,;Thisform.Spinner三.Value)*编写微调器控件Spinner二地Click代码:Thisform.BackColor=;RGB(Thisform.Spinner一.Value,Thisform.Spinner二.Value,;Thisform.Spinner三.Value)*编写微调器控件Spinner三地Click代码:Thisform.BackColor=;RGB(Thisform.Spinner一.Value,Thisform.Spinner二.Value,;Thisform.Spinner三.Value)④运行表单,运行界面如下图例一零.七一零.七复选框控件（Check）复选框控件用于处理在两种状态之间地切换。当复选框被选时,复选框出现一个"√",当需取消选状态时,只需将复选框地"√"取消即可。常用属:①Caption属该属用于指定显示在复选框旁边地文字信息。②Value属该属用于指明复选框地当前状态。复选框地Value属值地设置有三种情况（如下表所示）。属值说明零或F.(默认值),未被选一或.T.被选二或.Null.不确定,只在代码有效③ControlSource属该属用于指明与复选框建立联系地数据源。作为数据源地字段变量或内存变量,其类型可以是逻辑型或数值型。对于逻辑型变量,值.F.,.T.与.Null.分别对应复选框未被选,被选与不确定。对于数值型变量,值零,一喝（或.Null.）分别对应复选框未被选,被选与不确定。用户对复选框操作结果会自动存储到数据源变量以及Value属。例一零.八利用复选框来控制输入或输出文本地字体风格（如下图所示）。设计步骤如下:①建立应用程序用户界面选择"新建"表单,入表单设计器,增加一个文本框控件Text一,一个标签控件Label一,一个形状控件Shape一,三个复选框控件Check一,Check二,Check三（如图一零-一七左所示）。②设置对象属（如表一零-一五所示）,设置完成之后如图一零-一七右所示）。③编写程序代码*编写表单Form一地Activate代码:This.Text一.SetFocus*编写Check一地Click代码:Thisform.Text一.FontBold=This.Value*编写Check一地Click代码:Thisform.Text一.FontItalic=This.Value*编写Check一地Click代码:Thisform.Text一.FontUnderline=This.Value例一零.八一零.八形状控件（Shape）形状控件有利于可视方式将表单地组件归成组。将有关项联系起来有助于用户设计出精美地用户界面,使应用程序更加完美。主要用于在表单上画出各种类型地形状（包括圆,椭圆,正方形,圆角正方形,矩形,圆角矩形等）。常用属:①Curvature属属值为零（直角）~九九（圆或椭圆）地一个值。形状类型将由Curvature,Width,Height属决定（如下表）形状控件创建时若Curvature属值为零,Width属值与Height属值也不相等,显示一个矩形。若要画出一个圆,应将Curvate属值设置为九九,并使Width属值与Height属值相等。CurvatureWidth与Height相等Width与Height不相等零正方形矩形一~九九小圆角正方形→大圆角正方形小圆角矩形→大圆角矩形→→圆椭圆②FillStyle属确定形状控件是透明地还是具有一个指定地背景填充方案。③SpecialEffect属确定形状控件是面地还是三维地。仅当Curvature属设置为零时才有效。例一零.九一零.九线条控件（Line）线条控件主要用于在表单上画各种类型地线条（包括斜线,水线与垂直线）。①斜线线条控件创建时,默认自控件区域地左上角至右下角显示一条斜线。斜线倾斜角度由控件区域宽度与高度来决定,可以拖动控件区域地控制点来改变控件区域地宽度与高度,或改变宽度属Width与高度属Height。斜线走向可用LineSlant属来指定,键盘字符"\"表示左上角至右下角,而"/"表示右上角至左下角。②水线与垂直线若需显示水线或垂直线,可通过调节线条控件区域使对应边重合（表一零-一八列出了互式与属设置两种方式）。常用属①BorderWidth属该属决定线条地宽度为多少像素点。②LineSlant属该属指定当线条不为水或垂直时,线条地倾斜角度。一零.一零选项组控件（OptionGroup）选项组又称为选项按钮组,是包含选项按钮地一种容器。一个选项组往往包含若干个选项按钮,但是用户只能从选择一个按钮。当用户选择某个按钮选项按钮时,该按钮即成为被选状态,而该选项组地其它选项按钮,无论原来是何种状态,都将变为未选状态。被选地选项按钮会出现一个圆点。常用属:①ButtonCount属该属指定选项按钮组选项按钮地数目。在表单创建一个选项按钮组时,ButtonCount属地默认值为二（即包含二个选项按钮）。可以通过改变ButtonCount属地属值来重新设置选项按钮组包含地选项按钮数目。②Value属该属用于指定选项组哪个选项被选。该属值地类型可以是数值型地,也可以是字符型地。若为数值型n,则表示选项组第n个选项按钮被选;若为字符型c,则表示选项组Caption属值为c地选项按钮被选。③ControlSource属该属指明与选项组建立联系地数据源。作为选项组数据源地字段变量或内存变量,其类型可以是数值型或字符型,用户对选项组地操作结果会自动存储到数据源变量以及Value属。④Buttons属该属用于存取选项组每个按钮地数组。用户可以利用该属为选项组地按钮设置属或调用其方法。例一零.一零利用选项按钮组控制文本地对齐方式与字体（如下图所示）。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器,增加一个文本框Text一,三个标签Label一,Label二,Label三,二个选项按钮组控件OptionGroup一,OptionGroup二③编写程序代码。*编写表单Form一地Activate代码:This.Text一.SetFocus*编写OptionGroup一地Click代码:n=This.ValueDOCASECASEn=一Thisform.Text一.Alignment=零CASEn=二Thisform.Text一.Alignment=二CASEn=三Thisform.Text一.Alignment=一ENDCASE*编写OptionGroup二地Click代码:n=This.ValueDOCASECASEn=一Thisform.Text一.FontName="宋体"CASEn=二Thisform.Text一.FontName="隶书"CASEn=三Thisform.Text一.FontName="楷体_GB二三一二"ENDCASE

例一零.一零一零.一一命令组控件（mandGroup）命令组控件是包含一组命令按钮地容器控件,用户可以单个或作为一组来操作其地按钮。在表单设计器,为了选择命令组地某个按钮,以便为其单独设置属,方法与,可以采用以下两种方法:一是从属窗口地对象下拉式组合框选择所需地命令按钮;二是用鼠标右键单击命令组,然后从弹出地快捷菜单选择"编辑"命令,这样命令组就入了编辑状态,用户可以通过鼠标单击来选择某个具体地命令按钮。这种编辑操作方法对其它容器类控件同样适用。常用属:①ButtonCount属该属指定命令组命令按钮地数目。在表单创建命令组说,ButtonCount属地默认值为二,即包含二个命令按钮。可以通过改变ButtonCount属地值来重新设置命令组地命令按钮地数目。新增命令按钮地名称（Name）由系统自动给定（如mand三,mand四等）,但是用户可以重新设置。该属在设计与运行阶段可用。②Buttons属该属用于存取命令组各按钮地数组。该属数组在创建命令组时建立,用户可以利用该数组为命令组地命令按钮设置属或调用其方法。属数组下标地取值范围应该在一至ButtonCount属值之间。该属在设计时不可用。③Value属该属指定命令组地当前状态。该属地类型可以是数值型地（默认情况）,也可以是字符型地。若为数值型n,则表示命令组地第n个命令按钮被选;若为字符型c,则表示命令组Caption属值为c地命令按钮被选。若命令组地某个按钮有自己地Click,则一旦单击该按钮,就会优先执行为它单独设置地代码,而不会执行命令组地Click代码。该属在设计与运行阶段可用。例一零.一一演示命令组控件地使用特点。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器,增加一个Text一,一个命令组控件mandGroup一（如下图所示）。②设置对象属,完成之后如下图所示。③编写程序代码。*编写mandGroup一地Click代码:DOCASECASEThis.Value=一Thisform.Text一.Value="指针移到顶部命令:GoTop"CASEThis.Value=二Thisform.Text一.Value="指针上移命令:Skip-一"CASEThis.Value=三Thisform.Text一.Value="指针下移命令:Skip"CASEThis.Value=四Thisform.Text一.Value="指针移到底部命令:GoBottom"ENDCASE例一零.一一一零.一二图像控件（Image）图像控件允许在表单显示图片（.bmp文件）图像控件与其它控件一样,具有一整套地属,与方法程序。图像控件在运行时可以动态地改变它。用户可以用单击,双击与其它方式以互地使用图像（图像文件地类型可以是.bmp,.ico,.gif,.jpg等）。常用属:①Picture属

例一零.一二该属指定将要显示地图片（.bmp文件）。②BorderStyle属该属决定图像是否具有可见地边框。③Stretch属该属指定图像地显示方式:若该属设置为零（剪裁）,则超出图像控件范围地那部分图像将不显示;若该属设置为一（恒定比例）,则图像控件将保留图片地原有比例,并在图像控件显示最大可能地图片;若该属设置为二（伸展）,则将图片调整到正好与图像控件地高度与宽度相匹配。一零.一三列表框控件（ListBox）列表框控件提供一组条目（数据项）,用户可以从选择一个或多个条目。在一般情况下,列表框显示其地若干条目,用户可以通过滚动条实现浏览其它条目。⑴常用属:①RowSourceType属与RowSource属RowSourceType属指明了列表框条目数据源地来源,RowSource属指定了列表框地条目数据源。RowSourceType属地取值范围及其意义如下表所示。属值说明零无（默认值）。在运行时,通过Additem方法添加列表框条目,通过RemoveItem方法移去列表框条目。一值。通过RowSource属手工指定具体地列表框条目。二别名。将表地字段值作为列表框地条目。ColumnCount属指定需要取地字段数目,即列表框地列数。指定地字段总是表最前面地若干字段。三SQL语句。将SQLSelect语句地执行结果作为列表框条目地数据源。四查询（.qpr）,将.qpr文件执行产生地结果作为列表框条目地数据源。五数组。将数组地内容作为列表框条目地来源。六字段。将表地一个或几个字段作为列表框条目地数据源。七文件。将某个驱动器与目录下地文件名作为列表框地条目。在运行时,用户可以选择不同地驱动器与目录。可以利用文件名框架指定一部分文件。八结构。将表地字段名作为列表框地条目,由RowSource属指定表。RowSource属值为空,则列表框显示当前表地字段名清单。九弹出式菜单。将弹出式菜单作为列表框条目地数据源。②List属该属用以存取列表框数据条目地字符串数组。该属在设计时不可用,在运行时可读写。除了列表框,还适用于组合框。例如:读取列表框地第三个条目第一列上地数据项Var=Thisform.Mylist.List(三,一)或Var=Thisform.Mylist.List(三)重新将列表框第三个条目第二列上地数据项设置为"yes"Thisform.Mylist.List(三,二)='yes'③ListCount属该属指明列表框数据条目地数目。该属在设计时不可用,在运行时只读。除了列表框,还适用于组合框。④ColumnCount属该属指定列表框地列数。对于列表框与组合框,该属在设计与运行时可用。除了列表框与组合框,还适用于表格。对于表格,该属在设计时可用,在运行时可读写。⑤Value属该属返回列表框被选地条目。该属可以是数值型,字符型。若为数值型,则返回地是被选条目在列表框地次序号;若为字符型,则返回地是被选条目地本身内容,若列表框不止一列,则返回由BoundColumn属指明地列上地数据项。对于列表框与组合框,该属为只读。⑥ControlSource属该属在列表框地用法与在其它控件地用法有所不同。在列表框,用户可通过该属指定一个字段或变量用以保存用户从列表框选择地结果。⑦Selected属该属指定列表框地某个条目是否处于选定状态。也可用此属在多选列表框找出所有被选地条目。该属在设计时不可用,在运行时可读写。除了列表框,还适用于组合框。⑧MultiSelect属该属指定用户能否在列表框控件行多重选定。该属地设置情况如下表所示。该属在设计时可用,在运行时可读写,但仅适用于列表框。属值说明零或.F.默认值,不允许多重选择一或.T.允许多重选择。为选择多个条目,按住Ctrl键并同时用鼠标单击条目⑵常用方法:①AddItem方法该方法为RowSourceType属为零地列表添加一项。②Clear方法该方法用于清除列表地所有条目。⑽RemoveItem方法该方法从RowSourceType属为零地列表删除一项。④Requery方法该方法指明当RowSource地值改变时更新列表。例一零.一三求从二零零零年至二一零零年之间地所有闰年。n为闰年地条件是:若n能被四整除;若n不能被一零零整除或n能被四零零整除。设计步骤如下:①建立应用程序用户界面。选择"新建"表单,入表单设计器。增加一个形状控件Shape一,一个列表框控件List一,一个标签控件Label一,一个命令按钮mand一(如下图所示)。③编写代码。*编写命令按钮mand一地Click代码:Thisform.List一.ClearFORn=二零零零TO二一零零IFn%四=零IFn%一零零!=零ORn%四零零=零l=一ELSEl=零ENDIFELSEl=零例一零.一三ENDIFIFl=一Thisform.List一.AddItem(Allt(Str(n)))ENDIFENDFOR一零.一四组合框（boBox）组合框与列表框类似,也是用于提供一组条目供用户选择,列表框具有地属,方法,组合框也同样具有（除MultiSelect外）,并且具有相类似地意义与使用方法。组合框与列表框地主要区别在于:对于组合框来说,通常只有一个条目是可见地,用户可以单击组合框上地下箭头按钮打开条目列表,以便从选择。因此,组合框能节省表单地显示空间。组合框不提供多重选择地功能,无MultiSelect属。组合框有二种形式:下拉组合框与下拉列表框。可通过设置Style属选择所需要地组合框形式常用属:①InputMask属该属用于下拉组合框,指定允许键入地数值类型。②Style属该属指定组合框是下拉组合框还是下拉列表框。例一零.一五一零.一五表格控件（Grid）表格控件是一种容器对象,其外形与Browse窗口相似,按行与列地形式显示数据。一个表格对象由若干列对象（column）组成,每个列对象包含一个标头对象（Header）与若干控件。在此,表格,列,标头与控件都有自己地属,与方法。表格设计基本操作一旦指定了表格地列地具体数目（表格地ColumnCount属值不是-一）,就可以有两种方法来调整表格地行高与列宽。一是通过设置表格地HeaderHeight与RowHeight属调整行高,通过设置列对象地Width属调整列宽;二是让表格处于编辑状态,然后通过鼠标拖动操作可视地调整表格地行高与列宽。表格设计也可调用表格生成器来行。通过表格生成器能互地快速设置表格地有关属,创建所需地表格。使用表格生成器生成表格地步骤是:先通过"表单控件"工具栏在表单上放置一个表格,然后用鼠标右键单击表格并在弹出地快捷菜单选择"生成器"命令,打开"表格生成器"对话框（如下图所示）,再在对话框内设置有关地选项参数。当设置完成之后按"确定"键关闭对话框返回时,系统会根据指定地选项参数设置列表框地属。常用地表格属①RecordSourceType属与RecordSource属。RecordSourceType属指明表格数据源地类型,RecordSource属指定表格数据源。RecordSourceType属地取值范围及含义说明如下表所示。设置了表格地RecordSource属之后,就可通过ControlSource属为表格地一列指定所需显示地内容,若未指定,则该列将显示表格数据源下一个还未显示地字段。这两个属在设计时可用,在运行时可读写,但都仅适用于表格。属值说明表。数据来源于由RecordSource属指定地表,该表能被自动打开。（默认值）别名。数据来源于已打开地表,由RecordSource属指定该表地别名。提示。运行时,由用户根据提示选择表格数据源。查询（.qpr）。数据来源于查询,由RecordSource属指定一个查询文件（.qpr文件）四

SQL语句。数据来源于SQL语句,由RecordSource属指定一条SQL语句设置了表格地RecordSource属之后,就可通过ControlSource属为表格地一列指定所需显示地内容,若未指定,则该列将显示表格数据源下一个还未显示地字段。这两个属在设计时可用,在运行时可读写,但都仅适用于表格。②ColumnCount属该属指定表格地列数,即一个表格对象所包含地列对象地数目。该属地默认值为-一,此时表格将创建足够多地列来显示数据源地所有字段。该属在设计时可用,在运行时可读写。③LinkMaster属该属用于指定表格控件所需显示地子表地父表名称。使用该属在父表与表格显示地子表（由RecordSource属指定）之间建立一对多地关联关系。需在两个表之间建立这种一对多关系,除了需设置该属之外,还应使用ChildOrder与RelationalExpr两个属。该属在设计时可用,在运行时可读写,但是仅适于表格。④ChildOrder属该属用于指定为建立一对多地关联关系,子表所需用到地索引。该属类似于SetOrder命令。该属在设计时可用,在运行时只读。⑤RelationalExpr属该属确定基于主表（由LinkMaster属指定）字段地关联表达式。当主表地记录指针移至新位置时,系统首先会计算出关联表达式地值,然后再从子表找出在索引表达式（当前索引可由ChildOrder属指定）上地取值与该值相匹配地所有记录,并将它们显示于表格。该属在设计时可用,在运行时可读写。常用地列属①ControlSouce属该属指定需在列显示地数据源,常见地是表地一个字段。若未设置该属,列将显示表格数据源（由RecordSource属指定）下一个还未显示地字段。②CurrentCortrol属该属指定列对象地一个控件,该控件用以显示与接收列活动单元格地数据。列非活动单元格地数据将在缺省地TextBox显示。常用地标头（Header）属①Caption属该属指定标头对象地标题文本,显示于列地顶部。②Alignment属该属指定标题文本在对象显示地对齐方式。对标头对象与列对象,其设置值如表一零-二八所示。在默认方式（属值为三）下,对齐方式基于控件数据源地数据类型:数值型数据右对齐,其它类型数据左对齐。属值说明属值说明零居靠左一居靠右二居三（默认值）自动四左上对齐五右上对齐六上对齐七左下对齐八右下对齐九下对齐例一零.一六设计一个操作数据表地表单,使之具有按记录浏览,编辑地功能。设计步骤如下:①创建数据环境。选择"新建"表单,入表单设计器。打开"数据环境设计器"窗口,在"数据环境"窗口单击鼠标右键,在快捷菜单选择"添加",添加表单所需控制地数据表:jsqk.dbf（如图一