<style id="uedzd"></style>
  • <style id="uedzd"></style>
  • <dfn id="uedzd"></dfn>
  • <dfn id="uedzd"></dfn>
    1. <ruby id="uedzd"></ruby>
      <ruby id="uedzd"></ruby>
    2. 實(shí)訓(xùn)指導(dǎo)
      您當(dāng)前的位置: 首頁(yè)>實(shí)訓(xùn)指導(dǎo)

      實(shí)驗(yàn)十二
      表單設(shè)計(jì)

      發(fā)布時(shí)間: 2018-11-27      信息來(lái)源:       閱讀次數(shù):

      實(shí)驗(yàn)十二  表單設(shè)計(jì)

      一、實(shí)驗(yàn)?zāi)康?
      1.
      理解對(duì)象的屬性、事件和方法等基本概念。
      2.
      掌握使用表單向?qū)?chuàng)建表單的方法。
      3.
      學(xué)會(huì)使用表單設(shè)計(jì)器建立表單。
      4.
      掌握數(shù)據(jù)環(huán)境的設(shè)置方法。
      5.
      掌握一些表單控件的使用,并能對(duì)其進(jìn)行屬性的設(shè)置。

      二、實(shí)驗(yàn)內(nèi)容及上機(jī)步驟
      【上機(jī)題一】
      利用表單向?qū)?chuàng)建一個(gè)查詢職工基本情況及工資數(shù)據(jù)的表單。
      【上機(jī)步驟】
      本題的知識(shí)點(diǎn)是掌握用“表單向?qū)А钡姆椒▌?chuàng)建一個(gè)一對(duì)多的表單。
      操作步驟如下:
      (1)選擇“文件”菜單中的“新建”選項(xiàng),指定文件類型為表單,單擊“向?qū)А卑粹o,彈出“向?qū)нx取”對(duì)話框,選中“一對(duì)多表單向?qū)А?,然后單擊“確定”,彈出“一對(duì)多表單向?qū)А薄安襟E1—從父表中選定字段”對(duì)話框。
      (2)指定職工表作為父表,并從可用字段列表框中選擇所有字段到選定字段列表框中,然后單擊“下一步”,彈出“步驟2—從子表中選定字段”對(duì)話框。
      (3)指定工資表作為子表,并選擇其所有字段,單擊“下一步”,彈出“步驟3—建立表之間的關(guān)系”對(duì)話框。
      (4)指定兩個(gè)表間的關(guān)聯(lián)關(guān)系。表單向?qū)С绦蛞呀?jīng)指定默認(rèn)的關(guān)聯(lián)關(guān)系為職工表.職工編號(hào)---工資表.職工編號(hào),這正是要建立的關(guān)聯(lián)關(guān)系,直接單擊“下一步”,彈出“步驟4—選擇表單樣式”對(duì)話框。
      (5)選擇表單樣式。可供選擇的樣式有標(biāo)準(zhǔn)式、凹陷式、陰影式、邊框式等4種,選擇標(biāo)準(zhǔn)式,按鈕類型選擇文本按鈕,單擊“下一步”,彈出“步驟5—選擇排序”對(duì)話框。
      (6)指定排序次序。當(dāng)對(duì)排序沒有明確要求,不需要指定排序字段,可直接單擊“下一步”,彈出“步驟6—完成”對(duì)話框。

      (7)輸入表單的標(biāo)題并保存表單。在“請(qǐng)鍵入表單標(biāo)題”文本框中輸入“職工信息查詢”,選擇“保存并運(yùn)行表單”選項(xiàng),單擊“完成”按鈕,彈出“另存為”對(duì)話框。
      (8)在“保存表單為”文本框中輸入“職工信息查詢”,選定FORMS文件夾為保存位置,然后單擊“保存”按鈕,顯示表單運(yùn)行結(jié)果。

      【上機(jī)題二】
      利用表單設(shè)計(jì)器創(chuàng)建一個(gè)瀏覽部門表記錄的表單。
      【上機(jī)步驟】
      本題的知識(shí)點(diǎn)是表單設(shè)計(jì)器、屬性窗口、表單控件工具欄和數(shù)據(jù)環(huán)境等的使用,操作步驟如下:
      (1)啟動(dòng)表單設(shè)計(jì)器
      在“項(xiàng)目管理器”的“文檔”選項(xiàng)卡中,選擇“表單”項(xiàng),單擊“新建”按鈕,彈出“新建表單”對(duì)話框,單擊“新建表單”按鈕,則出現(xiàn)一個(gè)標(biāo)題為Form1的表單設(shè)計(jì)器窗口。
      (2)設(shè)置數(shù)據(jù)環(huán)境
      在表單設(shè)計(jì)器中,右擊表單,選擇快捷菜單中的“數(shù)據(jù)環(huán)境”命令,在“添加表和視圖”對(duì)話框中選擇“部門表”,單擊“添加”按鈕。數(shù)據(jù)環(huán)境窗口中將顯示一個(gè)部門表。
      (3)添加控件
      在數(shù)據(jù)環(huán)境設(shè)計(jì)器窗口中選擇部門表的部門編號(hào),拖到表單(Form1)中。以同樣方法將部門表的部門名稱添加到表單中。然后在表單控件工具欄中選定“命令按鈕”控件,再單擊表單,表單上會(huì)出現(xiàn)一個(gè)名字為Command1的命令按鈕。以同樣方法再添加兩個(gè)命令按鈕Command2和Command3。
      (4)設(shè)置控件屬性
      選定命令按鈕(Command1),在屬性窗口選定“全部”選項(xiàng)卡,從屬性列表中找到Caption屬性,在屬性設(shè)置框中輸入“上一條”,按Enter鍵。以同樣方法設(shè)置第二個(gè)命令按鈕(Command2)的Caption屬性為“下一條”,第三個(gè)命令按鈕(Command3)的Caption屬性為“關(guān)閉”。選定Form1表單,設(shè)置Form1表單的Caption屬性為“部門信息查詢”。
      (5)編寫事件代碼
      雙擊“上一條”命令按鈕(Command1),打開代碼編輯窗口。對(duì)象組合框中顯示為“Command1”,在過程組合框中選擇Click,然后在編輯框中編寫事件代碼,代碼如下:
      SKIP -1
      IF BOF()
      GO 1
      ENDIF
      Thisform.Refresh
      雙擊“下一條”命令按鈕,編寫命令按鈕(Command2)的Click事件代碼,代碼如下:
      SKIP
      IF EOF()
      GO BOTTOM
      ENDIF
      Thisform.Refresh
      雙擊“關(guān)閉”命令按鈕,編寫命令按鈕(Command3)的Click事件代碼,代碼如下:
      Thisform.Release
      (6)保存和運(yùn)行表單
      選擇“文件”菜單中的“保存”命令,彈出“另存為”對(duì)話框。在“保存表單為”文本框中輸入表單文件名,單擊“保存”按鈕。
      單擊工具欄中的運(yùn)行按鈕,運(yùn)行表單,若單擊“關(guān)閉”按鈕,可以關(guān)閉表單。


      日韩无码第一页,一区_97资源人妻碰碰碰_有码无码人妻Av_午夜亚洲国产理论片2020网站 亚洲无码片AV一级 岛国av无码专区免费看
      <style id="uedzd"></style>
    3. <style id="uedzd"></style>
    4. <dfn id="uedzd"></dfn>
    5. <dfn id="uedzd"></dfn>
      1. <ruby id="uedzd"></ruby>
        <ruby id="uedzd"></ruby>