VFP软件：操作技巧全知道，从图片移动到加密解密

你是否想深入了解一款强大的应用程序开发软件？VFP6.0由Microsoft改良自FoxBase数据库软件。它主要用于数据管理与运算软件开发。这里还将分享其图片单步移动、项目管理器操作、字符串加解密等操作技巧。

在VFP中如何控制图片单步移动

1、 在VFP中使用表单工具，先分别插入一个图片控件image1和标签控件label1，再分别插入3个命令按纽。2对各个控件设置属性，并且为每个控件进行编程。如下：定时器控件的添加image1控件的left属性设定为0label控件的caption属性设定为0form的int过程，编程为：thisform.timer1.enabled=.f.public tt=0?timer1控件的interval属性设定为1000，??它的timer过程编程为：t=t+1t1=t*10thisform.image1.left=t1thisform.label1.caption=str(t,8)?command1的caption属性为“开始”，click过程为thisform.timer1.enabled=.t.?command1的caption属性为“暂停”，click过程为thisform.timer1.enabled=.f.command2的caption属性为“复位”，click过程为thisform.timer1.enabled=.f.

3、 ?

4、 ?

5、 ?

6、 ?

vfp中如何将字符串加密解密

1、 在VFP中，加解密字符串其实有很多种方法，在这里有一个函数，希望对您有所帮助:本函数功能： 1.加解密字符串.2.如果有人非法修改密码，将提示非法修改.

2、 入口： * LCZIP --判断是加密还是解密，.T. --加密，.F.解密*Lcpass--要加解密压袭段的字符串返回： *加解密后字符串注意：如果返回的字符串为ERROR*证明密码出错或着密码被非法修改过.

3、 FunCtion CalcPassWordPara Lczip,LcpasslCPASS=Allt(Lcpass)IF LcZip &&加密Lcpass="DALY"+LcpassLCNewPass=CHR(Len(Lcpass))*处理字符串，使它不为空因为我要把加密后的字符放到数据库，为防他人直接打开.

4、 数据库看出密码为空For i=1 To Len(Lcpass)LCNewPass=LCNewPass+Chr(asc(SubStr(Lcpass,i,1))/32);+Chr(asc(SubStr(Lcpass,i,1))%32)EndFor*取出字符串中的单个字符，并把它转为ASCII码.*把ASCII码除于32得到的整数跟余数转为字符，再把两施慎个字符和合为一个字符串.

5、 *经这种处理后，已经无法得知原来的字符，只有经计算机用反方法解开LCNewPass=PADR(LCNewPass,50,CHR(1)) &&返回50个字符长度,不足的用CHR(1)补足ElseIF LEN(lCPASS)#50 &&如果长度出错，证明非法修改过=MESSAGEbOX("密码被非法修改",0,_screen.caption)Return "ERROR"ENDIFFor i=1 TO 50IF asc(SubStr(Lcpass,i,1))>=32 &&艺扬检查密码是否被非法修改=MESSAGEbOX("密码被非法修改",0,_screen.caption)Return "ERROR"ENDIFEndForLCNewPass="" &&解密For I=0 TO (asc(SubStr(Lcpass,1,1))*2)-9LCNewPass=LCNewPass+Chr(asc(SubStr(Lcpass,i+10,1))*32;+asc(SubStr(Lcpass,i+11,1)))i=i+1EndForEndIFReturn LcNewPass

VFP6.0作为一款功能强大的应用程序开发软件，在图片移动、项目管理、加密解密等操作上有独特技巧。掌握这些操作方法，能更好地运用它进行数据管理与运算相关软件的开发。