我做过实验了,不太理想,但还是可以用的。
首先在表单上创建三个微调框,第一个的value 的属性可以设置为2006 第二个的为1 第三个的也为1
然后在第二个按扭的downclick里添加代码:
if thisform.spinner2.value<1
thisform.spinner2.value=1
endif
在upclick里添加代码:
if thisform.spinner2.value>12
thisform.spinner2.value=12
endif
同样在第三个按扭的downclick里添加代码:
if thisform.spinner3.value<1
thisform.spinner3.value=1
endif
在upclick里添加代码:
if thisform.spinner3.value>31
thisform.spinner3.value=31
endif
这样就可以了。
他们都是数值型。你可以通过转换函数把他们转成日期的。
RQ=allt(str(thisform.spinner1.value))+'/'+allt(str(thisform.spinner2.value))+'/';
+allt(str(thisform.sinner3.value))
RQ=ctod(RQ)
同时,set century on ,set date ansi 也得设置。
你试试吧。