Question

vf求助 急啊 创建一个显示系统日期的表单。

运行效果：单击“无标题”按钮，将隐藏表单的标题栏，且该按钮的标题为“有标题”；单击“有标题”按钮，其效果相反

Answer 1

先在表单的init事件中加上：
public a
a=.t.
this.caption=dtoc(date())
然后添加一个按钮到表单中，将按钮的caption属性改为"无标题"，然后给按钮的click事件加上：
if a
thisform.titlebar=0
this.caption="有标题"
else
thisform.titlebar=1
this.caption="无标题"
endif
a=!a