vfp程序与算法

1. vfp程序题 需要详细解题思路和过程~~~谢谢谢谢

1：
CLEAR
C="南京大学信息管理系"
FOR I=1 TO LEN(C)/2
IF I%2<>0 && 如果 I 不能被 2 整除
??SUBS(C,2*I-1, 2) && 输出由 2*I-1 开始的双字节字符
ENDIF
ENDFOR

输出 “南大信管系”

等同：
CLEAR
C="南京大学信息管理系"
FOR I=1 TO LENC(C)
IF MOD(I,2)<>0
??SUBSTRC(C,I, 1)
ENDIF
ENDFOR

2：
FOR n=7 TO 1000 STEP 7 && 以步长 7 进行循环
ch= STR(n) && 先将 n 转换成字符型
IF "5" $ ch && 如果发现字符型 n 中包含 "5"
?n && 输出结果
ENDIF
ENDFOR

3：（看不到图）

4：
CLEAR
cstring= "VisualFoxPro"
nresult=0
m=len(cstring) && 获得字串 cstring 的长度
FOR n=1 to m
c=SUBSTR(cstring,n,1) && 顺序取 cstring 的 1 个字符
IF !BETWEEN(ASC(c), ASC("A"), ASC("Z")) && 如果 非大写 A—Z
LOOP && 不执行后续语句，继续循环
ENDIF
&& 如果通过（即 是大写字母），就计数
nresult=nresult+1
ENDFOR
? nresult && 输出结果

输出结果 3
这是一段统计全单字节字串中大写字母数的程序

2. vfp 编写程序1，-1/2，1/4，-1/8，1/16......N的前N项和

clear &&清屏
m=1 &&变量m为通项，首项为1
s=1 &&变量s为和，首项为1
input "n=" to n &&变量n为项数
for i=2 to n &&循环开始
m=m/-2 &&通项算法（前项乘公比-2）
s=s+m &&和的算法
endfor &&循环结束
?"和为",s &&显示结果

3. 用VFP编写程序 计算从1到100之间的素数和

clear
?"1到100之内的所有素数："
s=0
for i=2 to 100
x=0
for j=2 to i-1
if i/j=int(i/j)
x=1
endif
endfor
if x=0
??alltrim(str(i))+space(2)
s=s+i
endif
endfor
?"它们的和是：",s

4. 什么是VFP程序设计

Visual FoxPro简称是VFP，是Microsoft公司推出的数据库开发软件，用它来开发数据库，既简单又方便。

Visual FoxPro源于美国Fox Software公司推出的数据库产品FoxBase，在DOS上运行，与xBase系列相容。

FoxPro原来是FoxBase的加强版，最高版本曾出过2.6之后，Fox Software被微软收购，加以发展， 使其可以在 Windows 上运行， 并且更名为 Visual FoxPro。

(4)vfp程序与算法扩展阅读：

Visual FoxPro 6.0 的特点。

Visual FoxPro 6.0 能够得到广泛的使用，这是与其具有的强大的功能分不开的，Visual FoxPro 6.0 与其前期的版本相比，有更高的性能指标和鲜明的特点。

⑴ 提供多种可视化编程工具，最突出的是面向对象编程。

⑵ 在表的设计方面，增添了表的字段和控件直接结合的设置。

除此之外，Visual FoxPro 6.0 具有一系列的新特色，如：

① 成功解决了计算机2000年的问题。

② 增强了 Internet 技术和 WWW 数据库的设计。

③ ActiveX 和向导、生成器及控件等集成化工具。

④ 新引入了网络图象文件格式：gif 和 jpeg 。

参考资料来源：网络-visual foxpro

5. vfp编写一个简单的程序

set talk off
clear
dime a[30]
a[1]=1
a[2]=1
for i=3 to 30
a[i]=a[i-1]+a[i-2]
endfor
?a[30]
set talk on
cancel
很久没有搞VF了，不知道源程序对不对算法思想还是这样的，我VF还是三年前过前的，以前的编程基础很好，不过对VF的语法不是很记得了！
上面程序如果对格式有误你自己更正下！
算法和思路还是没有问题的！

6. 用vfp程序实现

主程序:Xa.prg
Xa=0
FOR j=1 to 10
Xa=Xa+Xi(j)
ENDFOR
? Xa

子程序:Xi.prg
PARAMETERS N
X=1
FOR i=1 to N
X=X*i
ENDFOR
RETURN X

命令窗口输入 do Xa
计算1！+2！+……+10！的值为 4037913

7. VFP程序题： 对一个字符串进行加密，其基本算法是对字符串每一个字符

?convert('ABC')
RETURN

FUNCTIONconvert
PARAMETERSs
PRIVATEi,l,t
l=len(s)
t=''
FORi=1tol
	t=t+CHR(ASC(SUBSTR(s,i,1))+1)
NEXTi
RETURN(t)

8. 用VFP编写程序

2、clear
?"1到100之内的所有素数："
s=0
for i=2 to 100
x=0
for j=2 to i-1
if i/j=int(i/j)
x=1
endif
endfor
if x=0
??alltrim(str(i))+space(2)
s=s+i
endif
endfor
?"它们的和是：",s
3、clear
?"1到1000之间所有奇数的和:"
s=0
for i=1 to 1000
if mod(i,2)<>0
s=s+i
endif
endfor
?s
4、command1的click代码：
if ALLTRIM(thisform.text1.value)="12345".and.alltrim(thisform.text2.value)="abcd"
messagebox("欢迎进入QQ世界")
else
messagebox("你的用户名或密码是错误的!")
endif
5、1）select * from STUDENT where 入学成绩>500
2)select 学号,姓名,专业信息 from STUDENT where substr(alltrim(姓名),1,2)="李"
3)count for 性别="女" to mm
6、CLEAR
SET UDFPARMS TO REFERENCE &&地址传递
DIME AAA(10)
FOR i= 1 TO 10
input "请输入第"+ALLTRIM(STR(i))+"个数：" to AAA(i)
NEXT
=MySort(AAA,10) &&调用冒泡排序函数.
i=1
?"从大到小排序结果为："
do while i<=10
??AAA(i) &&显示排完序后的数据.
i=i+1
enddo
RETURN

*冒泡排序函数.
*参数: pData: 传入数组, nCount:数组的大小.
function MySort
para pData, nCount
for i=1 to nCount
for j=nCount to i+1 step -1
if pData(j)>pData(j-1)
iTemp = pData[j-1]
pData(j-1) = pData[j]
pData(j) = iTemp
endif
endfor
endfor
endfunc

9. VFP程序设计（要详细具体）

内部变量定义的方法
不需要像C一样，先定义后使用，而是可以随时定义，且可以改变。它带来了灵活性，也增大了出现错误的可能性。

交互式语句及区别

交互式语句有3个：
（1）格式：wait [提示] to [变量名] [ outtime [秒数]]
功能：等待从键盘接收单个字符，输入字符后不需回车，即赋值给给定名字的变量，如果给出outtime [秒数]选项，等待给定秒数后，即不再等待，继续执行后继命令。
（2）格式：accept [提示] to [变量名]
功能：从键盘接收一个或多个字符，输入字符串后，必须以回车结束。只接受字符，输入的字符串不用加定界符。
（3）格式：input [提示] to [变量名]
功能：从键盘接收数字或字符串，输入后，必须以回车结束。输入的数值没有特殊要求，输入的字符串必须加定界符。
追加记录的方法

增加一条•浏览时，“表”→ “追加新记录”或ctrl+y
增加一批•浏览时，“表”→ “增加记录”
追加命令：append from <表名>
表单中常用的公共属性

属性 描述 默认值

Alwaysontop 指定表单是否总是位于其他打开窗口之上 .F.

Autocenter 指定表单初始化时是否自动在VFP主窗口内居中显示 .F.

Backcolor 指明表单窗口的颜色 默认(255,255，255）
Borderstyle 指明表单边框风格。默认3,采用系统边框，大小可变 3

Caption 指明显示于表单标题栏上的文本 Form1

Closable 指定是否能通过单击关闭窗或双击控制菜单框来关闭表单 .T.

Movable 确定表单是否能够移动 .T.

Scrollbars 指定滚动条类型：0-无，1-水平，2-垂直，3-水平垂直 0

WindowState 表单状态：0-正常，1-最小化，2-最大化 0

WindowType 1-模式，关前不可访问其他界面元素；0-非模式表单 0
数据库表与自由表的区别
相同：建法、用法、命令几乎完全相同
区别：
1、数据库表能使用长表名，自由表不能。
2、库表字段名长<=128,自由表长<=10。
3、库表字段能指定标题、默认值和输入掩码，自由表不能。
4、库表支持主关键字、参照完整性和表间联系。自由表否。
5、库表支持insert、update和delete触发器。自由表否。
结构化程序设计与面向对象程序设计的区别
结构化程序设计方法是把待求解的问题自顶向下分解成多个相对简单独立的模块，用子程序、过程或函数组成完整程序。
面向对象的程序设计方法是用对象描述实体，用消息模拟联系，用类模拟共性。采用属性、方法和事件解决问题。
永久性关联建立的过程

通过数据库建立的关联是永久关联。要建立永久关联，首先要在相关联的各表上
其次在数据库设计器中，击（父）表中的（主）索引不放，拖动到（子）表的相关索引上，释放鼠标，形成连线。
•如需编辑（删除）联系，可右击连线，从弹出的快捷菜单中选“编辑（删除）关系”

10. vfp中什么是算法

计算机语言中算法的概念都是一样的。

算法是在有限步骤内求解某一问题所使用的一组定义明确的规则。通俗点说，就是计算机解题的过程。