43.某药品库房的计算机管理系统中,需要为发药建立出库记录。已知“出库记录”、“药品目录”的数据表内容如下所示:
该界面的操作过程是:先输入病员编号和库管员姓名,再依次输入药品编号和数量,在右边列表中依次显示该病员需要出库的所有药品清单。每输完一个药品则将药品记录添加到“出库记录”表中,按“完成”按钮后,一个病员的出库药品完成,并在输入界面下部可以浏览。试回答以下问题:
(1)该输入界面分别应用了哪几种Visual FoxPro控件?(4分)
(2)以下是“数量’’控件的LostFocus事件代码,请解释其意义。(3分)
SELECT出库记录
APPEND BLANK
REPLACE药品编号WITH THISFORM.药品编号.VALUE,;
日期WITH DATE0,;
库管员WITH THISFORM.库管员.VALUE,;
病员编号WITH THISFORM.病员编号.VALUE,;
数量WITH THISFORM.数量.VALUE,;
时间WITH TIME()
THISFORM.药品编号.SETFOCUS
(3)以下是“完成’’控件的Click事件代码,请解释其意义。(3分)
THISFORM.LISTl.CLEAR
n=l
THISFORM.出库记录.REFRESH