问题 问答题

设计名为mystock的表单(控件名,文件名均为mystock)。表单的标题为:“股票持:有情况”。表单中有两个文本框(text1和text2)和两个命令按钮即“查询”(名称为Command1)和“退出”(名称为Command2)。
运行表单时,在文本框text1中输入某一股票的汉语拼音,然后单击“查询”,则text2中会显示出相应股票的持有数量。
单击“退出”按钮关闭表单。

答案

参考答案:第一步:在Visual FoxPro主窗口中按下组合键Ctrl+N,系统弹出“新建”对话框,在文件类型中选择“表单”,单击“新建文件”按钮,系统将打开表单设计器;或直接在命令窗口中输入crea form mystock。
第二步:单击工具栏按钮“表单控件工具栏”,在弹出的“表单控件”对话框中,选中“命令按钮”控件,在表单设计器中拖动鼠标,这样在表单上得到一个“命令按钮”控件command1,用类似的方法为表单加入一个“命令按钮”控件command2,两个“文本框”控件text1和text2。
相关控件的属性值如下所示:
对象 属性 属性值
Form1 Name mystock
Caption 股票持有情况
Command1 Caption 查询
Command2 Caption 退出
***命令按钮command1(查询)的Click事件代码如下****
SELECT Stock_s1.持有数量;
 FROM stock! stock_name INNER JOIN stock! Stock_s1;
  ON Stock_name.股票代码=Stock_s1.股票代码;
 WHERE Stock_name.汉语拼音=alltrim(thisform.text1.value);
 INTO ARRAY TEMP
THISFORM.TEXT2.VALUE=TEMP
***命令按钮command2(退出)的Click事件代码如下***
thisform.release

多项选择题
单项选择题