【正文】 111幫助關(guān)于窗口 1． 應用對象open 事件 // Profile mydb = ODBC = False = ConnectString=39。3．資源需求：（三）項目的必要性和可行性一個學生成績信息管理系統(tǒng)，可以解決繁雜的學生的各門學科成績的匯總，對信息資源進行高級管理，方便用戶對信息的查找，修改和編輯。管理窗口應具有瀏覽和編輯兩種操作方式，并具有瀏覽，重載，添加，刪除和更新等數(shù)據(jù)操作功能。 + + 39。if =0 then messagebox(,數(shù)據(jù)添加成功)else messagebox(,數(shù)據(jù)添加失敗)end if退出按鈕clicked事件close(w_xyhzc)(sqlca)()=2327=1620if qx=2 or qx=1 then=false=false //根據(jù)登陸的帳號給出不同的權(quán)限end if 插入按鈕clicked事件(1)(1)重置按鈕clicked事件(sqlca)()保存按鈕clicked事件int i i=()if i=1 then mit。 我們發(fā)現(xiàn)詢問用戶如何看待未來需求變化非常有用。顯然，現(xiàn)有系統(tǒng)并不完美，否則你就不必再建立新系統(tǒng)了。 messagebox( 提示,保存成功!) //保存數(shù)據(jù)窗口控件中的數(shù)據(jù)到數(shù)據(jù)庫 (sqlca)()else messagebox(,保存失敗!)end if刪除按鈕clicked事件int ll=()(l) 關(guān)閉按鈕clicked事件if ()0 or ()0 then int m m=messagebox(,沒保存，現(xiàn)在要保存嗎？,question!,yesno!) if m=1 then ( ) messagebox(,成功！) close(w_xsxx) else messagebox(,修改失??！)//關(guān)閉時檢查數(shù)據(jù)有沒有被修改，如果有則提示要保存 end ifelseclose(w_xsxx)end if查找功能中的確定按鈕clicked事件string cc,aa,bb,ddstring sscc= aa= if cc then select , into:aa,:ss,:bb,:dd from student where studentid=:cc。 //取得權(quán)限的代號3． 主窗口open事件opensheet(w_logo,w_main)timer(1)timer事件 //取得系統(tǒng)時間 并在標題顯示時間和權(quán)限的簡單說明if qx=2 thentitle=(學生成績管理系統(tǒng) 當前時間:+string(now(),hh:mm:ss)+ 您的權(quán)限是：學生您只能查詢) end if if qx=1 thentitle=(學生成績管理系統(tǒng) 當前時間:+string(now(),hh:mm:ss)+ 您的權(quán)限是：教師您能查詢，修改) end if if qx=0 thentitle=(學生成績管理系統(tǒng) 當前時間:+string(now(),hh:mm:ss)+ 您的權(quán)限是：管理員)end ifrbuttondown事件(xpos,ypos) //右擊事件中關(guān)聯(lián)菜單resize事件if isvalid(w_logo) then = +800 = +230end if if = then =modified end if 4． 成績查詢窗口open事件(sqlca)()關(guān)閉按鈕clickedclose(w_cjicx)查找按鈕 clicked=3067long frowstring fstropenwithparm(w_find,student) //打開窗口并提交一個值fstr=(fstr)()5．查找窗口的open事件choose case case student (學號