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

admin2013-11-12  27

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

选项

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

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

最新回复(0)