VFP串讲2+Microsoft+PowerPoint+演示文稿

VFP串讲2+Microsoft+PowerPoint+演示文稿

ID:45340322

大小:1.48 MB

页数:74页

时间:2019-11-12

VFP串讲2+Microsoft+PowerPoint+演示文稿_第1页
VFP串讲2+Microsoft+PowerPoint+演示文稿_第2页
VFP串讲2+Microsoft+PowerPoint+演示文稿_第3页
VFP串讲2+Microsoft+PowerPoint+演示文稿_第4页
VFP串讲2+Microsoft+PowerPoint+演示文稿_第5页
资源描述:

《VFP串讲2+Microsoft+PowerPoint+演示文稿》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、常用控件类综合1综合2综合3通常与表中备注字段捆绑(五)increment:微调控件向上和向下的微调量,默认值为1spinnerlowvalue:用户单击控制数值的下限值spinnerhighvalue:用户单击控制数值的上限值keyboardlowvalue:用户通过键盘输入数值的下限值keyboardhighvalue:用户通过键盘输入数值的上限值value:微调控件当前值,供编程使用(六)微调控件(七)命令按钮控件1.命令按钮控件的名称、作用与特点类名称:Command,添加的对象默认名为command1…作用:表示

2、具备某功能的按钮。特点:没有双击事件。2.命令按钮主要属性Caption:标题,即命令按钮上显示的文本。VFP允许在标题上增加热键提示,如某个命令按钮的Caption属性值是“帮助(

3、事件代码。Visible:默认值为.T.,命令按钮可见,当该值为.F.时,命令按钮是隐藏。Enabled、Default、Cancel、Visible四个属性见演示表单myform999.scx表单的INITEVENT代码程序:thisform.command1.setfocus&&获得焦点thisform.command1.default=.T.&&按enter键可执行单击事件thisform.command2.cancel=.t.&&按esc键可执行单击事件thisform.command4.visible=.F.&&

4、隐藏COMMAND4“显示”(command1)的ClickEvent代码程序:thisform.text1.value=date()&&系统日期显示在文本框中thisform.command2.setfocus&&command2获得焦点thisform.command4.visible=.t.&&command4可见总结1.enabled:对象可用还是不可用,默认值为.T.。当为.F.时,对象变成浅色,不可用,但可见。2.visible:对象可见还是隐藏,默认值为.T.。当为.F.时,对象隐藏,不可见。综合应用例1:设

5、计一个表单名和表单文件名为myform0的表单,其包含对象如下图所示。一、表单的功能如下:1.表单的标题为系统时间。2.从文本框1输入源表文件,文本框2输入目标表文件,实现表文件的复制。3.选择“仅复制表结构”复选框1,源表文件结构被复制,否则记录与结构一起复制。4.选择“显示目标文件”复选框2,目标文件被显示,否则不显示。5.单击“确定”命令按钮完成上述功能,并直接按Enter键,也能执行“确定”命令按钮的单击事件功能。二、设计步骤1.在命令窗口输入命令:CREATEFORMmyform02.向表单添加如上图所示的各对象

6、3.设置各对象的属性:1)表单对象属性设置Caption:系统时间(放在timer1的timerevent中)Name:myform0autocenter:.T.2)label1对象属性设置Caption:源数据表文件3)label2对象属性设置Caption:目标数据表4)check1对象属性设置Caption:仅复制表结构5)check2对象属性设置Caption:显示目标数据表6)time1对象属性设置Interval:5007)command1对象属性设置Caption:确定Default:.t.8)timer1的

7、timerevent代码程序:thisform.caption=time()9)“确定”按钮CliclEvent程序代码a=alltrim(thisform.text1.value)b=alltrim(thisform.text2.value)docasecasethisform.check1.value=0andthisform.check2.value=0select*from&aintotable&b*复制表文件但不显示目标数据表casethisform.check1.value=0andthisform.check

8、2.value=1select*from&aintotable&bselect*from&b&&复制表文件但显示目标数据表casethisform.check1.value=1andthisform.check2.value=0select*from&awhere.f.intotable&b*复制表文件

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。