:用FOR语句设置属性 文本框控件(常用按钮代码)
来源:百度文库 编辑:九乡新闻网 时间:2024/04/30 05:05:39
属性设为日期型:inputmast为:99/99/99 9指定为数字,格式为日期。 文本框控件(textbox)主要用于接收或显示数据,在vfp中是一个常用控件,差不多每个程序都要用到它。vfp基础教程-文本框(textbox)控件及vfp基础教程-数组中已经分别对文本框控件和数组做了介绍,本文来设计一个将这二者结合起来应用的例子。 关于文本框控件数据源的处理: 如果在表单中使用数据环境,可以在“数据环境设计器”中拖动表的各个字段到表单上,系统会自动生成各个字段对应的标签及文本框,并且文本框的数据源会自动与表中对应的字段绑定,这是一种处理方式;另外也可以不使用数据环境,先向表单添加文本框,然后在设计时或运行时在代码中为文本框赋数据源,本文就是这样的一个例子,运行界面如下 : 在上图中,对表单上的各个文本框控件的数据源等相关属性值采用了与在看实例学VFP:模拟VB控件数组操作标签控件一例中类似的方式来处理,相关说明见代码中的注释。 制作步骤如下 : 一、新建表单,将其caption属性值设置为“编程入门网-文本框及数组的综合应用”,保存为“表单1.scx”。 二、向表单上添加三个label控件label1~label3,将它们的caption属性值依次设置为“编号”、“网站名称”和“网站网址”,并把这三个label控件排成一列。 三、向表单上添加三个文本框控件Text1~Text3,并把它们排成一列与label1~对应起来。 四、在表单下方添加四个命令按钮command1~command4,将它们的caption属性值依次设置为“第一条”、“上一条”、“下一条”和“最后一条”。 五、适当调整各控件的位置,调整后的表单设计器如下图: 六、添加事件代码: 1、表单的init事件代码:set safety off
use 表名
copy to 结构 structure extended &&复制网站信息表的结构
use 结构
go top
dime stru(3) &&定义数组
do while !eof()
select 结构
for i=1 to 3
mt1="text"+alltrim(str(I))
thisform.&mt1..backstyle=0 &&将文本框的backstyle属性值均设为0
thisform.&mt1..disabledForeColor=RGB(0,0,255) &&指定失效控件的前景色
thisform.&mt1..enabled=.f. &&将文本框的enabled属性值均设为.f.
stru(I)=结构.field_name &&将"结构"表的field_name字段值依次赋给三个数组元素
skip
endfor
enddo
use 网站信息表
for j=1 to 3
sjy=alltrim("网站信息表."+stru(j))
mt2="text"+alltrim(str(J))
thisform.&mt2..controlsource=sjy &&依次为三个文本框控件赋数据源
endfor 2、表单的unload事件代码:close data 3、“第一条”命令按钮command1的click事件代码:if bof()=.f.
go top
endif
thisform.refresh 4、“上一条”命令按钮command2的click事件代码:if bof()=.f.
skip -1
endif
thisform.refresh 5、“下一条”命令按钮command3的click事件代码:if eof()=.f.
skip
endif
thisform.refresh 6、“最后一条”命令按钮command4的click事件代码:if eof()=.f.
go bottom
endif
thisform.refresh 七、运行“表单1.scx”。本文来自: 编程入门网 http://www.bianceng.cn/Programming/vfp/200904/11318.htm
use 表名
copy to 结构 structure extended &&复制网站信息表的结构
use 结构
go top
dime stru(3) &&定义数组
do while !eof()
select 结构
for i=1 to 3
mt1="text"+alltrim(str(I))
thisform.&mt1..backstyle=0 &&将文本框的backstyle属性值均设为0
thisform.&mt1..disabledForeColor=RGB(0,0,255) &&指定失效控件的前景色
thisform.&mt1..enabled=.f. &&将文本框的enabled属性值均设为.f.
stru(I)=结构.field_name &&将"结构"表的field_name字段值依次赋给三个数组元素
skip
endfor
enddo
use 网站信息表
for j=1 to 3
sjy=alltrim("网站信息表."+stru(j))
mt2="text"+alltrim(str(J))
thisform.&mt2..controlsource=sjy &&依次为三个文本框控件赋数据源
endfor 2、表单的unload事件代码:close data 3、“第一条”命令按钮command1的click事件代码:if bof()=.f.
go top
endif
thisform.refresh 4、“上一条”命令按钮command2的click事件代码:if bof()=.f.
skip -1
endif
thisform.refresh 5、“下一条”命令按钮command3的click事件代码:if eof()=.f.
skip
endif
thisform.refresh 6、“最后一条”命令按钮command4的click事件代码:if eof()=.f.
go bottom
endif
thisform.refresh 七、运行“表单1.scx”。本文来自: 编程入门网 http://www.bianceng.cn/Programming/vfp/200904/11318.htm
用FOR语句设置属性 文本框控件(常用按钮代码)
DEV控件:gridControl常用属性设置
android?常用的控件属性
VB常用控件的属性详解
文本框代码
字体和音乐类代码设置属性
(!!!)MSChart控件的属性与属性对话框
vb控件大全,vb控件属性大全,vb控件详解(2)
在线打印代码以及打印设置 - 按钮链接 - 网页特效代码
20.2.3 控件属性
ppt2003插入flash控件设置属性时“自定义”不显示问题
熟悉字体和音乐类代码设置属性
CSS的filter常用滤波器属性及语句大全
for语句
VB控件大全属性详解
VSFLEXgrid控件属性、用法大全
MSFlexGrid控件属性及使用方法
VB控件大全属性详解
表单及控件属性一览表
电脑高手常用的5个按钮)
.文字输出范围的设置-文本框
常用的表单控件
模块代码安装步骤及常用语句说明
相关按钮代码