在vfp的表单中输入什么代码能使vfp整个程序关闭 - vfp吧

level 10

wangzzzzzzz1 楼主

vfp的高手们，你们好，本人初学者，希望了解更多知识，渴求回贴时留下自己的qq号。。。very think you

2012年07月10日 00点07分 1

level 11

taohua300

clear events
quit

2012年07月10日 01点07分 2

wangzzzzzzz1

谢谢，very think you.你的qq留一下好不，我加

2012年07月10日 01点07分

level 3

情绪丿不由己

楼上正解，我也是初学者

2012年07月10日 17点07分 3

level 6

银饰珠宝

１.如果用的是表单集，在表单Destroy事件：
This.parent.release()
２．关闭表单：thisform.relese
3.退出系统fileexit.prg
Do Whil Txnlevel()>0
Rollback
ENDDO Clea Even If _Screen.FormCount>0
_Screen.ActiveForm.Release()
Endif Local Array ainfo[1]
Local i,lnCount
lnCount=Asqlhandles(ainfo)
If lnCount>0
For i=1 To lnCount
SQLDisconnect(ainfo(i))
Endfor
Release cn
Endif Close All
Quit

2012年07月11日 03点07分 4