求visual foxpro vf 高手解答途中的问题啊!!!哪位好心人指点一下啊!!
展开全部
第一小题:文件/新建表单/文件下的保存,输入myform1。在表单中添加一个命令按钮,在属性卖局窗口中找到caption属性,输入“计算并显示”,敲一下回车。在表单中添加一个表格控件,在属性窗口找到recordsourcetype中选择“表”,在recordsource中输入“xs”敲回车。这时候双击命令按钮,在click事件中输入命令。这是用sql语句写出来的中梁让。
第二小题:文件/新建表单/文件下的保存,输入myform2.在表单右击选择数据环境,打开数据环境后右击添加表,把cp添加到数据环境,按照图示把标签和组合框、文本框添加到表单,选择控件在属性窗口caption更渣友改标题。选择组合框,在属性窗口找rowsourcetype选择表,rowsource选择产品编号。然后双击组合框,在click事件中出入命令:
select 名称,规格,单价 from cp where 产品编码=thisform.combo1.value into array a
thisforn.text1.value=a(1)
thisforn.text1.value=a(2)
thisforn.text1.value=a(3)
添加一个命令按钮,双击命令按钮,输入“thisform.release”
第二小题:文件/新建表单/文件下的保存,输入myform2.在表单右击选择数据环境,打开数据环境后右击添加表,把cp添加到数据环境,按照图示把标签和组合框、文本框添加到表单,选择控件在属性窗口caption更渣友改标题。选择组合框,在属性窗口找rowsourcetype选择表,rowsource选择产品编号。然后双击组合框,在click事件中出入命令:
select 名称,规格,单价 from cp where 产品编码=thisform.combo1.value into array a
thisforn.text1.value=a(1)
thisforn.text1.value=a(2)
thisforn.text1.value=a(3)
添加一个命令按钮,双击命令按钮,输入“thisform.release”
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询