运行表单时出现以上情况，按确定后在运行，又正常了，怎么回事啊

表单有误  或者你使用了数据环境 啥的

你看到的文字就是答案。抄代码而不知其义就不懂了。

我是使用了数据环境了，代码我都是自己写的啊，没有抄别人的啊

不是每次运行都出现这样的情况，大概运行5次，出现1次异常

ThisForm是只能在类代码中使用的引用名称，在非类代码中出现了就错。自己写的代码，在什麽时候调用什麽函数，自己不清楚？我看你是写出来的代码到底是怎么执行的都不知道。

表单访问2种数据库，一种是ACCESS，一种是DBF，access是用SPT,调用的时候才打开，用完关闭，数据环境用的是DBF

代码真是自己写的，就是SPT调用ACCESS数据的时候用了一点别人的代码;
riqi=TTOD(thisform.t1._Value)

nhandle=Sqlstringconnect("Driver={Microsoft Access Driver (*.mdb)}; Dbq=e:油库其他\付油\data1.mdb;Pwd=")
IF  nhandle<=0
           MESSAGEBOX("数据库连接失败！！！",16,  '错误信息')
           RETURN
ELSE

         *Ac=SQLEXEC(nhandle,"Select * From fypz where cprq=?riqi","Temp1")
        Ac=SQLEXEC(nhandle,"Select hwh,SUM(yfss) as yfss1,SUM(sfss) as sfss1 From fypz where cprq=?riqi group by hwh","Temp1")
           IF  Ac<0
                       MESSAGEBOX("读取数据错误！",16,  '错误信息')
                       RETURN
           ENDIF
           SELECT  Temp1
          = SQLDISCONNECT(nhandle)
         
ENDIF

我再想想问题出在哪里

可以上传你的表单吗