我在表单中的一个命令按钮写了以下程序，运行时提示非法重定义变量，请问怎么回事，之前没有定义过
public d1,d2
d1=thisform.Text1.value  
d2=thisform.Text2.value
do case
case empty(thisform.Text1.value)
MESSAGEBOX("内径不能为空",48,"轴承精度设计系统")
case empty(thisform.Text2.value)
MESSAGEBOX("外径不能为空",48,"轴承精度设计系统")
case d1>500
messagebox("超出范围，请重新输入",48,"轴承精度设计系统")
case d2<d1
messagebox("外径不能小于内径",48,"轴承精度设计系统")
endcase
thisform.release()
do form phxz

没有用过啊

可是我在主程序中没有定义d1.d2啊，单独运行的时候也有这问题

上传不了，我重新发个贴子，你帮我看看

今天怎么不能上传文件啊

我是初学，不太懂，麻烦讲清楚一点

还是非法重定义

可能是我积分不够吧，没这个选项了，第一次发的时候有

d1d2变成逻辑型了，我是需要用数值型的

我们是做毕业设计用的，之前都没接触过vfp，这个我确实一点基础都没有