表單設(shè)計練習(xí)

《表單設(shè)計練習(xí)》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。

1、表單設(shè)計表單設(shè)計是我們的考試的重點，復(fù)習(xí)課件的表單設(shè)計及應(yīng)用部分，考試時要求學(xué)生熟練的寫出事件中的代碼。舉例：1.標準郵費為0.05元/克，超出100克后，超出部分按0.1元收費。設(shè)計“郵費收取”表單，計算郵費，結(jié)果顯示在文本框中?！坝嬎恪眂ommand1.Click代碼g=thisform.text1.valueifg<=100Cost=0.05*gelseCost=0.05*100+(g-100)*0.1endifthisform.text2.value=Cost在Form1的Init事件中初始化：Thisform.text1.value=0This

2、form.text2.value=0（注意text1，text2的數(shù)據(jù)類型）2．計算階乘表單。表單中輸入階乘終值，單擊“計算”按鈕，text2顯示計算結(jié)果；單擊“重置”按鈕，清除text1、text2中的內(nèi)容，使焦點回到text1，以便重新輸入。9提示：初始設(shè)置txet2.enabled=.f.Text2屬性設(shè)置為：Enabled=.F.command1.Click代碼：thisform.text2.enabled=.t.y=1fori=1TOthisform.text1.valuey=y*iendforthisform.text2.value=ythi

3、sform.text1.setfocuscommand2.Click代碼：thisform.text1.value=0thisform.text2.value=09thisform.text2.enabled=.f.thisform.text1.setfocus3．如下圖所示，用標簽、文本框、命令按扭構(gòu)成一個表單Form1。在文本框中單擊左鍵將顯示當前系統(tǒng)日期，單擊右鍵將顯示當前系統(tǒng)時間；單擊“清除”按鈕，文本框中的結(jié)果將被清除；單擊“退出”按鈕，將退出表單的運行?！扒宄卑粹o的CLICK事件代碼是```Thisform.text1.value；“退出”

4、按鈕的CLICK事件代碼是thisform.release；文本框的CLICK事件代碼是this.value=date0，而RightClick的事件代碼是this.value=time0。答案：Thisform.text1.value=””thisform.releasethis.value=date()RightClickthis.value=time()94.如圖(a)(b)所示的表單，用戶分別在Text1和Text2中輸入初值和終值，單擊“計算”按鈕可計算出初值和終值之間連續(xù)整數(shù)的和，結(jié)果顯示于Text3中。如：輸入12和15，可計算出12+13

5、+14+15的和。表單運行時Text3不可用，當單擊“計算”按鈕，Text3成為可用文本框并顯示結(jié)果；單擊“清除”按鈕，將三個文本框的內(nèi)容清零，同時Text3重新置為不可用。請完成下面的設(shè)計。Text1Text2Text3（b）(a)表單設(shè)計步驟如下：l在空白表單上加入三個標簽、三個文本框和三個命令按鈕，它們的Name屬性均取系統(tǒng)默認值。表單、標簽、按鈕的Caption屬性如圖。l表單的Init事件代碼：Thisform.text1.Value=0Thisform.text2.Value=0Thisform.text3.Value=0Thisform.t

6、ext3.Enabled=.f.l“計算”按鈕的Click代碼：9x=Thisform.text1.Valuey=Thisform.text2.ValueThisform.Text3.Enable=.t.S=0Fori=xToyS=S+iEngforThisform.Text.Value=S①l“清除”按鈕Click事件代碼：Thisform.Text1.Value=0lThisform.Text2.Value=0lThisform.Text3.Value=0lThisform.Text1.SetfocuslThis.Text3.Enable=f②l“退

7、出”按鈕Click事件代碼：Thisform.Release③②Thisform.Text1.Value=0Thisform.Text2.Value=0Thisform.Text3.Value=09Thisform.Text1.SetfocusThisform.Text3.Enabled=.f.③Thisform.Release5、設(shè)計一個能夠瀏覽或編輯3個數(shù)據(jù)表（Xsjbxx，cj，kc）的表單。用戶可選擇其中一個數(shù)據(jù)表，并且選定是否能夠?qū)Ρ碇袛?shù)據(jù)進行編輯，然后單擊“確定”按鈕，瀏覽或編輯該表中的數(shù)據(jù)。通過數(shù)據(jù)環(huán)境添加三個表：Xsjbxx,cj,kc;

8、“確定”按鈕的Click事件中加入：ifthisform.check1.valu