欢迎来到天天文库
浏览记录
ID:45340322
大小:1.48 MB
页数:74页
时间:2019-11-12
《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.check8、2.value=1select*from&aintotable&bselect*from&b&&复制表文件但显示目标数据表casethisform.check1.value=1andthisform.check2.value=0select*from&awhere.f.intotable&b*复制表文件
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*复制表文件
此文档下载收益归作者所有