留言查询

首页前一页后一页末页 [195] [196] [197] [198] [199]	本留言簿共有493条记录, 现在时间2025-5-24 16:28:18,计算机地址：192.168.9.44 日期查询：	现在是第39页一共有99页
Books库中表及结构信息	环境：一键安装　库表：Mysql.sql　 xx3.sql　xx4.sql　页面：Myphp.php

序号

留言内容

199

D:2013-1-21
T:9:36:00
IP:192.168.8.40

作者：
张顺海

技能考核：

2012-2013学年第一学期微机58班技能考核（操作部分）

操作题（以tushu.dbf为例，共5题）写出命令及结果中记录的数量。

1. 将图书信息中含有‘中国’的所有图书信息筛选出来：

2. 把‘中国戏剧’出版社出版的，‘套数’是1套和2套的书籍信息筛选出来

3. 将tushu.dbf中，单价在20(不含20）至99（含99）元的图书信息筛选出来的命令

4. 把‘大众文艺’出版社出版的，单价是20、23、25、27、196元的图书信息筛选出来？

5. 把书名前两个字是‘学生’的信息找出来，应该使用如下的命令：

要求：将操作题写到A4纸上上交，不需要抄题，只按题号书写答案。

下载地址：ftp://192.168.8.40 教学文件->V58->tushu.dbf

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　2013.1.21

198

D:2013-1-16
T:10:22:00
IP:192.168.8.40

作者：
张顺海

2013.1.16 星期三

教学内容：程序控制代码分析

教学目的：掌握程序控制

教学时间：3课时

教学重点：控制逻辑

教学难点：并发控制

教学过程：

一、导入

二、代码分析

（一）程序设计代码：

   记录号 OBJNAME         PROTECTED                                          METHODS
        1
        2 Dataenvironment
        3 Form1                                                                                        PROCEDURE Init
                                                                                                                 public c
                                                                                                                 c=""
                                                                                                                 ENDPROC
        4 Text1
        5 Text2
        6 Text3
        7 Command1                                                                             PROCEDURE Click
                                                                                                                 c="+"
                                                                                                                 thisform.label1.caption=c
                                                                                                                 ENDPROC
        8 Command2                                                                                              PROCEDURE Click
                                                                                                                 c="-"
                                                                                                                 thisform.label1.caption=c
                                                                                                                 ENDPROC
        9 Command3                                                                                              PROCEDURE Click
                                                                                                                 c="*"
                                                                                                                 thisform.label1.caption=c
                                                                                                                 ENDPROC
       10 Command4                                                                                              PROCEDURE Click
                                                                                                                 c="/"
                                                                                                                 thisform.label1.caption=c
                                                                                                                 ENDPROC
       11 Command5                                                                                              PROCEDURE Click
                                                                                                                 a=allt(thisform.text1.value)
                                                                                                                 b=allt(thisform.text2.value)
                                                                                                                 d=a+c+b

                                                                                                                 thisform.text3.value=&d

                                                                                                                 ENDPROC
       12 Label1
       13 Label2
       14

（二）分析

1.对象

2.属性

3.事件

4.代码

5.逻辑

三、练习

四、作业

五、教学反思

197

D:2013-1-14
T:8:51:00
IP:192.168.8.40

作者：
张顺海

2013.1.14 星期一

教学内容：面向对象编程

教学目的：掌握窗体、对象、行为与属性之间的关系

教学难点：什么样的什么，在什么时候，发生了什么

教学重点：常见的属性及调用方法

教学时间：2课时

教学过程：

一、我们学习的VFP是面向对象程序设计的一种，即OOP。（扩展知识点）

OOP: Object Oriented Programming,面向对象的程序设计。所谓“对象”就是一个或一组数据以及处理这些数据的方法和过程的集合。面向对象的程序设计完全不同于传统的面向过程程序设计，它大大地降低了软件开发的难度，使编程就像搭积木一样简单，是当今电脑编程的一股势不可挡的潮流。

Visual FoxPro成长之路

Visual FoxPro（以下简称VFP）是个不断成长的小伙，承蒙Visual Studio（以下简称VS）的关照，VFP在开发者心目中一直是和VB、VC地位相同的工具语言，只不过它并不是通用开发工具，而只是专注于数据库应用的开发。

然而，吊足大家胃口的VS. NET终于出现在开发者面前时，竟不见了VFP的身影，着实引起开发社区的一阵骚动。微软不要VFP了？不是，恰恰相反，VFP忍受不了VS缓慢的升级速度，“单干”了。现在的VFP已经升级到版本9，并且完全支持.NET技术。

VFP 6

Visual FoxPro 6.0及其中文版，是可运行于Windows 95和Windows NT平台的32位数据库开发系统，它不仅可以简化数据库管理，而且能使应用程序的开发流程更为合理。Visual FoxPro 6.0使组织数据、定义数据库规则和建立应用程序等工作变得简单易行。利用可视化的设计工具和向导，用户可以快速创建表单、查询和打印报表。

Visual FoxPro 6.0还提供了一个集成化的系统开发环境，它不仅支持过程式编程技术，而且在语言方面作了强大的扩充，支持面向对象可视化编程技术，并拥有功能强大的可视化程序设计工具。目前，Visual FoxPro 6.0是用户收集信息、查询数据、创建集成数据库系统、进行实用系统开发较为理想的工具软件。

VFP 7

Web Services支持 VFP 7支持注册和发布Web Services，而无需使用Microsoft SOAP Toolkit和VFP扩展来从底层完成这些任务；

服务器增强 VFP 7对于COM服务器作了很大程度的增强，可以与核心平台如COM+服务进行互操作；

XML支持为了适应以XML形式在Web上传送数据的潮流，VFP 7提供了一些函数用于在XML数据和FoxPro游标（Cursor）或表格（Table）之间的转换。

多样的XBase特性 VFP添加了很多新的或改进的XBase特性，并且这些特性都是用VFP语言编写的；

OLE DB Provider 通过实现OLE DB Provider接口，开发者可以在任何支持OLE DB的程序和语言中调用VFP数据。

VFP 8

n 数据特性增强 VFP 8对其数据特性进行了改进，并增加了很多新的数据特性，包括：远程数据连接、创建DataEnvironment类、自动增长域值、支持对照序列、与SQL语句Select…Union之间的隐式数据转换、使用SQL Select命令插入行等；

其他增强 VFP 8对一些工具、示例数据库和解决方案案例都进行了改进。

VFP 9

数据和XML增强这一时期的VFP对其数据特性进行了巨大的加强，改进项目之多真是令人眼花缭乱，详情可以参考这里，此处不再赘述；

实现SQL语言 VFP 9已经能够充分地支持SQL查询语言；

设计器的增强 VFP 9增强了这些设计器：报表和标签设计器、菜单设计器、表格设计器、查询和视图设计器、数据环境设计器以及类和窗体设计器等；

其他方面的增强和VFP 8一样，VFP 9在其他微小的细节上进行了不少的改进，使得开发者的体验更加舒适。

后续

微软已经于，2007年前后，宣布 Visual Foxpro 停止研发，VFP9 是最后一个官方版本。微软在曾经2007年3月份的时候声称，将会对 Visual Foxpro 开放源代码到，其代码共享社区站点CodePlex上，但是截止到2010年4月，在CodePlex似乎似然搜索不到Visual Foxpro的源代码。

日前，在微软官方网站释出了一份公告A Message to the Community，说明未来将不会再推出 VFP 10，并且持续 VFP 9 的支持到 2015 年，之后只会在 2007 年夏季推出 SP2。2006年进行的 Sedna 项目则是增强VFP对SQL Server 2005与 Vista的支持，其他的一些项目则已经开源到CodePlex。

二、简单编写程序

1.建立一个新窗体

2.建立三个文本框，五个按钮。

3.其中两个文本框用来获得两个数，五个按钮中的四个分别为加、减、乘、除，根据获得的两个数字，再根据加、减、乘、除获得的运算符，得到一个结果，显示到第三个文本框中。第五个按钮是计算，通过按钮才计算出得数。

三、练习

四、总结

五、作业

六、反思

196

D:2013-1-8
T:11:11:00
IP:192.168.8.40

作者：
张顺海

2013.1.9 星期三

教学内容：讲评试卷（月考）

教学目的：掌握问题的分析

教学时间：3课时

月考成绩单：

高艳美：51+15+21.5=87.5

刘苗：45+8+14=67

徐青：45+10+18.5=73.5

李顺利：48+11+20.5=79.5

赵美杰：48+9+10.5=67.5

耿京倩：40+15+21.5=76.5

霍梦林：51+10.5+18.5=80

月考试卷原题：

2012-2013学年第一学期三年级微机升学班

12月月考《VisualFoxPro6.0》试题

一、选择题：（共20题，每题3分，总计60分）

1.确定命令按钮标题的属性是：

A．text

B．value

C．caption

D．标题

2.在Visual FoxPro，字段具有固定长度为1的字段类型是。

A．字符型 B. 日期型

C．逻辑型 D. 以上都不对

3．在下面的表达式中，运算结果为逻辑假的是。

A．EMPTY(. NULL.)

B．VAL(“15>4”)

C．AT(“A”, “123ABC”)

D．EMPTY(SPACE(10) )

4.数据库（DB）、数据库管理系统（DBMS）、数据库系统（DBS）三者之间的关系是

A.DBS就是DB，也就是DBMS

B.DBS包括DB和DBMS

C.DBMS包括DB和DBS

D.DB包括DBS和DBMS

5．一个数据库表名student，要想打开它，应使用命令。

A．OPEN student

B．OPEN DATA student

C．USE DATE student

D．USE student

6．For i=-4 to 3 step 2 ……endfor 语句块控制的循环次数为：。

A．0

B．2

C．4

D．6

7．在Visual FoxPro中，不允许在记录中出现重复索引值的索引是。

A．主索引

B．主索引、侯选索引和普遍索引

C．主索引、侯选索引

D．主索引、侯选索引和唯一索引

8．在下列函数中找出函数值类型不一致的一组。

A．subs( )、file( )、rtim( )、str( )

B．val( )、len( )、at( )、int( )

C．date( )、ctod( )、date( )+10、date( )-100

D．bof( )、found( )、eof( )、dele( )

9．将指针定位于记录号为100的记录上的正确命令格式为：

A．skip 100

B．go to 100

C．locate for recn( )=100

D．find 记录号=100

10.要给所有男同学减少补贴20元，应该使用的命令为（）

A.change all补贴with补贴-20 for性别='男'

B.replace all补贴with补贴-20 for性别='男'

C.change补贴 with补贴-20 for性别='男'

D.replace补贴with补贴-20 where性别='男'

11将当前表结构复制成xs2.dbf，应该使用的命令为：

A.copy to xs2

B.copy stru to xs2

C.copy file to xs2

D.copy stru to xs2 exte

12 将自由表xs2.dbf添加到当前数据库中的命令为：

A.drop table xs2

B.use table xs2

C.add table xs2

D.remove bable xs2

13. 在5号工作区打开了数据表xs.dbf，并指定了别名为dd，当前工作区为3号，不能选择5号工作区为当前工作的的命令为：（）

A.sele 5

B.sele E

C.sele dd

D.sele xs

14修改表的结构（modi stru)包括：增加字段、删除字段、修改字段，调整字段顺序，设置字段属性。VFP中一个表格最多允许［］个字段。

A.64

B.128

C.255

D.10

15.在关系型数据库管理系统中有3种基本的关系操作，不包括下面哪种（）

A．筛选 B.比较 C.投影 D.连接

16.在VFP中，运算结果是“Test”的表达式为（）

A.LEFT(“YourTest”,ASC(“F”)-ASC(“A”))

B.RIGHT(“YourTest”,AT(“Test”,“YourTest”))

C．SUBSTR("Your"-UPPER("test"),5,4)

D．SUBSTR("YourTest",AT("Test","YourTest"),4)

17.在下列关于VFP变量的叙述中，正确的是（　）

A.使用一个简单变量之前要先声明，再使用

B.在VFP中，变量分为字段变量和内存变量

C.如果内存变量名与当前数据表中的字段名相同，则内存变量优先被使用

D.不能将不同类型的数据赋值给同一个变量

18.在VFP中，DO WHILE…ENDDO循环结构中，LOOP的作用是（）

A.退出循环过程，返回程序开始处

B.转移到DO WHILE 语句行，开始下一次判断和循环

C.终止循环，将控制转移到循环结构ENDDO后面的第一条语句继续执行

D.终止程序执行

19.dime abc（4，6）的数据定义语句中，共定义了（）个数组元素。

A.10

B.35

C.24

D.4

20.在vfp中，已经x=“11”，y=“1122”，则表达式：not (x==y) and (x$y) or (x<>y)的值为：

A..T.

B..F.

C.11

D.1122

二、填空题（共3空，每空5分，计15分）

1. 利用SQL语句的定义功能，建立一个学表文件（ABC.dbf），其中XH,C型，6个长度；XM，C型，6个长度；CSNY，D型；SFZH，C型，18个长度；TXDZ，C型，50个长度。语句为：

1 。

2.某图书数据库中有3个表，图书.dbf、读者.dbf和借阅.dbf。它们的结构分别如下：

图书（　总编号C（6），分类号C（16），书名C （30），作者C（6），出版单位C（20），单价N（6,2）　）　

要求：

(1)如果要在藏书中查询第二个字是“国”字的图书，请填空。

SELECT书名，作者FROM图书 WHERE 2 。

(2)将读单价在15至25元之间（包括15、25），图书记录检索出来，结果按单价降序排列，并保存到ts2010.dbf中去，请填空。

Sele 书名,单价from 图书where 3 。

三、程序分析并填空（共3题，第1题10分，第2题10分，第3题5分）

1.打印杨辉三角前10行（每空2分）

1　1

1　2　1

1　3　3　1

1　4　6　4　1

5　10　10　5　1

……..

clea

dime

for i=1 to 10

endfor

for i=3 to

for j=2 to i-1

a(i,j)=

endfor

for i=1 to 10

for j=1 to i

?? a(i,j)

endfor

return

2输出斐波数列：1　1　2　3　5　8　13　21　34　55　89....的前20项及它的和。（每空2分）

clea

dime a(20)

a(1)=1

a(2)=1

for i=3 to 20

a(i)=

endfor

for i=1 to

?? a(i)

？

return

3.下面程序的功能是完成图书查询，用户输入书名后，从图书表（图书.dbf）中查询给定书目的信息。若用户没输入书名，则要求用户重新输入，若用户输入字符串“000”，则结束查询。　（每空２.５分）

　　USE　图书

　　DO　WHTLE .T.

　　　ACCEPT　“请输入书名：”TO　SM

　　　IF　LEN（ALLTRIM（SM））＝0

　　　 loop

ENDIF

IF ALLTRIM(SM)=”000”

ENDIF

　　LOCATE　ALL　FOR　书名＝ALLLTRIM（SM）

　　IF　FOUND（）

　　DO　WHILE.NOT.EOF（）

　　　 DISPLAY

　　ENDDO

　　ELSE　

　　　？“查无此书”

　　ENDIF

　　ENDDO　

　　RETURN

2012-2013学年第一学期三年级微机升学班

12月月考《VFP6.0》答题纸

一、选择题（3*20=60分）姓名：

1.	2.	3 .	4.	5.	6.	7.	8.	9.	10.
C	C	D	B	D	C	C	A	C	B
11.	12.	13.	14.	15.	16.	17.	18.	19	20.
B	C	D	C	B	D	B	B	C	A

二、填空题（5*3=15分）

1. create table abc (xh c(6),xm c(6),csny d, sfzh c(18),txdz c(50)) 。

2. subs(书名,3,2)="国" 或者书名 like "_国%" 或者 at("国",书名)=3 。

3. 单价 between 15 and 25 order by 单价 desc into table ts2010 。

三、程序分析填空：（25分）

1. a(10,10)

2. a(i,1)

3. a(i,i)

4. 10

5. a(i-1,j)+a(i-1,j-1)

1. a(1)+a(2) 或者 2

2. a(i-1)+a(i-2)

3. s=s+a(i)

4. 20

5. "s=",s

1. exit

2. continue

195

D:2012-12-19
T:11:12:00
IP:192.168.8.40

作者：
张顺海

2012.12.19 星期三

教学内容：循环在数据表记录处理的应用

教学目的：数据表相应函数的应用

教学方法：理时一体

教学重点：循环、数据表的处理

教学难点：数据表的相关函数应用

教学过程：

一、复习、巩固

二、新授

1.循环的语法：

do 循环
for 循环

2.表格（数据表dbf）处理

三、练习

四、作业