错了,这证明没看懂程序。
CLEAR ALL 是清空内存,这个你对了,它是用于初始化程序执行环境的
关键是Form1 = CREATEOBJECT("C_Form"),这是建立一个对象实体,这个对象的名字叫Form1,就是你平时建立那些控件名,对象的具体内容在一个叫C_Form的类中,就是下面的DEFINE CLASS C_Form AS Form到ENDDEFINE那一块代码。
对象建立后,用Form1.Show把它显示出来,意思是执行Form1对象的.Show方法
READ EVENTS是启动交互处理,程序开始接受你的动作。注意:此时Form1已经通过前面的两行建立并显示出来了,所以不要颠倒顺序。
后面是退出程序时的动作。
现在看Form1到底是怎么回事,看DEFINE CLASS C_Form AS Form到ENDDEFINE那一块代码:你执行时,看到弹出一个窗体是吗?这个窗体就是Form1了,是用Form1.Show显示出来的。你也应该留意到,窗体Form1的标题栏写着的标题文字,是在哪里设置的(对照代码看)。看到窗体的尺寸怎么设置吗?看到要窗体在屏幕上居中怎么设置吗?如果你不要居中,知道怎么设置吗?你仔细琢磨这些东西。
在这个类定义中,PROCEDURE Destroy是事件Destroy的代码,这个事件是窗体被释放时执行的动作,当你用鼠标点击窗体右上角的叉叉关闭符时,窗体就要被关闭,此时,会激发Destroy事件,让你做某些动作,在这个事件中,我执行了CLEAR EVENTS命令,关闭READ EVENTS,程序得以退出(没有这句命令,就无法终止程序)。
这个代码是VFP程序的一般架构,你写任何VFP程序,都先写上这一段。熟记下来,多次使用之后体会更深。你尝试修改一下标题文字、窗体尺寸、在屏幕中的位置之类,下面我告诉你在窗体中添加标签、文本框和命令按钮怎么做。