43.某藥品庫(kù)房的計(jì)算機(jī)管理系統(tǒng)中,需要為發(fā)藥建立出庫(kù)記錄。已知“出庫(kù)記錄”、“藥品目錄”的數(shù)據(jù)表內(nèi)容如下所示:
該界面的操作過(guò)程是:先輸入病員編號(hào)和庫(kù)管員姓名,再依次輸入藥品編號(hào)和數(shù)量,在右邊列表中依次顯示該病員需要出庫(kù)的所有藥品清單。每輸完一個(gè)藥品則將藥品記錄添加到“出庫(kù)記錄”表中,按“完成”按鈕后,一個(gè)病員的出庫(kù)藥品完成,并在輸入界面下部可以瀏覽。試回答以下問(wèn)題:
(1)該輸入界面分別應(yīng)用了哪幾種Visual FoxPro控件?(4分)
(2)以下是“數(shù)量’’控件的LostFocus事件代碼,請(qǐng)解釋其意義。(3分)
SELECT出庫(kù)記錄
APPEND BLANK
REPLACE藥品編號(hào)WITH THISFORM.藥品編號(hào).VALUE,;
日期WITH DATE0,;
庫(kù)管員WITH THISFORM.庫(kù)管員.VALUE,;
病員編號(hào)WITH THISFORM.病員編號(hào).VALUE,;
數(shù)量WITH THISFORM.數(shù)量.VALUE,;
時(shí)間WITH TIME()
THISFORM.藥品編號(hào).SETFOCUS
(3)以下是“完成’’控件的Click事件代碼,請(qǐng)解釋其意義。(3分)
THISFORM.LISTl.CLEAR
n=l
THISFORM.出庫(kù)記錄.REFRESH