图书管理系统分析代码

这个是我做的考务管理 程序代码,希望对你有帮助
　　****** * C:\BYSJ2\MAIN.PRG
　　*:************************************
　　*: 过程文件C:\BYSJ2\文档\MAIN.PRG
　　*:************************************
　　*: main
　　DO c:\bysj2\setting.prg
　　DO FORM c:\bysj2\skxt
　　_SCREEN.CAPTION='双考考务管理系统'
　　_SCREEN.BACKCOLOR=16776990
　　READ EVENTS
　　****** * C:\BYSJ2\BMB.FRX
　　****** * C:\BYSJ2\BMXT.SCX
　　DATABASE = skkwgl.DBC
　　PROCEDURE CLICK
　　IF MESSAGEBOX("确定添加记录吗？",1,"添加记录")=1

　　SELE bmk
　　APPEND BLANK
　　GO BOTT
　　*tHISFORM.REFRESH
　　THISFORM.grid1.column1.SETFOCUS
　　ENDIF
　　ENDPROC
　　TOP = 276
　　LEFT = 164
　　HEIGHT = 33
　　WIDTH = 81
　　CAPTION = "\<D.删除"
　　NAME = "Command2"
　　PROCEDURE CLICK
　　IF MESSAGEBOX("确定删除当前记录吗？",1,"删除记录")=1

　　SET