private sysma
sele sysb
sysma=alltrim(thisform.text1.value)
locate for alltrim(操作员姓名)==alltrim(thisform.combo1.value)
if found() and alltrim(sysb.操作员密码)==sysma
thisform.visible=.f.
do zkcd.mpr
read events
thisform.visible=.t.
thisform.text1.value=""
else
messagebox("用户名或密码不正确!请重新输入!.",0,"警告")
thisform.text1.value=""
thisform.ext1.setfocus
endif

上面哪个红的代码出错,提示找不到ZKCD.MPR,请那位高手朋友帮我看看,怎么修改.
还有我哪个表单已经存在

可能需要用到路径吧，若将所有文件复制在一个文件夹，并产生了那个菜单文件，就不会有那样的提示了。另外，看了你的程序，感觉不是你的程序本身的问题，而是编写程序的思路的问题。明显地，你的程序是一个登录过程。登录成功的话调用菜单，登录不成功就反复登录。我通常的处理，运行主程序直接调用菜单，根据各种不同的状态，设置菜单项中有些可用，有些不可用。假如没有就进入主程序的话，只能进行“登录”和“结束”，最多也就再可以允许“帮助”功能。

您说的太对了,登陆过程一点登陆就提示文件'KCD.MPR'不存在.可是你说的处理方法我不是太会,只是看书上的例题做的,还希望你可以帮助我修改一下.最好是最简单的办法

没有办法给你修改的，因为我们都不知道你的文件放在什么地方。
我的做法是把项目中的所有文件都放在同一个目录下，并在运行时把这个目录作为默认目录。我想，你会自己设默认目录的。