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表单设计
一
(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