在Visual Foxpro编程中通过日历控件实现日期输入
一、首先建立一个表单，并在表单上选择文本框控件text1
二、在表单上插入表单控件:ActiveX 控件(oleControl)---插入控件---日历控件8.0---确定,即可调出日历控件.
三、双击表单空白处写各过程运行代码
    Init属性代码中填写其日历控件隐藏代码：    thisform.olecontrol1.visible=.f.
    Click属性设置,表示单击表单时任一地方隐藏VF日历控件代码
    thisform.olecontrol1.visible=.f.
四、双击VF日历控件，填写其各运行代码
    设置vf日历控件olecontrol1的 After Update过程代码，表示将选择某一日期的日期值赋予文本框1
    1.value=ttod(this._value)     
    设置日历控件单击Clicktextbox控件边框设置过程代码，表示选择日期后隐藏控件
    thisform.olecontrol1.visible=.f.
    设置VF日期控件Init过程代码：表示打开VF日历控件后取当前年份
    ar=year(date())
  h=month(date())
五、双击VF文本框控件，设置文本框空间单击Click过程代码，表示单击文本框控件时显现日历控件。
    thisform.olecontrol1.visible=.t..

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。