计算机等级考试二级VFP上机试题及解题思路(41)

　　三、综合应用(1小题，计30分)

　　设计名为mystock的表单(控件名，文件名均为mystock)。表单的标题为:

　　"股票持有情况"。表单中有两个文本框(text1和text2)和两个命令按钮"查询"(名称为Command1)和"退出"(名称为Command2)。

　　运行表单时，在文本框text1中输入某一股票的汉语拼音，然后单击"查询",则text2中会显示出相应股票的持有数量。

　　单击"退出"按钮关闭表单。

　　本题主要考核点：

　　表单的创建、控件的属性的修改、表单的退出、SQL查询等知识点

　　本题解题思路：

　　第一步：在Visual FoxPro主窗口中按下组合键Ctrl+N，系统弹出"新建"对话框，在文件类型中选择"表单"，点击"新建文件"按钮,系统将打开表单设计器;或直接在命令窗口中输入crea form mystock。

　　第二步：点击工具栏按钮"表单控件工具栏"，在弹出的"表单控件"对话框中，选中"命令按钮"控件，在表单设计器中拖动鼠标，这样在表单上得到一个"命令按钮"控件command1，用类似的方法为表单加入一个"命令按钮"控件command2，二个"文本框"控件text1和text2。

　　相关控件的属性值如下表所示：

　　***命令按钮command1(查询)的Click事件代码如下****

　　SELECT Stock_sl.持有数量;

　　FROM stock!stock_name INNER JOIN stock!stock_sl ;

　　ON Stock_name.股票代码 = Stock_sl.股票代码;

　　WHERE Stock_name.汉语拼音 = alltrim(thisform.text1.value);

　　INTO ARRAY TEMP

　　THISFORM.TEXT2.VALUE=TEMP

　　***命令按钮command2(退出)的Click事件代码如下***

　　thisform.release