将此表以ＴＳＺＬ为名保存．
经过上述步骤，整个数据库文件就建立好了．
七　建立交互表单
１　回到项目管理器窗口中，单击文档选项卡，从中选择表单选项，单击右边的新建按钮，从弹出的新建表单对话框中选择新建表单按钮，从表单菜单中选择创建表单集，在ＦＯＲＭ２表单设计器窗口中添加一个组合框，一个文本框，三个图片框，二个标签．设计好的界面如图所示．（其中退出和进入两个都是图片框）
 
在ＦＯＲＭ１的表单设计器窗口中添加三个文本框，七个标签，二个图片框，界面如下图所示．
 
其中具体的代码如下：
ＴＥＸＴ１的ＬＯＳＴＦＯＣＵＳ代码：
thisform.image2.click()
ＩＭＡＧＥ的ＣＬＩＣＫ代码：clear events
ＩＭＡＧＥ的ＣＬＩＣＫ代码：
czz=allt(thisform.combo1.value)
mm=allt(thisform.text1.value)
mi=0
n=len(czz)
m=len(mm)
for i=1 to n
 mi=mi+asc(substr(czz,i,1))*2.698
endfor
 for j=1 to m
 mi=mi+asc(substr(mm,j,1))/1.3
endfor
if str(mi,9,4)==str(mima,9,4)
ZOOM WINDOW SCREEN Max
_screen.visible=.t. 
 thisformset.release  
do  main.mpr else
=messagebox("操作者或密码不正确，请重新输入！",16,"提示")
endif
Formset1的destroy事件中的代码：
set classlib to ('tszl')
   kj=creat('tszl')  
   kj.dock(0)           
   kj.show
Formset1的init事件代码：
if empt(xm)
 this.form2.hide
 this.form1.show
 else
 this.form1.hide
 this.form2.show
endif
Text3的lostfocus事件代码：
thisform.image1.click()
最后关闭所创建的表单集，将表单集以ＬＯＧＯ为名保存到＼ＦＯＲＭS目录下．
２　再次回到项目管理器窗口中，选择文档选项卡下的表单，同样单击右边的新建按钮，选择新建表单，向空白表单中添加三个标签，三个文本框，两个命令按钮，一个图片框，界面如下所示．