版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、表單操作題表單操作題1設(shè)計(jì)一個(gè)名為Frm01的表單,表單的控件名和文件名均為Frm01。表單的形式如下圖所示。要求如下:1.表單標(biāo)題為“零件供應(yīng)情況“,表格控件為Grid1,命令按鈕“查詢“為Comm1、“退出“為Comm2,標(biāo)簽控件Label1和文本框控件Text1(程序運(yùn)行時(shí)用于輸入工程號(hào))。2.運(yùn)行表單時(shí),在文本框中輸入工程號(hào),單擊“查詢“命令按鈕后,表格控件中顯示相應(yīng)工程所使用的零件的零件名、顏色和重量(通過(guò)設(shè)置有關(guān)“數(shù)據(jù)“屬性
2、實(shí)現(xiàn)),并將結(jié)果按“零件名“升序排序存儲(chǔ)到pp.dbf文件。單擊“退出“按鈕關(guān)閉表單。答題要求:(1)將表格的recdsourcetype屬性設(shè)為“0”(2)查詢的單擊事件:使用語(yǔ)句,將查詢結(jié)果存到一個(gè)表pp.dbf中,然后再將表格grid1的recdsource屬性設(shè)為“pp“(3)表單備注文件不能刪除查詢按鈕代碼:零件.零件名零件.顏色零件.重量FROM供應(yīng)零件!供應(yīng)INNERJOIN供應(yīng)零件!零件ON供應(yīng).零件號(hào)=零件.零件號(hào)WH
3、ERE供應(yīng).工程號(hào)=thisfm.text1.valueDERBY零件.零件名INTOTABLEpp.dbfthisfm.grid1.recdsource=null&&這句話可以刪除thisfm.grid1.recdsource=“pp“thisfm.grid1.refreshthisfm.refresh3求1到100以內(nèi)的奇數(shù),單擊“計(jì)算“按鈕后首先清除列表框中原先的內(nèi)容,然后顯示結(jié)果,單擊“退出“按鈕后退出表單。表單文件名為Frm0
4、3.scx。要求:1.窗體命名為frm03.scx(表單備注文件不能刪除)2.窗體的標(biāo)題為:求100以內(nèi)的奇數(shù)3.命令按鈕“計(jì)算“(名稱為comm1)“退出“(名稱為comm2)4.列表框名稱為list15.判斷一個(gè)數(shù)是否為奇數(shù)使用語(yǔ)句“i%20”,即i除2不等于06.列表框中增加一項(xiàng)使用語(yǔ)句“additem(str(i))”7.要求使用f循環(huán)語(yǔ)句8.退出表單用release語(yǔ)句計(jì)算按鈕的代碼:計(jì)算按鈕的代碼:thisfm.list1.
5、clearthisfm.pageframe1.page1.label1.fontname=“黑體“endif&&DocaseCasethis.value=1thisfm.pageframe1.page1.label1.fontname=“隸書(shū)“Casethis.value=2thisfm.pageframe1.page1.label1.fontname=“隸書(shū)“endcase6做一個(gè)如圖所示的頂層表單,表單文件名為Frm06.scx,運(yùn)
6、行時(shí)表單上加載一菜單,如圖所示。要求如下:(1)表單文件名為Frm06.scx(表單備注文件不能刪除),存入考生文件夾。(2)表單標(biāo)題為“頂層表單”。(3)菜單名為M1,生成的菜單文件名為M1.MPR(4)菜單有兩菜單項(xiàng),分別為“歡迎”和“退出”(5)單擊歡迎,顯示“VF歡迎您”(使用函數(shù)messagebox);單擊“退出”,退出VF(使用quit語(yǔ)句)。注意:請(qǐng)將相關(guān)文件按要求存入考生文件夾,否則本題得不到成績(jī)。表單文件名為FRM06
7、.scx歡迎子菜單的命令:Messagebox(“vf歡迎您”)退出的命令為Quit7表單功能:表單上有一個(gè)表格控件,用來(lái)綁定students表,一個(gè)有三個(gè)水平命令按鈕的命令按鈕組,能實(shí)驗(yàn)對(duì)表students的添加、刪除功能。程序運(yùn)行如圖所示。要求:1.表單文件名為frm07.scx(表單備注文件frm07.sct不能刪除),存入考生文件夾。2.表單的標(biāo)題為“表格的使用”。3.表格名稱為grid1,“添加”按鈕的名稱為CmdAdd,“刪
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 眾賞文庫(kù)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
評(píng)論
0/150
提交評(píng)論