Question

VFP表单按钮代码

有一张student表，里面学号和姓名都是唯一的。
我向设计一个表单，里面有2个TEXT和一个COMMAND
要求如下：
1.在TEXT1中输入表中姓名，点按钮就会在TEXT2中显示学号
2.如果输入的不是字符型，按按钮则提示输入错误
3.如果输入的是空格或者不输入，按按钮也提示输入错误

下面是我的代码
表单的LOAD代码：
open database xuesheng
use student in 0

COMMAND1的代码：
if vARTYPE(thisform.text1.value)<> C
wait"输入错误" windows timeout 5
else
if alltrim(thisform.text1.value)==""
wait"输入错误" windows timeout 5
else
select 学号 from student where 姓名=alltrim(thisform.text1.value) into cursor lsb
select lsb
go top
thisform.text2.value=学号
endif
endif

我的执行结果是无论输入什么或者不输入：VFP总提示：程序错误，找不到变量'C',我很郁闷，
有高手指出我的错误并帮我改吗？

Answer 1

if vARTYPE(thisform.text1.value)<> C

这儿的C加上引号
if vARTYPE(thisform.text1.value)<> "C"

Answer 2

C加引号