VFP查询系统实现技巧六则
用VFP6．0编写完整的应用程序时 查询系统往往是不可缺少的重要部分。而
开发一个优秀的查询系统需要很多的应用技巧。由于工作原因，笔者经常开发查询系统模块，现将个人编程中总结的一些技巧介绍给大家，希望对读者的应用开发有所帮助。
任务进度条的实现
在查询的过程中，如果数据较多，需要用户等待时，查询系统中应有进度条加以显示，才能使系统更加具有规范性。具体实现方法如下：
1.选择VFP的系统选单“工具”中“选项”条，弹出“选项”窗口，在窗口中点击“Activ eX控件”栏，添加任务进度栏控件Microsoft ProgressBar Control Version5.0（SP2）至ActiveX工具箱中。
2.选定表单控件工具栏中“ActiveX控件”，添加控件Microsoft ProgressBar Control Version6.0至查询的表单Form1中，并设置其属性Max值为1000。
3.将下列代码添加到数据查询程序代码之后：
for i=1 to 1000
for j=1 to 2000
j=j+1
endfor
thisform.olecontrol1.value=i
i=i+1
endfor
messagebox(数据查询完毕，OK！,0+64)
thisform.release
clear events
通过这样的设置，在查询时如果时间较长，查询进度条会为用户显示查询任务的运行情况。
应用宏命令实现组合查询
在组合查询中，需要查询的组合项通常很多，如果每项都使用不同的变量，编程会非常烦琐。笔者使用宏命令轻松实现查询组合条件，具体实现的方法是在查询按钮里加入如下代码：
LOCAL cFilter,nCnt,cCondition
FOR nCnt = 1 to THISFORM.ControlCount
IF TYPE(THISFORM.Controls(nCnt).controlSource) <> "U" THEN
IF !EMPTY(THISFORM.Controls(nCnt).ControlSource) AND ;
TYPE(THISFORM.Controls(nCnt).value) <> "U" THEN cCondition=THIS.Parent.parseCondition(THISFORM.Controls(nCnt).value,THISFORM. Controls(nCnt).controlSource)
IF !EMPTY(cCondition) THEN
cFilter = cFilter + " AND " cCondition
ENDIF
ENDIF
ENDIF
ENDFOR
通过这样的设置，虽然有多个查询条件，但查询的组合条件为cFilter，以后的应用只要对cFilter进行处理即可。
删除查询表中的空记录
使用类查询（_dataquery.vcx）时，会在待查询表中的最后自动插入一条空记录，而在实际的GRID表格显示中，我们是不希望将空记录显示出来的。下面是解决此问题的详细步骤：
1.在主程序或Form对象的Load事件输入以下代码:
SET DELETE ON
2.在查询结束代码后输入以下代码：
Thisform.Refresh
&&&&刷新表单
go bottom
delete next 1
&&&&因为当前表被添加了一个空记录，在实际应用中应删除掉
Thisform.Grid1.Column1.Setfocus
go top
Thisform.grid1.refresh
&&&&删除一条记录后，应及时地刷新GRID表
**************************
为VFP添加循环微调控件类
在VFP编程中，微调控件是最常用的控件之一。按照微调控件提供的基本功能，通过单击向上或向下箭头，而达到微调控件的最大或最小值时，如继续单击向上或向下箭头，将保持最大或最小值不变。笔者通过对Spinner控件属性和事件的分析，用编程的方法实现了循环微调控件功能。
循环微调控件(CycleSpinner)所实现的功能是：当单击向上箭头而达到最大值时，再单击向上箭头，能自动跳到最小值；当单击向下箭头而达到最小值时，能自动跳到最大值；其余功能均继承Spinner基类的功能。具体实现方法如下：
利用表单控件，在表单中设计一个微调按钮，并设置如下属性：
SpinnerHighValue=Max
＆＆Max应小于Spinner基类所
＆＆提供的最大默认值
SpinnerLowValue=Min
＆＆Min应大于Spinner基类所
＆＆提供的最小默认值
Value=1
Name=′CycleSpinner′
在Init事件中写入如下代码：
This.SpinnerHighValue=This.SpinnerHighValue＋This.Increment
This.SpinnerLowValue=This.SpinnerLowValue－This.Increment
在InteractiveChange事件中写入如下代码：
If This.Value=This.SpinnerHighValue
This.Value=Int(This.SpinnerLowValue＋This.Increment)
Endif
If This.Value=This.SpinnerLowhValue
This.Value=Int(This.SpinnerHighValue－This.Increment)
Endif
Thisform.Refresh
再将其作为类保存起来，添加到你的类库中。
若你在编程中，需用此功能，就可直接用此循环微调控件类了。
**************************
VFP中焦点行的动态显示
在用VFP设计一个应用系统时，信息的浏览是其中一个相当重要的功能。人们一般用Grid对象来显示数据信息，但该对象在使用功能上却存在一些不足。
提出问题
当使用者在记录之间移动焦点时，只有获得焦点的记录的某一个字段以不同于Grid背景的颜色显示。为使整条记录均用同一种颜色突出显示（本文示例为蓝色背景），即当数据记录移动时，用颜色动态变化显示相对光标所在记录的位置，可以在Grid对象的afterRowColChange事件过程中加入如下内容：
this.setall(“dynamicbackcolor”,“iif(this.activerow=recno(),rgb(0,0,255),rgb(255,255,255) )”,“column”)。
笔者在使用中发现：如果设置了Set delete on环境参数，则当逻辑删除记录后，动态背景的颜色显示就会出现混乱。
分析问题
这种情况一般有两种解决方法：
●执行pack命令，再重新创建和设置Grid的各项属性；
●先将没有删除标志的记录复制到一个临时表中，用zap命令删除源表中所有记录，再将没有删除标志的记录从临时表追加到源表中。
这两种方法实质上都是把已逻辑删除的记录从数据表中真正删除，缺点是两种方式都要求该表必须以独占方式打开。
如果表是以共享方式使用，那么又该如何处理呢？其实，动态背景颜色不能正确
显示的原因是由于逻辑删除记录，该操作造成光标所在的行activerow()不等于数据的记录号recno()，从而导致了动态背景颜色的显示出现混乱。笔者通过两个表的关联成功地解决了这一难题。
解决问题
我们以一个实际的例子来说明如何解决这一问题。设有一个表cenji.dbf，表的字段分别为：学号、姓名、姓别、成绩。新建一个表单，并创建一个Grid对象，设置Grid对象的recordsource属性为cenji,在Grid对象的afterRowColChange事件过程中添加如下代码：
LPARAMETERS nColIndex
if this.activerow = recno()
this.setall(“dynamicbackcolor”, “iif
(this.activerow=recno(), rgb(0,0,255),rgb(255,255,255))”,“column”)
else
select 学号from cenji where .not. deleted() into cursor temp_table
select temp_table
index on 学号tag xh
set relation to 学号into temp_table in cenji
sele cenji
this.setall(“dynamicbackcolor”,“iif(this.
activerow=recno(…temp_table), rgb(0,0,255),rgb(255,255,255))”,“column”)
endif
thisform.refresh
在上述代码中，当逻辑删除记录造成光标所在的行activerow()不等于数据的记录号recno()时，只需对数据建立一个关联子表，当记录指针在父表cenji中移动时，子表temp_table的记录指针移到学号相同的记录上。子表的记录号是不包括逻辑删除记录的，保证了光标所在行的子表记录号recno(…temp_table)等于光标所在的行activerow()，从而使该行动态背景颜色能正确显示。本文为了说明方便, 在afterRowColChange事件过程中建立子表，实际上最好在Delete等命令之后建立。
另外，当activerow属性与recno()函数配合使用动态显示背景颜色时，一般会提示用户“请不要在所显示的记录中设定主索引”，否则不能正确动态显示。实际上，按照如上方法，同样可以解决这一问题。
设表cenji.dbf中，按成绩字段建立一个主索引,在Grid对象的afterRowColChange 事件过程中写下如下代码：
LPARAMETERS nColIndex
select 学号from cenji into cursor temp_table order by 成绩desc
select temp_table
index on 学号tag xh
set relation to 学号into temp_table in cenji
this.setall(“dynamicbackcolor”,“iif
(this.activerow=recno(…temp_table?), rgb(0,0,255),rgb(255,255,255))”,“column”)
thisform.refresh
同样，不一定要在Grid对象的afterRowColChange事件过程中建立关联子表temp_table。
本文代码在中文版Windows 98和Visual Foxpro 6.0中运行通过。
【摘要】通过使用Microsoft Visual FoxPro 6.0软件开发形成一个小型学生学籍管理系统，该系统可实现对学生成绩的循环查询、修改、添加、删除以及档案管理等功能，以此来巩固我们所学的数据库管理知识。使用系统时，可以通过系统菜单进行各种操作，菜单元素主要是表格和表单组成。表单的实现是经过程序实现的。
【关键字】学生成绩档案管理程序执行
【正文】
Visual FoxPro 命令一览表：
CREATE DATABASE ：建立并打开一个数据库文件命令
CREATE FORM ：打开表单设计器命令
APPAND FROM ：从另一个文件添加记录到当前表的末尾命令
CREATE ：创建一个新的Visual FoxPro数据库表命令
COUNT ：统计表中的记录数命令
BLANK ：清除当前记录中字段的数据命令
DELETE ：为指定记录加上删除标记命令
PACK ：永久性的删除当前表中加有删除标记的记录命令
DELETE FILE ：从磁盘中删除指定的文件命令
DIR ：显示一个目录或文件夹中的文件信息命令
DISPLAY ：在窗口中显示当前表的信息命令
DISPLAY FILES ：显示文件的有关信息命令
DISPLAY MEMORY ：显示当前内存变量和数组元素的内容命令
EDIT ：显示要编辑的字段命令
EXIT ：退出DOWHILE、FOR、DCAN循环语句结构的命令
IF…ENDIF ：根据逻辑表达式的值有条件地执行一组命令
INDEX ：建立一个索引文件，按某个逻辑顺序显示和访问表中的记录命令INSERT ：在当前表中插入一条新记录，然后显示该记录并进行编辑命令
LIST ：显示库文件命令
HELP ：打开帮助窗口命令
DO CASE…ENDCASE ：将执行第一个逻辑表达式中为真的那个分支后面的一组FOR…ENDFOR ：将一组命令反复执行指定的次数
DO WHILE…ENDDO ：根据指定的条件循环执行一组指定的命令
GO/GOTO ：移动记录指针到指定记录号的记录中命令
MODIFY DATABASE ：打开数据库设计器，允许用户按交互方式编辑当前数据库MODIFY COMMAND ：打开编辑窗口，以便能编辑或者建立程序文件RENAME ：更换一个文件的名称
MODIFY STRUCTURE ：打开表设计器，以便修改表的结构
REINDEX ：重建当前打开的索引文件
RECALL ：去除当前表中记录的删除标记
SET ：打开数据会话窗口
SEEK ：查找表中索引关键字值与指定的表达式相匹配的第一条记录
SELECT ：选择指定工作区
REPLACE ：更新表中记录
APPEND ：添加一个或多个新记录到表的末尾
BROWSE ：打开窗口并显示当前表或指定表的记录
LOCATE ：顺序查找表中满足指定条件的第一条记录
CONTINUE ：继续执行以前的LOCATE命令
SET TALK ON…SET TALK OFF ：确定Visual FoxPro 是否显示命令的结果
SET DELETED ON…SET DELETED OFF ：指示是否处理带有删除标记的记录
1 题目
学生学籍管理系统的设计与开发
2 问题描述
本课程设计的主要任务是编写一个小型的学生学籍管理系统程序，能够完成学生成绩的输入、修改、汇总和排名；统计学校内教师的分布及任课情况；班级信息和学生信息的建立和修改以及查询及各学期课程的开设和修改；
2.1 业务流程
输入学生的学号及密码后，可自动进入学生学籍管理系统进行相关的操作，具体的操作流程如下：
2.3 功能要求
学籍管理系统实现如下信息的管理：
学生基本信息管理用于班级信息和学生信息的建立和修改以及查询；
课程管理用于各学期课程的开设和修改；
成绩管理用于成绩的查询、输入、修改、汇总和排名；
教师管理用于查看，统计学校内教师的分布及任课情况。
3 分析与设计
3.1 系统分析
该系统可以达到以下几个目的：学生基本资料查询；档案添加与删除，学生个人信
息查询，学生成绩修改、查洵、添加、汇总与排名以及校内教师的分布及任课情况。帮助与退出系统。在软件开发分析阶段，信息收集是决定软件项目可行性的重要环节。程序设计者要通过对开发项目信息的收集，确定系统目标，软件开发的总体思路。
3.2 系统设计
3.2.1数据库文件设计
1．用程序文件建立数据库文件“成绩.dbf”，程序如下；
Create table 成绩.dbf(学号char(10),管理学nume(10,2),人力资源管理nume(10,2),生产;与运做nume(10,2), ERP nume(10,2),物流管理nume(10,2),会计基础nume(10,2), 数据库管理技术；nume(10,2), 开课时间Date (8)
字段名称
字段类型
字段宽度
小数位数
是否索引
学号
字符型
10
普通索引
管理学
数值型
10
无
人力资源管理数值型
10
2
无
生产与运做数值型
10
2
无
ERP
数值型
10
2
无
物流管理
数值型
10
无
会计基础
数值型
10
2
无
数据库管理技术
数值型
10
2
无
开课时间
日期型
8
无
2．用程序文件建立数据库文件“xs.dbf”，程序如下；
Create table xs.dbf(学号char(10),性别char(2),姓名char(10),班级char(10),出生年月
date(8),;籍贯char(10),系编号char(10),照片memo,联系方式char(10) 字段名称
字段类型
字段宽度
小数位数
是否索引
学号
字符型
10
普通索引
性别
字符型
2
无
姓名
字符型
10
班级
字符型10
无
出生年月日期型8
无
籍贯
字符型10
无
系编号字符型10
照片
通用型
4
无
联系方式
字符型
10
无
3.建立“教师管理.dbf”字段名称
字段类型
字段宽度
小数位数
是否索引
教师编号
字符型
普通索引性别
字符型2
无
姓名
字符型10
无
所带课程字符型10
无
职称
字符型
无
照片
通用型
4
无
联系方式
字符型
10
无
4..建立“登录.dbf”字段名称
字段类型
字段宽度
小数位数
是否索引
学号
字符型
10
无
密码
字符型
10
无
3.2.2 结构设计
在结构设计中要求设计整体结构即菜单的结构，菜单下的各个环节的结构以及各个环节又包含了什么元素等。
在进入菜单以前系统具有安全性能，必须经过登录表单才能进入系统菜单。
登录表单的结构如图1：
各控件属性及其程序
label1的timer程序如下：
if https://www.doczj.com/doc/512947718.html,bel1.left=-thisform.width
https://www.doczj.com/doc/512947718.html,bel1.left=thisform.width-8
else
https://www.doczj.com/doc/512947718.html,bel1.left=https://www.doczj.com/doc/512947718.html,bel1.left-10
endif
登录按钮的click程序如下：
if thisform.text1.value=alltrim("0361017") and thisform.text2.value=alltrim("111111") messagebox("登录成功！",0+48+0,”对话窗口”)
else
messagebox("重新登录",0+48+0,”对话窗口”)
thisform.text1.value=""
thisform.text1.setfocus
endif
取消按钮的click程序如下：
release thisform
菜单结构如图2：
3.2.3 程序设计
在程序设计里完成各个查询，档案的新建与删除，信息查看，成绩修改与查看，教师与课程的安排，退出程序的程序设计。VF不但拥有大量的交互式数据管理工具，
而且还拥有一套功能完善的程序语言系统，以及过程式设计和面向对象可视化程序编写工具。虽然是面向对象的可视化编写软件但是程序仍然是软件开发的重点和基础，是不可缺少的部分，开发此系统的饿目的也是需要我们能够独立编写简单的程序，打好程序编写的基础。下面是每个环节的程序原代码。本系统的程序语法简单易懂，没有错误，可以完成基本的程序要求。
3.2.4系统菜单下查询的程序
结构如图3：
全部学生查看的程序如下：
DO form 成绩查询.scx
DO form 成绩录入.scx
DO form 成绩修改.scx
DO form 课程查询.scx
DO form 档案查询.scx
DO form 档案新建.scx
DO form 档案删除.scx
DO form 班级信息查询.scx
3.2.5学生成绩查询程序
学号与姓名是不变的只是要求实现成绩的修改，所以学号与姓名数据绑定后readonly的值是.t.，其他文本框数据绑定后readonly值是.f.。表单的四个按钮的程序与信息查看表单程序是一样的所以不再赘述。
其结构如图4所示
因为它的功能就是实现一般的信息查看，所以他们要有数据环境，各个文本框都有数据绑定且不能对其值进行修改，所以它们的readonly值是.t.。四个按钮的程序分
别是：
第一个
go top
thisform.refresh
this.enabled=.f.
https://www.doczj.com/doc/512947718.html,mand2.enabled=.f. https://www.doczj.com/doc/512947718.html,mand3.enabled=.t. https://www.doczj.com/doc/512947718.html,mand4.enabled=.t. 上一个
if bof()=.t.
this.enabled=.f.
https://www.doczj.com/doc/512947718.html,mand1.enabled=.f. else
skip -1
https://www.doczj.com/doc/512947718.html,mand4.enabled=.t. https://www.doczj.com/doc/512947718.html,mand3.enabled=.t. https://www.doczj.com/doc/512947718.html,mand1.enabled=.t. thisform.refresh
endif
下一个
Visual Foxpro数据库程序设计教案 姓名：李运娣 系别：计算机
第1章 Visual FoxPro 数据库基础 本章重点与学习目标： ?了解数据库系统的相关概念 ?数据、数据库、数据库管理系统、数据库系统 ?数据库管理系统发展过程 ?概念模型以及常用的数据模型—层次模型、网状模型、关系模型?掌握关系数据库 ?关系模型的相关属于 ?数据库设计基础 ?数据库设计的步骤和过程 ?了解VF系统的发展过程 ?数据库管理系统的发展 ?VF的发展简史及了解Visual FoxPro系统的特点 ?掌握VF系统的启动与退出方法 ?熟悉VF系统的用户界面 ?熟悉VF项目管理器 ?创建新项目 ?项目管理器窗口的各类选项卡 教学器材： 多媒体教学 本章课时：3学时 §1.1 数据库基础知识 §1.1.1 计算机数据管理的发展 1. 数据与数据处理数据是指存储在某一种媒体上能够识别的物理符 号；数据处理是指将数据转换成信息的过程。 2. 计算机数据管理 数据管理：是指对数据的组织、分类、编码、存储、检索、维护等， 它是数据处理的中心问题。 数据管理技术的发展过程：人工管理阶段(40年代中--50年代中)；文 件系统阶段(50年代末--60年代中)；数据库系统阶段(60年代末--现 在)。 §1.1.2 数据库系统 1. 数据库有关概念 数据库（DataBase）：指数据库系统中以一定的方式将相关数据组织在一起，存储在外存储设备上形成的、为多个用户共享、与应用程序相互独立的相关数据集合。 数据库管理系统（DBMS）：用于建立、使用和维护数据库的系统软件。 数据库管理系统对数据库进行统一的管理和控制，以保证数据库的安全性和完整性。 数据库应用系统：数据库应用系统简称数据库系统，是指系统开发人
VF常用函数列表数值函数： 1.绝对值和符号函数 格式：ABS（<数值表达式>） SIGN(<数值表达式>) 例如：ABS(-5)=5,ABS(4)=4,SIGN(8)=1,SIGN(-3)=-1,SIGN(0)=0 2.求平方根表达式 格式：SQRT(<数值表达式>) 例如：SQRT(16)=4,它与开二分之一次方等同。 3.圆周率函数 格式：PI() 4.求整数函数 格式：INT(<数值表达式>)返回数值表达式的整数部分 CEILING(<数值表达式>)返回大于或等于表达式的最小整数FLOOR(<数值表达式>)返回小于或等于表达式的最大整数 例如： INT(5.8)=5.8,INT(-7.8)=-7,CEILING(6.4)=7,CEILING(-5.9)=-5 FLOOR(9.9)=9 5.四舍五入函数 格式：ROUND(<数值表达式1>，<数值表达式2>) 功能：返回制定表达式在制定位置四舍五入的结果 例如：
ROUND(345.345,2)=345.35,ROUND(345.345,1)=345.3,ROUND(345.345,0)=345，ROUND(345.345,-1)=350 6.求余函数 格式:MOD(<数值表达式1>,<数值表达式2>) 例如： MOD(10,3)=1 MOD(10,-3)=-2 MOD(-10,3)=2 MOD(-10,-3)=-1 求余数的规律：1.首先按照两数的绝对值求余 2.表达式1的绝对值大于表达式2的绝对值，则余数为表达式1的值 3.余数取表达式1的正负号 4.若两数异好号，余数在加上表达式2的值为最终的结果 7. 求最大值和最小值函数 MAX(数值表达式列表) MIN (数值表达式列表) 例如：MAX(2,3,5)=5 MAX(…2?,?12?,?05?)=2 MAX(…汽车?,?飞机?,?轮船?) 字符串比较的规律： 字符串比较首先比较第一个字母,如果有结果那就不用在进行比较了。如果相等在进行第二个字母的比较，以次类推。 字符函数 1.求字符串长度函数 格式：LEN(<字符表达式>) 功能：返回制定字符表达式的长度，即所包含的字符个数。函数值为数值型 例如：X=“中文Visual FoxPro6.0” 则LEN(X)=20 2.大小写转换函数
黄骅职教中心升学部高二年级期末考试VF试卷 学号_____ 姓名________分数_________ 一、填空：(每空1分，共20分) 1、命令A=2005/4/2之后，内存变量A的数据类型是N (或数值) 型。 2、在全局、局部、私有三种变量中，作用范围最小的变量是局部变量。 3、在SQL查询语句中，显示部分结果的top短语必须要与order by__短语一起来使用。 4、数组A(3,3)中的元素个数是_9_个，其中A(1,1)=1，A(1,2)=2，A(1,3)=3，A(2,1)=4，A(2,2)=5，A(2,3)=6，则A(5)=____5_____. A(9)=___.F.______ 5、VFP中变量名的命名规则：只能使用汉字、字母、下划线和数字 6、当输入比较长的命令时，可加一个分号（或；）来续行，回车后继续在下一行输入。 7、刚打开一个10个记录的表时， BOF()的值是.F.，RECNO()的值是 1 。当执行SKIP -1后，BOF()的值是.T.， RECNO()的值是 1 ，当EOF()的值是.T.时，RECNO()的值是11 。 8、将当前表中所有的学生年龄加1，可使用命令REPLACE ALL年龄WITH 年龄+1 9、表达式LEN（“2008年“+“奥运会”）的值是___12____,STR(56.789,2)的值为_____”57”__。A=“K”，K=-5.9，则TYPE（“&A”）的返回值是___N_, INT(K) 的返回值是___-5__ 10、每个子过程必须以PROCEDURE开头（短语要写完全） 11、有如下一段程序： INPUT "请输入当前日期：" TO RQ ? RQ+5 在执行以上计算命令时，应该输入{^2009/10/23} ，显示结果是：10/28/2009。 (或CTOD(“10/23/09”) 二、判断：(每题1分，共10分) 1、查询教师表中职称为讲师和教授的全部记录，则条件表达式可写成：职称="讲师" and 职称="教授"。F 2、执行命令WAIT TO M后，内存变量M的数据类型是数值型。F 3、select 3和select c功能完全相同，都是选择第三个工作区为当前工作区。T 4、VFP中只能引用一维或二维数组，但数组中各个元素的值的类型可以不同。T 5、命令go top与go 1功能是相同的F 6、同一个时刻，一个工作区只能打开一个表文件，一个表可在不同的工作区打开。T 7、运行查询的命令是DO 查询文件名.qpr。T 8、定义一个3行2列的数组ARR，使用的命令是：dimension ARR(2,3)。F 9、For和While短语都是进行选择操作，所以它们完全相同F 10、子程序中RETURN TO MASTERR 功能是返回最高一级调用程序T
VFP常用函数大全 一.字符及字符串处理函数: 字符及字符串处理函数的处理对象均为字符型数据,但其返回值类型各异. 1.取子串函数: 格式:substr(c,n1,n2) 功能:取字符串C第n1个字符起的n2个字符.返回值类型是字符型. 例:取姓名字符串中的姓. store "王小风" to xm ?substr(xm,1,2) 结果为:王 2.删除空格函数:以下3个函数可以删除字符串中的多余空格,3个函数的返回值均为字符型. trim(字符串):删除字符串的尾部空格alltrim(字符串):删除字符串的前后空格 ltrim(字符串):删除字符串的前面的空格例:去掉第一个字符串的尾空格后与第二个字符串连接 store "abcd " to x store "efg" to y ?trim(x)+y abcdefg 3.空格函数: 格式:space(n) 说明:该函数的功能是产生指定个数的空格字符串(n用于指定空格个数). 例:定义一个变量dh,其初值为8个空格store space(8) to dh 4.取左子串函数: 格式:left(c,n) 功能:取字符串C左边n个字符. 5.取右子串函数: 格式:right(c,n) 功能:取字符串c右边的n个字符例:a="我是中国人" ?right(a,4) 国人?left(a,2) 我 6.empty(c):用于测试字符串C是否为空格. 7.求子串位置函数: 格式:At(字符串1,字符串2) 功能:返回字符串1在字符串2的位置 例:?At("教授","副教授") 2 8.大小写转换函数: 格式: lower(字符串) upper(字符串) 功能:lower()将字符串中的字母一律变小写;upper()将字符串中的字母一律变大写例: bl="FoxBASE" ?lower(bl)+space(2)+upper(bl) foxbase FOXBASE 9.求字符串长度函数: 格式:len(字符串) 功能:求指定字符串的长度 例:a="中国人" ?len(a) 6 二.数学运算函数: 1.取整函数: 格式:int(数值) 功能:取指定数值的整数部分. 例:取整并显示结果?int(25.69) 25 2.四舍五入函数: 格式:round(数值表达式,小数位数) 功能:根据给出的四舍五入小数位数,对数值表达式的计算结果做四舍五入处理 例:对下面给出的数四舍五入并显示其结果 ?round(3.14159,4),round(2048.9962,0),round(2048.9962,-3
第一套、第二套题 一．判断 1.数据表和自由表无差异。 2.Vf允许您将同一个表重复打开在不同工作区中。 3.执行delete命令一定要慎重，否则记录逻辑删除后，将无法恢复。 4.自由表的字段名最长为10个字符。 5.设表文件中有8条记录，且已打开，当bof（）为真时，recno()的返回值为1。 6.您可以在一个工作区中同时打开多个表。 7.设表文件中有5条记录，且已打开，当bof()为真时，recno()的返回值为0. 8.数据库表可以拥有主索引。 二．选折 1.为表单myform添加事件或方法代码，改变该表单中的控件cmd1的caption属性的正确命令是（） A.THisformset.cmd1.caption=”最后一个“ B.Myform.cmd1=”最后一个“ C.Thisform.cmd1. caption”最后一个“ D.This.cmd1. caption=”最后一个“ 2.物理删除表中所有记录命令是（） A.DELETE B.Skip C.Zap D.Recall 3.将当前库文件内容拷贝到kbo1.dbf库文件中的命令是（） A.Copy stru to kbo1 B.Copy to kbo1 C.Copy stru exte to kbo1 D.Copy file to kbo1 4.在vf 中，浏览表记录的命令是（） https://www.doczj.com/doc/512947718.html,e B.browse C.modify D.close 5.项目管理器中移去文件是指（） A.将文件从磁盘上彻底删除 B.将文件从项目中一区移去 C.移去文件后再也不能恢复 D.移去文件与删除文件相同 6.表单文件的扩展名为（） A..sct B..scx C..vct D..pqr 7.在“选项“对话框的“文件位置“选项卡中可以设置（） A.表达的默认大小
命令按钮常用属性 在应用程序中，命令按钮通常在单击时执行制定操作。以前介绍的大多数属性都可用于命令按钮控件，包括Enabled、Font属性组、Width、Height、Top、Left、Visible。此外，命令按钮还具有以下属性。 （1）Caption 命令按钮上显示的标题文字，通常标题文字用于说明按钮的功能。 在实际运用中，经常需要对命令按钮绑定快捷键来方便按钮的操作，创建由ALT键加字母组合快捷键可由Caption属性进行设置。例如，需绑定ALT+E快捷键组合给一个按钮，如图4-4所示。在设置此按钮Caption属性时，在相应的字母前应加上“&”符号。即将此命令按钮的Caption属性设置为“结束(&E)”。这时，命令按钮的单击（Click）事件可由组合键ALT+E触发。 （2）Cancel 该属性可以设置ESC键与该命令按钮进行快捷键绑定。 当Cancel属性值为True时可设为绑定，在一个窗体内只允许一个命令按钮将Cancel属性设置为True。 （3）Default 该属性可以设置回车键与该命令按钮进行快捷键绑定。 当Default属性值为True时可设为绑定，在一个窗体内只允许一个命令按钮将Default属性设置为True。 （4）Style属性 Style属性可以决定命令按钮的外观样式，该属性只能在设计阶段在属性窗口内设置。该属性可用于多种控件，如单选按钮、复选框、组合框、列表框等。用于命令按钮可以取如下值：0——标准样式，即在命令按钮中只显示文本（Caption属性），没有相关图形。此为默认值。1——图形格式。控件用图形样式显示，在命令按钮中不仅显示文本（Caption属性），而且可以显示图形（Picture属性）。 （5）Picture属性 用该属性可以给命令按钮制定一个图形。为了使用此属性，必须将Style设置为1，否则Picture属性无效。
VFP中常用命令集 一、主要命令： 1、CREATE 作用：建立一个新的表。 格式：CREATE [<文件>|?]（注意，命令字符可取前面四个字符，后面可省略不写，即CREA，下同；中括号表示其中的参数是可选的；|管道符号表示两个参数只能选择一个，不能同时选择，下同。） 说明：文件指建立以.dbf为扩展名的VFP数据库文件，在命令后面加上一个问号表示系统会弹出 对话框，要求用户输入想要建立的表名。在命令中不加文件名或问号系统也会弹出对话框，要求用 户输入想要建立的表名。 2、MODIFY STRUCTURE 作用：显示表文件结构，并允许修改此表的结构。 格式：MODIFY STRUCTURE 说明：只有在用USE命令打开表文件以后，才能显示或修改表文件的结构。3、APPEND 作用：在当前表的尾部（无论表中有无记录）追加记录（在当前表指当前正使用的表）。 格式：APPEND [BLANK] 说明：在APPEND命令后面加上BLANK参数表示在当前表的尾部添加一条空白记录。无BLANK参数时，表示在当前表的尾部添加一条记录并要求用户输入相应的字段内容。 4、INSERT 作用：在表文件中间插入一个新记录。 格式：INSERT [BEFORE] [BLANK] 说明：INSERT 在当前记录后插入一记录； INSERT BEFORE 在当前记录前插入一记录； INSERT BEFORE BLANK 在当前记录前插入一空记录。 5、BROWSE 作用：主要用于打开浏览窗口，查阅表文件并同时进行修改。 格式：BROWSE 6、USE 作用：打开和关闭表文件。 格式：USE [<文件名>]
2015-2016学年第一学期期末考试 13微机专二试卷 姓名分数 一、单选题（在本题的每小题的备选答案中，只有一个答案是正确的，本大题共 45小题，每小题1分，共45分） 1、下面关于总线的叙述中，正确的是（）。 A．总线是连接计算机各部件的一根公共信号线 B．总线是计算机中传送信息的公共通路 C．微机的总线包括数据总线．控制总线和局部总线 D．在微机中，所有设备都可以直接连接在总线上 2、计算机的应用范围广、自动化程度高是由于。 A. 设计先进，元件质量高 B. CPU速度快，功能强 C. 内部采用二进制方式工作 D. 采用程序控制工作方式 3、下列不属于多媒体输出设备的是：（） A、打印机 B、绘图仪 C、音响 D、摄像机 4、无论采用拼音输入法，还是五笔字型输入法输入汉字，存储到计算机内部的一律是汉字的（）。 A．拼音码B．五笔码C．外码D．内码 5、下面存储容量最大的存储设备是 ( ) A、Cache B、硬盘 C、软盘 D、内存 6、下列描述中，正确的是（）。 A．CPU可直接执行外存储器中的程序 B．RAM是外部设备，不能直接与CPU交换信息 C．外存储器中的程序，只有调入内存后才能运行 D．软盘驱动器和硬盘驱动器都是内部存储设备 7、以下对ROM 的说法中，不正确的是：（） A、ROM 是内存储器的一部分 B、ROM 为只读存储器 C、对于ROM 可进行数据读写操作 D、ROM 用于存放特殊的专用数据
8、按照计算机的寄生方式，把寄生于文件中的病毒称为：（） A、引导型病毒 B、文件型病毒 C、复合型病毒 D、混合型病毒 9、下列无符号整数中，与十进制数163 不相等的是：（） A、10100011 （二进制数） B、243 （八进制数） C、A3 （十六进制数） D、FF(十六进制数) 10、windows系统中的CONFIG .SYS 属于：（） A、批处理文件 B、输入输出文件 C、系统配置文件 D、引导文件 11、CPU能够直接访问的存储部件是( ) A、Hard Disk B、Floppy Disk C、RAM D、CD-ROM 12、二进制数1011001转化为十进制数是。 A. 83 B. 81 C. 89 D. 79 13、A文件长度为512KB，B文件长度是2MB，B文件长度是A文件多少倍.....（D ） A．8 B．2 C.3 D．4 14、显示器的分辨率高低表示。 A.在同一字符面积下，像素点越多，其分辨率越低 B.在同一字符面积下，像素点越多，其显示的字符越不清楚 C.在同一字符面积下，像素点越多，其分辨率越高 D.在同一字符面积下，像素点越少，其字符的分辨效果越好 15、Internet Explorer是指( ) A、Internet安装向导 B、Internet信息管理器 C、Internet浏览器 D、可通过其建立拨号网络 16．在Visual FoxPro中，定义菜单标题，设置菜单访问键时，需要在访问键代表字母前加字符....................................................（） A. \- B. >\ C. \< D. -\ 17．下列关于Visual FoxPro中报表的叙述，正确的是................（） A．在报表设计器中每个带区的大小是不可以改变的B．报表数据源只能是数据库表C．如果报表需要按照某一字段值的大小顺序输出，则相应的表或视图必须按该关键字段索引 D. 报表的“页标头”带区的内容每条记录打印一次 18．在Visual FoxPro中，以下关于视图的描述中正确的是...........（） A.视图和查询的最大区别在于视图可以对源表中的数据进行更新 B. 视图文件的扩展 名为.pqr C. 视图只能从一个表派生出来D. 视图不能检查更新的合法性 19．在Visual FoxPro中，项目文件的默认扩展名为.................（） A. .SCR B. .PJX C. .MPR D. .MNX
4.1 标签 标签是VB中最简单的控件，用于显示字符串，通常显示的是文字说明信息。但不能编辑标签控件。 使用标签的情况很多，通常用标签来标注本身不具有Caption属性的控件。例如，可用标签为文本框、列表框、组合框等控件来添加描述性的标签。还可编写代码改变标签控件的显示文本以响应运行时的事件。例如，若应用程序需要用几分钟处理某个操作，则可用标签显示处理情况的信息。 4.1.1 常用属性 标签的属性很多，下面介绍几个常用的属性。 （1）Alignment属性 设置标签中文本的对齐方式。其使用语法如下： Object.Alignment[=值] 其中的“值”可以为0，1或2。0(默认值)表示左对齐；1表示右对齐；2表示居中。 （2）AutoSize属性 设置控件是否能够自动调整大小以显示所有的内容。其使用语法如下： Object.AutoSize[=True或False] （3）BackStyle属性 设置标签的背景样式。其使用语法如下： Object.BackStyle[=值] 其中的“值”可以为0或1。1(默认值)表示是不透明的；0表示是透明的。 （4）BorderStyle属性 设置标签的边框样式。其使用语法如下： Object.BorderStyle[=值] 其中的“值”可以为0或1。0(默认值)表示无边框；1表示单线边框。 （5）Caption属性 设置标签的文本内容。其使用语法如下： Object.Caption[=字符串] （6）WordWrap属性 设置标签的文本在显示时是否自动折行功能。其使用语法如下： Object.WordWrap[=True或False] 其中True表示具有自动折行功能；False（默认值）表示没有自动折行功能。 4.1.2 常用事件和方法 一般很少使用标签事件，标签的方法中常用的只有Move，其基本语法如下： Move left,top,width,height 其中left，top，width，height分别表示移动目的位置的坐标和大小。left为必要参数，其他三个为可选参数。 4.1.3 应用例子 目的：设计一个窗体说明标签的基本应用方法。 首先创建本章工程，在其中添加一个窗体，在该窗体中放置一个标签Label1。该标签的基本属性如下：
VFP函数大全 %运算符用于计算并返回两个数值表达式相除之后的余数 $（包含）运算符用于进行字符表达式之间的包含关系运算，如果一个字符表达式包含在另一个字符表达式之中，则函数返回真 ABS() 计算并返回指定数值表达式的绝对值 ACLASS() 用于将一个对象的父类名放置于一个内存数组中 ACOPY() 把一个数组的元素拷贝到另一个数组中 ACOS() 计算并返回一个指定数值表达式的余弦值 ADATABASES() 用于将所有打开的数据库名和它的路径存入一个内在变量数组中 ADB OBJECT S() 用于把当前数据库中的连接、表或SQL视图的名存入内存变量数组中 ADEL() 用于从一维数据中删除一个元素，或从二维数组中删除一行或者一列元素 ADIR() 将文件的有关信息存入指定的数组中，然后返回文件数 AELEMENT() 通过元素的下标，返回元素号 AFIELDS 将当前的结构信息存入数组中，然后返回表中的字段数 AFONT() 将可用字体的信息存入数组中 AERROR() 用于创建包含VFP或ODBC错误信息的内存变量 AINS() 在一维数组中插入一个元素或在二维数组中插入一行或一列元素 AINSTANCE() 用于将类的所有实例存入内存变量数组中，然后返回数组中存放的实例数 ALEN() 返回数组中元素、行或者列数 ALIAS() 返回当前工作区或指定工作区内表的别名 ALLTRIM() 从指定字符表达式的首尾两端删除前导和尾随的空格字符，然后返回截去空格后的字符串 AMEMBERS() 用于将对象的属性、过程和成员对象存入内存变量数组中
ANSITOOEM() 将指定字符表达式中的每个字符转换为MS-DOS（OEM）字符集中对应字符 APRINTERS() 将Print Manager中安装的当前打印机名存入内存变量数组中 ASC() 用于返回指定字符表达式中最左字符的ASCII码值 ASCAN() 搜索一个指定的数组，寻找一个与表达式中数据和数据类型相同的数组元素 ASELOBJ() 将活动的Form设计器当前控件的对象引用存储到内存变量数组中 ASIN() 计算并返回指定数值表达式反正弦值 ASORT() 按升序或降序排列数组中的元素 ASUBSCRIPT() 计算并返回指定元素号的行或者列坐标 AT() 寻找字符串或备注字段在另一字符串或备注字段中的第一次出现，并返回位置 ATAN() 计算并返回指定数值表达式的反正切值 ATC() 寻找字符串或备注字段中的第一次出现，并返回位置，将不考虑表达式中字母的大小写 ATCLINE() 寻找并返回一个字符串表达式或备注字段在另一字符表达式或备注字段中第一次出现的行号。不区分字符大小写 ATLINE() 寻找并返回一个字符表达式或备注字段在另一字符表达式或备注字段中第一次出现的行号ATN2() 根据指定的值返回所有4个像限内的反正切值 AUSED() 用于将一次会话期间的所有表别名和工作区存入变量数组之中 BAR() 从用DEFINE POPUP命令定义的菜单中返回最近所选择的菜单项的编号，或返回一个从VFP菜单所选择的一个菜单命令 BARCOUNT() 返回DEFINE POPUP命令所定义的菜单中的菜单项数，或返回VFP系统菜单上的菜单项数 BARPROMPT() 返回一个菜单项的有关正文 BETWEEN() 确定指定的表达式是否介于两个相同类型的表达式之间 BITAND() 返回两个数值表达式之间执行逐位与（AND）运算的结果 BITCLEAR() 清除数值表达式中的指定位，然后再返回结果值 BITLSHIFT() 返回将数值表达式左移若干位后的结果值
实验一 VFP数据表基本操作 1、数据表的建立和数据的输入 一、实验目的 1、了解数据表的基本概念 2、掌握数据表的建立 2、掌握数据表中数据的添加 3、掌握从其他数据表中添加数据 二、实验内容及任务 1、将所附带的VFPEX文件夹及该文件夹中的所有文件复制到C盘根目录下。 2、在文件夹VFPEX创建数据表XS.DBF，表结构如下： 3、在创建表的同时，输入如下的记录： 4、向数据表添加记录： 5、从数据表XS1.DBF中成批添加数据到数据表XS.DBF中。 三、实验环境和实验材料 1、Visual FoxPro 6.0中文版； 2、素材软盘 四、实验方法和步骤 1、复制实验所需文件
双击“我的电脑”，打开窗口，双击A驱动器，窗口中显示A盘中的内容，鼠标右击VFPEX文件夹，显示快捷菜单，选择“复制”命令；打开C盘根目录并右击，显示快捷菜单，选择“粘贴”命令，软盘中的VFPEX文件夹及其文件被复制到C盘根目录中。 2、创建数据表并输入数据 1）进入Visual FoxPro 6.0环境。 2）选择“文件/新建”命令，显示“新建”对话框，如图1-1，选择“表”并单击“新建文件”，显示创建对话框，如图1- 2，“保存在”选择“VFPEX文件夹”，“输入表名”为“XS.DBF”，单击“保存”，显示表设计器，如图1-3。
图1-1 图1-2 3）按要求输入相关的字段名、字段类型、字段宽度等内容，具体如图1-3。 图 1-3 4）单击“确定”，显示“现在输入数据吗？”确认框，如图1-4，单击“是”，显示数据表窗口，如图1-5，将上述三条记录依次输入到数据表中，并关闭窗口。 图1-4 图1-5 3、向数据表添加记录
VFP常用函数大全整理 一.字符及字符串处理函数:字符及字符串处理函数的处理对象均为字符型数据,但其返回值类型各异. 1.取子串函数: 格式:substr(c,n1,n2) 功能:取字符串C第n1个字符起的n2个字符.返回值类型是字符型. 例:取姓名字符串中的姓. store \"王小风\" to xm ?substr(xm,1,2) 结果为:王 2.删除空格函数:以下3个函数可以删除字符串中的多余空格,3个函数的返回值均为字符型. trim(字符串):删除字符串的尾部空格 alltrim(字符串):删除字符串的前后空格 ltrim(字符串):删除字符串的前面的空格 例:去掉第一个字符串的尾空格后与第二个字符串连接 store \"abcd \" to x store \"efg\" to y ?trim(x)+y abcdefg 3.空格函数: 格式:space(n) 说明:该函数的功能是产生指定个数的空格字符串(n用于指定空格个数). 例:定义一个变量dh,其初值为8个空格 store space(8) to dh 4.取左子串函数: 格式:left(c,n) 功能:取字符串C左边n个字符. 5.取右子串函数: 格式:right(c,n) 功能:取字符串c右边的n个字符 例:a=\"我是中国人\" ?right(a,4) 国人 ?left(a,2) 我 6.empty(c):用于测试字符串C是否为空格. 7.求子串位置函数: 格式:At(字符串1,字符串2) 功能:返回字符串1在字符串2的位置 例:?At(\"教授\",\"副教授\") 2
8.大小写转换函数: 格式: lower(字符串) upper(字符串) 功能:lower()将字符串中的字母一律变小写;upper()将字符串中的字母一律变大写 例: bl=\"FoxBASE\" ?lower(bl)+space(2)+upper(bl) foxbase FOXBASE 9.求字符串长度函数: 格式:len(字符串) 功能:求指定字符串的长度 例:a=\"中国人\" ?len(a) 6 二.数学运算函数: 1.取整函数: 格式:int(数值) 功能:取指定数值的整数部分. 例:取整并显示结果 ?int(25.69) 25 2.四舍五入函数: 格式:round(数值表达式,小数位数) 功能:根据给出的四舍五入小数位数,对数值表达式的计算结果做四舍五入处理 例:对下面给出的数四舍五入并显示其结果 ?round(3.14159,4),round(2048.9962,0),round(2048.9962,-3) 3.1416 2049 2000 3.求平方根函数: 格式:sqrt(数值) 功能:求指定数值的算术平方根 例:?sqrt(100) 10 4.最大值、最小值函数: 格式： Max(数值表达式1，数值表达式2） Min(数值表达式1，数值表达式2） 功能：返回两个数值表达式中的最大值和最小值 例：
VF期末考试复习选择题及答案 1.在Visual FoxPro中，skip命令移动记录指针的基准是(Ｂ )。 A、第一条记录 B、当前记录 C、指定纪录 D、库文件尾 2.一个数据库文件中多个备注字段的内容是存放在(Ｂ )。 A、这个数据库文件中 B、一个备注文件中 C、多个备注文件中 D、一个 文本文件中 3.在有关数据库的概念中，若干记录的集合称为（Ｄ）。 A. 文件 B. 字段 C. 数据项 D. 表 4.联接运算要求联接的两个关系有相同的（Ｂ）。 A. 主键 B. 属性名 C. 实体名 D. 主属性名 5. 逻辑运算符在运算时的优先顺序是（Ａ） A.NOT→AND→OR B.AND→NOT→OR C.OR→NOT→AND D.从左至右按先后次序 6. 数学表达式5≤X≤8在Visual FoxPro中应表示为（Ｂ）。 A. X>=5.OR.X<=8 B. X>=5.AND.X<=8 C. X≤8.AN D.5≤X D. 5≤X.OR. X≤8 7. 在关系运算中，查找满足一定条件的元组的运算称之为（Ｂ）。 A. 投影 B. 选择 C. 关联 D. 复制 8.以下各表达式中，运算结果为数值型的是（Ｄ）。 A. 9<6 B. “D”$”ASD” C. TIME()+9 D. LEN(SPAC(8))-9 9.物理删除某一打开的表中的第3条记录，使用以下命令：①DELE ②GO 3③PACK。正确的操作顺序是（Ｄ） A.①②③ B.②③① C.①③② D.②①③ 10.设表文件及其索引文件已打开，为了确保指针定位在记录号为1的记录上，应该使用命令（Ｂ）。 A.GO TOP B. GO 1 C. GO RECNO()=1 D. SKIP 1 11.当前表中含xm（姓名，字符型）字段，显示姓“李”的记录的命令是（Ｄ） A.DISP FOR "李"=xm B.DISP FOR xm=李 C.DISP FOR SUBS(xm,1,1)= '李' D.DISP FOR SUBS(xm,1,2)=[李] 12. 求平均值的命令是（Ｄ） A.COUNT B.TOTAL C.SUM D.AVERAGE 13.不能作为索引关键字的数据类型是（Ｂ） A.数值型 B.备注型 C.日期型 D.字符型 14.在Visual FoxPro的一个工作区中，同一时刻最多能打开( Ｂ )个库文件。 A、10 B、1 C、任意多 D、256 15. Visual FoxPro中数据库文件的扩展名为( Ｂ )。 A、dbf B、dbc C、fpt D、prg 16. 当前数据库文件中有10条记录，要在第五条记录后面插入一条新记录，应使用命令(Ｂ )。 A、append B、insert C、edit D、brows 17. 在Visual FoxPro中，对数据库进行排序的关键字可为(Ｃ)。 A、逻辑型和备注型 B、日期型和备注型 C、日期型和字符型 D、逻辑型、日期型和备注型 18.在Visual FoxPro中，对数据库建立索引，将产生相应的索引文件，原库文件内容(Ａ )。 A、并不改变 B、顺序改变 C、指定纪录改变 D、数据改变
VF中控制EXCEL的常用操作 myexcel=createobject('excel.application') &&创建一个对象 myexcel.visible=.t.&&可见 &&bookexcel=myexcel.workbooks.add bookexcel=myexcel.workbooks.open("C:\Documents and Settings\Administrator\桌面\学习\dd.xls") &&打开指定文件 nrows=bookexcel.worksheets('sheet1')&&打开工作表 UsedRange =https://www.doczj.com/doc/512947718.html,edRange&&返回工作表中可使用的区域，UsedRange表的属性 usedrange.columns.count&&计算共几列 r=usedrange.rows.count&&汇总行 c=usedrange.columns.count&&汇总列 with myexcel.application .sheets('sheet3').select .sheets.add&&添加一个工作表 https://www.doczj.com/doc/512947718.html, = 'ddddd'&&重命名表 endwith myexcel.Worksheets('sheet1').Activate&&选择表为当前工作表 myexcel.cells(1,1).value='sss'&&1,1处的值为 myexcel.activesheet.columns(2).columnwidth=15&&第2列的列宽设myexcel.activesheet.rows(2).rowheight=50&&设第2行的行高 myexcel.activesheet.rows(2).insert&&第2行前插入一行 myexcel.activesheet.columns(2).insert&&第2列前插入一列 myexcel.activesheet.Cells(1,1).Font.size=25&&设置1，1的字体大小myexcel.activesheet.Cells(1,1)https://www.doczj.com/doc/512947718.html,='黑体'&&设置字体 myexcel.activesheet.Cells(1,1).clear&&清除内容 myexcel.activesheet.range('A1:C2').select&&选择区域 myexcel.selection.merge &&选择区域合并单元格 myexcel.Range('a1').Formula='=sum(b2,b3,b4,b5)'&&在A1中键入一个公式 myexcel.range('a1').ClearContents myexcel.activesheet.Columns('A:B').Select&&整列选中 myexcel.Selection.NumberFormatLocal="@" &&设置选中的区域为字符型数据 myexcel.activesheet.rows(1).select myexcel.Selection.EntireRow.Delete&&删除选中的行 myexcel.Selection.columns(1).Delete&&删除第几的列 myexcel.workbooks.close&&关闭工作区
VB命令按钮常用属性 学习各种高级外挂制作技术，马上去百度搜索"魔鬼作坊"，点击第一个站进入，快速成为做挂达人。 命令按钮通常用来在它的单击事件中完成一种特定的程序功能。尽管其他控件的单击事件也可以做同样的事情，但使用命令按钮已经成为Windows应用程序的风格。熟悉Windows的人都知道，单击命令按钮就会完成程序提供的一个功能。因此，向用户提供的服务功能通常都以命令按钮的形式出现在用户界面中。 常用属性 命令按钮的基本属性： Name、(：aption、Height、Width、Top、Left、Enabled、Visible、FontName、FontSize、FontBold、FontI—talic、FontUnderline等。 命令按钮特有属性：Default、Cancel、Style、Picture、DownPicture、DisabledPicture、MaskColor、IJseMaskColor和ToolTipText属性。 (1)Default属性 如果一个命令按钮的Default属性设置为Tme，则不论焦点在窗体的哪个控件上，只要用户按Enter键，就产生这个按钮的单击事件。在一个窗体中，只允许一个命令按钮的Default 属性被设置为True，当把一个命令按钮的Default属性设置为‘Frue，会自动将其他命令按钮的Default属性设为False。 (2)Cancel属性 如果一个命令按钮的Cancel属性设置为True，则不论焦点在窗体的哪个控件上，只要用户按Esc键，就产生这个按钮的单击事件。在一个窗体中，只允许一个命令按钮的Cancel 属性被设置为True，其他命令按钮的Cancel属性将自动设为False。本人首发中国自学编程网，通常在该按钮的Click事件中完成的是退出或取消之类的操作。 (3)Style属性 Style属性决定命令按钮中是否可以显示图形。如果设置为0，则不显示图形只显示标题；如果设置为1，则可同时显示文本和图形。 (4)Picture属性 该属性可以给命令按钮指定一个图形。只有Style属性的值设置为1时(图形方式)，Picture属性才有效，否则Picture属性无效。 (5)DownPicture属性 该属性用来设置控件被单击并处于按下状态时，在控件中所显示图形，可用于复选框、单选按钮和命令按钮。只有当Style属性设置为1时，此属性才有效，否则无效。 如果没有设置DownPicture属性的值，则当按钮被按下时，将显示赋值给Picture属性的图形。
VFP常用命令，函数，属性，事件和方法一．常用命令 1．CREATE TABLE-SQL 创建一个含有指定字段的表。 2．ALTER TABLE-SQL 以编程方式修改表的结构。 3．SELECT 激活指定工作区。 4．USE 打开一个表及其相关索引文件，或打开一个SQL视图。5．CLOSE TABLES 关闭所有打开数据库中的所有表。 6．COPY STRUCTURE 用当前选择的表结构创建一个新的空自由表。 7．COPY TO 用当前选定表的内容创建新文件。 8．RENAME TABLE 重命名当前数据库中的表。 9．BROWSE 打开浏览窗口。 10．A PPEND 在表的末尾添加一个或多个新记录。 11．A PPEND FROM 从一个文件中读入记录，添加到当前表的尾部。 12．G O/GOTO 将记录指针移到指定记录上。 13．L OCATE 按顺序搜索表，从而找到满足指定逻辑表达式的第一个记录。14．S EEK 在一个表中搜索首次出现的一个记录。 15．S KIP 使记录指针在表中向前或向后移动。 16．C ONTINUE 继续执行先前的LOCA TE命令。 17．E DIT 显示要编辑的字段。 18．D ELETE 给要删除的记录做标记。 19．D ELETE-SQL 给要删除的记录做标记。 20．P ACK 从当前表中永久删除有删除标记的记录。 21．R ECALL 恢复所选表中带删除标记的记录。
22．Z AP 从表中删除所有记录。 23．I NSERT-SQL 在表尾追加一个包含指定字段值的记录。 24．R EPLACE 更新表的记录内容。 25．U PDATE-SQL 以新值更新表中的记录。 26．S ET EXCLUSIVE 指定Visual FoxPro在网络上是以独占方式，还是以共享方式打开表文件。 27．S ET FILTER 指定访问当前表中记录时必须满足的条件。 28．S ET DELETED 指定Visual FoxPro 是否处理标有删除标记的记录。 29．S ET INDEX 打开一个或多个索引文件，供当前表使用。 30．S ET ORDER 指定表的主控索引文件或标识。 31．G A THER 将当前选定表中的当前记录的数据替换为某个数组、内存变量组或对象中的数据。32．S CATTER 从当前记录中把数据复制到一组内存变量或数组中。 33．O PEN DATABASE 打开一个数据库。 34．S ET DATABASE 指定当前数据库。 35．D ELETE DATABASE 从磁盘上删除数据库。 36．D ISPLAY DA TABASE 显示有关当前数据库的信息。 37．M ODIFY DATABASE 打开数据库设计器，让用户能够交互地修改当前数据库。 38．V ALIDATE DA TABASE 保证当前数据库中表和索引位置的正确性。 39．S ELECT-SQL 从一个表或多个表中检索数据。 40．D O 执行一个Visual FoxPro 程序或过程。 41．D O FORM 运行用表单设计器创建的、编译过的表单或表单集。 42．R EPORT 根据MODIFY REPORT或CREATE REPORE创建的报表定义文件，显示或打印报表。43．C ALCULATE 对表中的字段或包含字段的表达式进行财务和统计操作。
ADIR()用法初探 (如何取得某个文件的大小、修改日期及属性 Vfp为我们提供了一个非常强大函数ADIR(), 语法： ADIR(ArrayName [, cFileSkeleton [, cAttribute [, cCreatorType]]]) 使用： X=Adir(Myml,'C:\TEMP\*.DBF') 返回： X=符合cFileSkeleton条件的文件或目录个数 Myml=一个有五列内容的数组。 这五列的含义是： 1 文件名字符型 2 文件大小数值型 3 文件日期日期型 4 文件时间字符型 5 文件属性字符型 例：我们想得到某个文件的大小或文件修改日期及属性： X=Adir(Myml,'C:\TEMP\abc.DBF') IF X#0 wjsize=Myml(1,2) &&取得文件大小 wjdate=Myml(1,3) &&取得修改日期及属性 wjAttr=Myml(1,5) &&取得文件属性 ELSE wait wind '没有您指定的文件' ENDI 文件属性的含义： A 档案文件一可读写 H 隐藏文件 R 只读文件 S 系统文件 D 目录或文件夹 我们利用Adir()还可以检查某个目录是否存在： X=Adir(Myml,'C:\ABCDE','D') IF X=0 wait wind '该目录不存在…' ENDI 当然用下面的更简单： if ! File('C:\ABCDE\nul') wait wind '该目录不存在…' endi 总之Adir()可以达到很多目的，具体使用请看查看帮助
在VF中直接调出中文输入法 (其实很简单，就用一个函数就行了，但一直没用过 =IMESTATUS(1) 打开或关闭 IME (输入法编辑器)窗口或返回当前的 IME 状态 0 关闭IME 窗口。 1 打开IME 窗口。 在VF中如何加密数据库文件 加密思路：数据库文件结构分为三部分：文件头部分、字段描述和记录部分。文件头部分的第一个字节是chr(3)，这样，就可以修改文件的第一个字节，使正常打开的方式不能浏览文件。 =FWRITE(hle,iif(fbyte==chr(3),chr(0),chr(26))) &&假如第一个字节是chr(3)则用chr(0)，否则用chr(26)写入。使用时要用到操作低级文件的几个函数。 有关操作文本文件的一些问题 在VF中，有时需要把表内容转换成.txt文件，以前对这方面内容不够重视，没有很好的学习，现整理一下： 1 库文件复制为标准格式的数据文件 copy to bz.txt sdf next ... for ... while ... fields ...