今天是:   旧版网站
VFP6.0中标签、表单功能的应用
来源:威尼斯城娱乐官方平台   编辑:杨文强    日期:2008-12-30   浏览量:939  
摘要  在计算机技术快速发展的年代,如何应用大家所学的计算机常识,更好地为大家的工作、生活服务,进一步提高大家的工作水平和工作效率,是大家每一位计算机用户的美好夙愿。对此,文章结合自己的教学实践和实际需要,主要分五个步骤讨论应用VFP6.0的标签、表单功能编制、打印学生成绩报告单的过程
关键词 准备数据源;创建标签;修正标签;打印标签
 
The application of the label and form for VFP6.0
 
Yang  Wen  Qiang
 
(ChangZhou Tour & Trade high technology vocational School 
 ChangZhou City JiangSu Province 213003)
Abstract: During the years of the rapid development for computer technology, how to apply the computer technology we’ve learned in order to serve our jobs and lives better and to improve our work level and work efficiency further, is good hope for every computer users. Therefore this article discusses the applying to the label for VFP6.0; the recopying of form function and the process of printing the students’ score documents in five steps according to the practical need.
Key words: preparing datasource; establishing label ; modifying label; print label
 
利用VFP6.0的标签功能编制学生成绩报告单、学生佩戴的标志牌、商品价格标签等,既方便又实用,下面以编制学生成绩报告单为例来说明VFP6.0标签功能的使用方法。
一.准备好数据源
    一般情况下可直接利用VFP6.0提供的数据表;但也可使用Excel中的数据,此时需要利用VFP6.0的数据导入功能,生成相应的数据表,再加以使用。下面以VFP6.0中的数据表为例,根据实际需要准备好有关的数据。
二.使用标签向导创建标签,操作步骤如下:
1)选择“文件”菜单中的“新建(N)…”命令,再选中“标签(L)”选项,最后单击“向导(W)”按钮。
2)在标签向导“步骤1-选择表”对话框中,选择相应的数据表。在此选择自由表“学生-报告表” ,再单击“下一步”按钮。
3)在标签向导“步骤2-选择标签类型”对话框中,首先选中“公制(M)”选项,再单击“新建标签(L)…”按钮,在弹出的“自定义标签”对话框中,单击“新建(N)…”按钮,在弹出的“新标签定义”对话框中,自定义一个标签尺寸,如图1所示,最后单击“添加”按钮,将自定义的标签添加到标签型号列表中,并选中它,然后单击“下一步”按钮。
   图1
4)在标签向导“步骤3-定义布局”的对话框中,根据实际设计的需要选用字段之间的间隔符,如:逗号、空格、换行符等来定义标签的布局。
5)在标签向导“步骤4-排序记录”对话框中添加排序的字段,在此选择字段“学号” ,然后单击“下一步”按钮。
6)在标签向导“步骤5-完成”对话框中选择“保存标签并在‘标签设计器’中修改(M)”选项,再单击“完成(F)”按钮。在弹出的“另存为”对话框中给新建的标签命名为:学生成绩报告单,再单击“保存(S)”按钮即可。
      通过上述步骤建立的标签样式并不符合要求,因此需要在标签设计器中进行修正。
三.在标签设计器中修正已创建的标签
在“标签设计器”对话框中,利用“报表控件” 、“布局”工具对标签作进一步的修正,使其符合设计要求。为了更好地使用“报表控件”工具,下面简要先容一下它们的功能:
1)标签控件,用于向页面中指定的位置添加文字。添加文字后,可根据需要进行修饰。
2)域控件,用于添加数据表中的字段,可根据需要删除或添加新的字段。
3)图片控件,用于添加图片。
4)线条、矩形、圆角矩形控件,利用它们可以进一步美化标签。
四.设置标签中的数据源
      当设计的标签样式不变而数据源有变化时,此时只需在标签设计器中改变数据源,而无须重新设计标签,具体方法如下:
1)在标签设计器窗口的空白处单击右键,选择“数据环境(E)…”命令。
2)在数据环境设计器窗口的空白处单击右键,选择“添加(A)…”命令,选中需要添加的数据表后,再单击“添加”按钮,最后单击“关闭”按钮。
3)对已经处理完毕的数据表可以从数据环境中移去,方法是:将鼠标指针指向需要移去的表,单击右键,选择“移去(R)”命令,单击即可。
为了改变标签中的数据源,需要产生一个临时表LS.DBF,方法是:在“命令窗口”中输入下列两行命令语句:
n=‘030101’ 
SELECT * from 学生-报告表 where 学号=n into dbf ls
临时表LS.DBF产生后,可以单击菜单栏中的“显示”选单,选择“浏览”命令查看有关内容。根据上面先容的具体方法,在“数据环境设计器”窗口中添加临时表LS,同时移去数据表“学生-报告表”即可。
五.设计打印标签的表单
设计一个表单调用打印标签的程序,以利于按学生学号打印学生成绩报告单,表单样式如图2所示,操作步骤如下:
   图2
1)选择“文件”菜单中的“新建(N)…”命令,再选中“表单(F)”选项,最后单击“新建文件(N)”按钮。
2)在表单设计器窗口,进行如下设置:
A.表单属性。在表单的空白处单击右键,选择“属性 (T)”命令,再选择“布局”选项卡,设置如下参数:
AutoCenter:.T.-真                  Caption: 打印学生成绩报告单
Height: 200                        Width:   400
B.添加表单过程程序。双击表单,弹出“对象/过程”窗口,在“过程”组合框中选择“Init”项,并在窗口中添加如下代码:
public n
n=’’
C.添加两个标签并设置属性。利用标签控件在表单上添加两个标签,并在“属性”窗口中选择“布局”选项卡,分别设置如下参数:
         标签控件1                       标签控件2                 
Caption: 请输入学生学号:         Caption:欢迎正确使用!         
FontSize:12                      FontName:宋体               
Height:   24                      FontSize:10               
Left    70                      ForeColor:0,0,255         
TOP     50                                                
Width:    120                                                 
D.添加文本框并设置属性。在表单上添加一个文本框,并在“属性”窗口中选择“布局”选项卡,设置如下参数:
Height: 25        Left:190      TOP: 50        Width: 85
E. 添加计时器并设置属性,计时器控件用于动态显示标签控件文本。在表单上添加计时器,并在“属性”窗口中选择“全部”选项卡,设置如下参数:
    Enabled: .T.        Interval: 180         Name: Timer1
F. 添加计时器过程程序。双击Timer1控件,弹出“对象/过程”窗口,在“过程”组合框中选择“Timer”项,并在窗口中添加如下代码:
 if thisform.label2.left>400
    thisform.label2.left=thisform.left-200
else
     thisform.label2.left=thisform.label2.left+10
endif
G.添加“打印”按钮并设置属性。在表单上添加一个“打印”按钮,并在“属性”窗口中选择“布局”选项卡,设置如下参数:
Caption: 打印           FontSize:10         Height:   36
Left    72            TOP     120        Width:    80
H.添加“打印”过程程序。双击“打印”按钮,弹出“对象/过程”窗口,在“过程”组合框中选择“Click”项,并在窗口中添加如下代码:
IF alltrim(n)=' '
 messagebox('目前您没有输入学生学号,请输入需要打印的学生学号。',0+64, '提示信息')
 thisform.text1.setfocus
 return
 ELSE
 SELECT * from 学生_报告表 where 学号=n into dbf ls
IF reccount( )=0
messagebox('目前您输入的学生学号不存在,请重新输入需要打印的学生学号。',0+64,'提示信息')
 thisform.text1.setfocus
 ELSE
 label form 学生成绩报告单.lbx environment to printer noconsole
 ENDIF
ENDIF
I.添加“退出”按钮并设置属性。在表单上添加一个“退出”按钮,并在“属性”窗口中选择“布局”选项卡,设置如下参数:
Caption: 退出           FontSize:10          Height:   36
Left    216           TOP     120         Width:    80
J.添加“退出”过程程序。双击“退出”按钮,弹出“对象/过程”窗口,在“过程”组合框中选择“Click”项,并在窗口中添加如下代码:
Thisform.release
3)运行表单。在打开表单设计器的情况下,单击Visual FoxPro菜单栏下方工具栏中的按钮,表单即开始运行。在表单上的文本框中输入学生学号,再单击“打印”按钮,此时弹出“ls.dbf已经存在,改写吗?”的对话框,选择“是(Y)”按钮即可。若输入的学生学号已存在,则可打印出所需的标签;若输入的学生学号不存在,则提示重新输入;若需退出表单,则直接单击“退出”按钮即可。
上面就是利用VFP6.0的标签、表单功能编制、打印学生成绩报告单的过程,在日常工作中,大家经常需要处理一些类似的文档,使用VFP6.0的标签、表单功能来处理这类文档可以极大地提高大家的工作效率。
 
参考文献
[1]谢荣传,王永国。 Visual FoxPro程序设计[M]。北京:清华大学出版社,2003.233-235.
[2]柳青,李拥军,谭小球。Visual FoxPro程序设计教程[M]。北京:高等威尼斯城出版社,2003.245-258.
[3]魏茂林。数据库应用技术---Visual FoxPro 6.0(第2版) [M]。北京:电子工业出版社,2004.117-128.
[4]曲景东,王怡灵。新手学Visual FoxPro 30例[M]。北京:人民邮电出版社,2004.176-185.
 [编辑概况]杨文强(1970.12-),副教授,电子信息系,主要从事计算机有关课程的教学、实训工作,着手网络技术研究。


XML 地图 | Sitemap 地图