如何改变文本框的输入数据格式？

[phoenixsoft]

我想将文本框的输入数据格式由字符型变为日期型，怎么改？

还有，set date to ymd这条语句是不是可以将日期格式变为yyyy/mm/dd ，而且必须放在主程序中？

[newfang]

右击文本框控件，选择生成器…………
自己看看就知道了！

[phoenixsoft]

但我想通过编代码来改变文本框的输入数据格式。

[liuri璇玑]

把value属性改成{}

[xiolig]

Fox非字段变量的类型是相当灵活的，除少数属性固定为某种类型（如TAG只能是字符型）外，其实际类型由最后一次赋值来决定。文本框可以完成绝大多数类型数据的录入，运行时根据录入前的Value类型限制用户录入数据的类型。

[xiolig]

要把日期格式设置为 YYYY/MM/DD,需要两条命令：
SET DATE TO YMD
SET CENTURY ON
Fox没有象C语言那样明显的主程序，对各种系统设置是实时读取的，因此不存在必须在哪里进行设置的问题，只是出于一种好的习惯，一般在主程序中完成而已。

[xiolig]

能把你要实现的功能（运行时希望达到的效果）逐步描述一下吗？

[phoenixsoft]

我在一个表单里建了一个文本框，一个查询按钮和一个表格。
功能：
通过文本框输入年份，点击按钮后通过比较表cpwx中的字段rq（日期型）来实现查询。

我是这样写的：
select cpxh,yhdw,sl;
from cpwxjl;
where year(fcrq)==thisform.combo2.value;
into cursor yue
thisform.pageframe1.page1.grid1.recordsource='yue'
thisform.refresh

[phoenixsoft]

代码贴错了，应是：
select cpxh,yhdw,sl;
from cpwxjl;
where year(fcrq)==thisform.text1.value;
into cursor yue
thisform.pageframe1.page1.grid1.recordsource='yue'
thisform.refresh

[xiolig]

问题在哪？为什么要改变文本框数据的类型呢？直接将其Value初始化为一个数值型如"=YEAR(DATE())"不就解决了吗？

[phoenixsoft]

改成这样吗？
where year(fcrq)==year(date(thisform.text1.value))

运行时提示“参数太少”

[boomit]

你对字段取年操作和text1的值比较，，那text1为什么要日期型，那样还能比较吗。2002年和2002/12/13比较怎么比啊。。。

[phoenixsoft]

怎么通过写代码改变文本框的value类型啊？

很急！！
在线等待！

[xiolig]

赋值给它的Value属性即可！

[phoenixsoft]

我的想法是想通过文本框输入年份，而通过生成器把文本框的类型设为日期型后，文本框变为“ / / ",这就不是我想要的效果了。

[phoenixsoft]

能给个具体的例子吗？