设计名为mystock的表单(控件名,文件名均为mystock)。表单的标题为“股票持有情况”。表单中有两个文本框(Text1和Text2)和三个命令按钮“查询”(名称为Command1)、“退出”(名称为Conunand2)和“清空”(名称为Comman

admin2015-07-27  15

问题 设计名为mystock的表单(控件名,文件名均为mystock)。表单的标题为“股票持有情况”。表单中有两个文本框(Text1和Text2)和三个命令按钮“查询”(名称为Command1)、“退出”(名称为Conunand2)和“清空”(名称为Command3)。
    运行表单时,在文本框Text1中输入某一股票的汉语拼音,然后单击“查询”按钮,则Text2中会显示出相应股票的持有数量,并计算相应股票的浮亏信息追加到stock_fk表中,计算公式是浮亏金额=(现价-买人价)*持有数量。
    单击“清空”按钮物理删除表stock_fk的全部记录。
    单击“退出”按钮关闭表单。
请运行表单,单击“清空”按钮后,依次查询qlsh、shjc和bggf的股票持有数量,同时计算浮亏金额。

选项

答案步骤1:单击常用工具栏中的“新建”按钮,文件类型选择“表单”,打开表单设计器。单击常用工具栏中的“保存”按钮,在弹出的“保存”对话框中输入“mystock”即可。 步骤2:在“表单设计器-mystock.scx”中,在“属性”的Caption处输入“股票持有情况”,在Name处输人“mystock”。 步骤3:在“表单设计器-mystock.scx”中,添加两个文本框(“Text1”和“Text2”)。在“表单设计器-mystock.scx”中,添加三个命令按钮,单击第1个命令按钮在“属性”的Caption处输入“查询”,单击第2个命令按钮在“属性”的Caption处输入“清空”,单击第3个命令按钮在“属性”的Caption处输入“退出”按钮,结果如图4.43所示。 [*] 步骤4:双击“查询”命令按钮,在“Commandl.Click”编辑窗口中输入命令组,接着关闭编辑窗口。 ******“查询”命令按钮的click事件代码****** pinyin=alltrim(thisform.text1.Value) open database Stock use stock name locate for汉语拼音=pinyin if found() SELECT持有数量,股票简称; FROM stock sl,stock name; WHERE汉语拼音=pinyin and stock sl.股票代码= stock name.股票代码; INTO array a thisform.text1.value=a[2] thisform.text2.value=a[1] else wait“没有查询到,请重输”window timeout 2 endif ***************** 步骤5:双击“清空”命令按钮,在“Command2.Click”编辑窗口中输入命令组,接着关闭编辑窗口。 ******“清空”命令按钮的Click事件代码****** thisform.text1.value=“” thisform.text2.value=“” Delete FROM Stock_fk ******************** 步骤6:双击“退出”命令按钮,在“Command3.Click”编辑窗口中输入“Thisform.Release”,接着关闭编辑窗口。 步骤7:运行表单,并按题目要求进行查询。

解析
转载请注明原文地址:https://kaotiyun.com/show/x2Ep777K
0

相关试题推荐
最新回复(0)