學(xué)生宿舍管理系統(tǒng)源代碼_第1頁
學(xué)生宿舍管理系統(tǒng)源代碼_第2頁
學(xué)生宿舍管理系統(tǒng)源代碼_第3頁
全文預(yù)覽已結(jié)束

下載本文檔

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡介

1、Main.prg:clear screenlocal lcsys16,lcprogramlcsys16=sys(16)lcprogram=substr(lcsys16,at(":",lcsys16)-1)cd left(lcprogram,rat("",lcprogram)deactivate window "project manager"do setting_screen.left=-10000do form formmainzoom windows screen max_screen.caption='學(xué)生宿舍管理系統(tǒng)&

2、#39;public purview ppath rpicturepublic pjyb,pglb,pgcb,pcwb,pbab,pjls,psysglstore .f.to pjyb,pglb,pgcb,pcwb,pbab,pjls,psysglpurview=5ppath=''rpicture=.f.do mymenu.mpr_screen.left=0on shutdown do myquitread eventsdo resetmyquit.prg:Clear EventIF _Screen.FormCount>0h=_Screen.formcountDime T

3、mpForm(h)FOR i=1 TO hTmpForm(i)=_Screen.Forms(i)ENDFORFOR i=1 TO hTmpForm(i).ReleaseENDFORENDIFQUITReset.ptg:set sysmenu to defaultset sysmenu onset talk onset notify on set exclusive onset safety onmodify window screenclear eventssetting.prgset sysmenu off&& 將系統(tǒng)菜單關(guān)閉set sysmenu toset status

4、bar off&& 不顯示圖形狀態(tài)框set talk offset notify offset clock status&& 將時(shí)鐘在指定的位置顯示，而不放在圖形狀態(tài)欄中set palette off&& 用于確定是否使用Visual FoxPro 的缺省調(diào)節(jié)器色板set bell onset safety offset escape on&& 指定按 ESC 鍵后，中斷程序和命令的運(yùn)行set keycomp to windowsset carry on&& 指定在創(chuàng)建新記錄時(shí)，將當(dāng)前記錄所有字段的數(shù)據(jù)復(fù)制到新記錄

5、中set confirm onset exact on&& 設(shè)置字符精確比較set near onset ansi offset lock onset exclusive offset multilocks onset deleted onset optimize on&& 指定可以使用Rushmore 優(yōu)化技術(shù)set refresh to 0,5set collate to 'stroke'set default to sys(5)+curdir()&& 設(shè)置默認(rèn)文件目錄set path to sys(5)+curdir()&a

6、mp;& 設(shè)置查找文件目錄set sysformats offset seconds onset century offset currency to 'nt$'set hours to 12set date to USAset decimals to 2set fdow to 1set fweek to 1set mark to '.'set separator to ','set point to '.'5771001803090012095 5790368228596330825771001803090012386

7、5761373997357606965771001803090013594 5780775799025155125771001803090012387 5771649826018180515771001803090012138 5721311921589183265771001803090012359 5790368223610760535771001803090012356 5761352861437917425771001803090012355 57508786970469327917088100343355274 10122994432583337917088100343355275 10186673293883200817088100343356107 10158115250150052217088100343356108 10100018005987173217088100343354295 10107419414268701717088100343356184 10187866086962880217088100343356185 10177583117408667417088100343356109 10108601437357284617088100343356110 10115220721601491617088100343355237 1

溫馨提示

  • 1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

最新文檔

評論

0/150

提交評論