VFP表单设计题求解

一、VFP表单设计题求解

用表单设计器,设计如下图:假设性别表名为:xb.dbf, 字段名为:性别,属性为

复选框属性:Check1.Caption=“男2.Caption=“女”

表格属性:Grid1.RecordSourceT

命令按钮属性:command1.Caption=“查询” comman”

在查询命令的*.click中输入如下代码:

xheck1.value+m.Check2.value

do case

case xb1=0

thisform.grid1””

case xb

thisform.grid1.Recorele * from xb wrsor lsb”

case xb1=2

thcordSource=“sele * from xb where 性别=[女] cursor lsb”

case x

thisform.grid1.RecordSource=“sele * from xb cursor lsb”

endcase

在查询命令的*.click中输入如下代码:thisform.

VFP表单设计题求解

二、vfp表单设计

(1)Form1的Init事件代码:

thisform.timer1.enabled=.t.

(2)Timer1的Timer事件代码:

thisform.caption=‘计时:’+time()

if thisform.label1.fontsize=60

thisform.label1.fontsize=9

else

thisform.label1.fontsize=thisform.label1.fontsize+1

endif

(1) 表单form1的init事件代码:

set century on

thisform.timer1.enabled=.t.

(2)计时器控件timer1的timer事件代码:

thisform.text1.value=alltrim(str(year(date())))+‘年’+alltrim(str(month(date())))+‘月’+alltrim(str(day(date())))+‘日’

thisform.text1.value=time()

三、VFP表单设计

1.Label textbox button

2.this.close()

3.text3.text=convert.toint32(this.textbox1.text)*convert.toint32(this.textbox2.text)

4.text属性 name 属性

5.fontsize

本站所有文章资讯、展示的图片素材等内容均为注册用户上传(部分报媒/平媒内容转载自网络合作媒体),仅供学习参考。 用户通过本站上传、发布的任何内容的知识产权归属用户或原始著作权人所有。如有侵犯您的版权,请联系我们反馈本站将在三个工作日内改正。