怎么用VFP设计一个用户的登陆窗口?

VFP教材上有详细的步骤

先用表单建立一个封面，在form上面建立一个label和image,timer等，加上图片，在所有控件的click属性上面编辑：
do form"(你登录窗口的路径)"
release thisform
以上表示你点击任何地方都会从封面调到登陆界面，timer控件你可以设置几秒钟不点击自动跳转（自愿），设置timer的interver属性为5000（5秒），timer事件代码如下：t=t+1
if t=5 form
do form"(你登录窗口的路径)"
release thisform
endif
表单的init事件中定义变量：
public t as number
t=0

然后是登陆界面，你首先要新建自由表，在里面输入几个用户和密码，一个权限是管理员，其他是普通用户，保存。假设表名为user:
登陆“确定”按钮代码：
LOCAL Temp
uname=thisform.txtid.value
psw=thisform.txtid.value

close tables all

use"(user表路径)"
set exact on

dimension s(10)
for i=1to10
s(i)=""
endfor

select *from user where(user.用户名=uname and user. 密码=psw)into array s

select *from user where(user.用户名=uname and user. 密码=psw)into cursor temp
qx=temp.用户权限

if s(1)=""then
messagebox(错误，0，)
else
if qx="管理员" do form(