设计表单form1,表单中有命令按钮command1、一个编辑框edit1和一个列表框list1,单击命令按钮将1949年到2049年间的五一节添加到list1中,然后计算出1949年到2049年的每个五一节是星期一的次数,并将计

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 20:52:03
设计表单form1,表单中有命令按钮command1、一个编辑框edit1和一个列表框list1,单击命令按钮将1949年到2049年间的五一节添加到list1中,然后计算出1949年到2049年的每个五一节是星期一的次数,并将计

设计表单form1,表单中有命令按钮command1、一个编辑框edit1和一个列表框list1,单击命令按钮将1949年到2049年间的五一节添加到list1中,然后计算出1949年到2049年的每个五一节是星期一的次数,并将计
设计表单form1,表单中有命令按钮command1、一个编辑框edit1和一个列表框list1,单击
命令按钮将1949年到2049年间的五一节添加到list1中,然后计算出1949年到2049年的每个
五一节是星期一的次数,并将计算结果显示在edit1中.

设计表单form1,表单中有命令按钮command1、一个编辑框edit1和一个列表框list1,单击命令按钮将1949年到2049年间的五一节添加到list1中,然后计算出1949年到2049年的每个五一节是星期一的次数,并将计
命令按钮的click代码
set ansi on
csn=1949
cs=0
do whil csn<=2049
    thisform.list1.additem(allt(str(csn))+"年五月一日")
    rq=allt(str(csn))+"/05/01"
    if cdow(ctod(rq))="Monday"       
       aa=thisform.edit1.value
      thisform.edit1.value=allt(aa)+chr(13)+allt(str(csn))+"年五月一日是星期一"
      cs=cs+1
    endi
    csn=csn+1
endd
thisform.edit1.value=allt(aa)+chr(13)+"五月一日是星期一共出现:"+allt(str(cs))+"次"

设计表单form1,表单中有命令按钮command1、一个编辑框edit1和一个列表框list1,单击命令按钮将1949年到2049年间的五一节添加到list1中,然后计算出1949年到2049年的每个五一节是星期一的次数,并将计 谁能帮我看看这道vfp题怎么做?设计文件名为myform的表单.表单标题为“部门人数统计”,表单有一个组合框,两个文本框,两个命令按钮.标题分别为“统计”和“退出”,运行表单时,组合框中有 vfp 表单设计设计如图所示表单,包括2个表签,1个文本框,1个命令按钮(各控件的大小、颜色、字体、字号等属性自定).其中:(2)标签label2初值为空;(3)在文本框text1中输入一字符串,单击 表单中标签有什么用? VFP表单中Thisform. vf中表单设计 怎么显示系统时间 vfp程序改错题!该表单设计成一个登陆界面,其上有2个标签控件、2个文本框、1个命令按钮,当输入用户名(设置为hxhy)和密码(设置为5921)后,单击“确认”按钮,检验输入是否正确,如果正确, window.document.form1.elements是什么意思,是获取form1表单下所有的元素?是的话所获取的元素都有哪些(类型)? 下列关于表单的说法中错误的是……A.表单控件可以单独存在于表单域之外.B.表单可以包含各种表单控件,如文本域、列表框和按钮C.表单是网页与浏览者交互的一种界面,在网页中有着广泛的 VF中如何求100以内的奇数在表单中,有一个命令按钮“计算”,然后一个列表框,当点击“计算”按钮的时候,列表框中会显示1-100以内的所有奇数注:奇数使用语句:i%20列表框中增加语句:additem 有关表单中radio的问题表单中有一个选择性别的radio,提交表单后,应该怎么存储这个值? 表单的设计过程最基本要求是什么 表单是什么 表单是什么意思 vfp表单设计中“学号=alltrim(thisform.text1.value)”是什么意思啊 英语翻译关于客户调查表--零部件提交保证书表单的统一.目前社内无客户调查表--零部件提交保证书PSW使用表单,客户无指定表单时,由各品管担当自行设计表单,不同担当所设计的表单格式不 请问 vfp 中 thisform.release 和 myform.release 有什么区别 PS :该表单名为myform vfp 程序改错题!从键盘上输入的5个数,并统计其偶数的个数.在编写的表单事件Form1.load中有2处错误,请调试改正.调试改正中,每个过程代码只能改一处,并不得增删语句.set talk offA=0For J=1 to 5accept