页框 页Page 表格Grid 表格 命令组CommandButton 命令组 选项组OptionGroup 选项组 列Column 工具栏ToolBar 工具栏 容器Container 容器 控件Control 控件
Forms Objects Controls( I ) Pages( I ) Controls( I ) Columns( I ) Buttons( I ) Buttons( I ) Controls( I ) Controls Controls( I ) Controls
FormCount 、 Count、ControlCount 、 PageCount ControlCount ColumnCount ButtonCount ButtonCount ControlCount ControlCount ControlCount ControlCount
表单 THISFORM
主要属性: CAPTION BACKCOLOR AUTOCENTER 主要事件: CLICK INIT 主要方法: REFRESH SETALL
常用对象
PICTURE BORDERSTYLE
This.setall(“readonly”,.t.,”textbox”) This.setall(“fontsize”,16)
常用对象
文本框 TEXT ----输入或显示数据 输入或显示数据 (输入的数据为字符型,可显示数值型、字符型或日期型) 主要属性: VALUE VISIBLE FORECOLOR , BACKCOLOR FONTSIZE,FONTBOLD LEFT ,TOP ,HEIGHT ,WIDTH DATEFORMAT—显示日期时的格式 显示日期时的格式 PASSWORDCHAR
文本框 TEXT 主要事件: VALID--文本框数据输入后检查数据是否正确 --文本框数据输入后检查数据是否正确 -- CLICK
执行一段代码( 命令按钮 COMMAND----执行一段代码(子程序 执行一段代码 子程序) 主要属性: CAPTION FORECOLOR , BACKCOLOR FONTSIZE,FONTBOLD LEFT ,TOP ,HEIGHT ,WIDTH 主要事件: CLICK
命令按钮组 COMMANDGROUP 主要属性: VALUE BUTTONCOUNT BUTTONS(i) 主要事件:CLICK Do case Case this.value=1 Case this.value=2
Endcase
标签---LABEL-----在表单上显示文字 在表单上显示文字 标签 主要属性: CAPTION FORECOLOR , BACKCOLOR FONTSIZE,FONTBOLD LEFT ,TOP ,HEIGHT ,WIDTH 主要事件: CLICK
组合框、列表框--COMBO1 组合框、列表框-- --
LIST1( 显示字段内容 ( 显示字段内容)
主要属性: ROWSOURCETYPE—字段,文件 字段, 字段 ROWSOURCE --字段名 --字段名 VISIBLE FO
NTSIZE FORECOLOR 主要事件: INTERACTIVECHANGE 主要方法: ADDITEM( ) --- ROWSOURCETYPE=0 select 职工 Index on 部门 to bm unique Scan thisformbo1.additem(部门 部门) 部门 endscan
组合框中显示班级编号
select 学生 Index on left( to xh unique ,3) Scan thisformbo1.additem( left( ) ,3) endscan
选项按钮组 OPTIONGROUP---类似命令按钮组(多选一) 类似命令按钮组(多选一) 类似命令按钮组 主要属性:
VALUE BUTTONCOUNT BUTTONS(i) CAPTION(各OPTION的文字 的文字) 各 的文字 FONTSIZE FORECOLOR(各OPTION的文字大小颜色 的文字大小颜色) 各 的文字大小颜色
主要事件: CLICK Do case Case this.value=1 &;&;选中第一项 选中第一项 thisform.backcolor=rgb(255,0,0) Case this.value=2 &;&;选中第二项 选中第二项 thisform.backcolor=rgb(0,255, 0) Case this.value=2 thisform.backcolor=rgb(0,0,255) endcase
复选框
主要属性: VALUE CAPTION 主要事件: CLICK
CHECK
1---选中 选中
0---未选中 未选中
IF THIS.VALUE=1 THISFORM.BACKCOLOR=RGB(255,0,0) ELSE THISFORM.BACKCOLOR=RGB(0,0,0) ENDIF
表格 GRID 显示一张表中数据 主要属性:
RECORDSOURCETYPE----1—别名 别名 RECORDSOURCE 表名 FORECOLOR BACKCOLOR FONTSIZE COLUMNCOUNT COLUMNS(I) readonly allowaddnew deletemark
SELECT 学生 课程名 成绩 FROM 学生 成绩 课程 学生. ,课程名 , 课程名,成绩 学生,成绩 课程; 成绩,课程 WHERE学生 成绩 学生. 成绩. 成绩.课程号 课程.
课程号 课程号=课程 课程号; 学生 =成绩 AND 成绩 课程号 课程 课程号 AND LEFT( ,3)=”951” into table xscj Thisform.grid1.recordsource=“xscj”
设置GRID各列的背景色 偶数列绿色,奇数列蓝色 For i=1 to thisform.grid1.columncount if i%2=0 thisform.grid1.columns(i).backcol