回 帖 发 新 帖 刷新版面

主题:关于列表框和编辑框

我现在想实现这样一个功能
单击列表框里的标题可以在编辑框的显示相关内容。
应如何实现呢?

回复列表 (共6个回复)

沙发

列表框的内容是??DBF文件名??还是什么啊?这个得说清楚吧,还是TXT文件?

板凳

其实是不是用列表框我也不知道,我就是想在一个帮助的表单里有两个好像长方形的东西,左边的长方形里面有个个关于帮助的标题,例如如何查询学生信息,而在右边的长方形就显现要如何才能实现查询学生信息的功能。

3 楼

你这样试试
建立一个表文件, 临时表    标题(字符型   20  )     内容 (备注型)
在表单的
thisform.list1.RowSourceType = 6
thisform.list1.RowSource = 临时表
click 里输入:
thisform.edit1.value = 临时表.内容 就行了啊


或者你把editbox的.ControlSource = 临时表.内容
list.click里就换成 thisform.refresh 就行了。
这样编辑后就可以直接存盘啦

4 楼

真的很谢谢你啊,我还想问一个问题啊。
在一个表单里,有两个组合框,一个是选择班级的,另一个是选择课程的。有四个text分别显示选课学生的人数,最高分,最低分,平均分。我的目的是先选择班级,再选择课程,然后分别统计每班每们课的选课学生的人数,最高分,最低分,平均分。

5 楼

表文件的结构可以发上来吗?
还有你做到什么程度啦?
我给你重从说一个吧
conbo1.RowSourceType = 6
      .RowSource = 表.班级
combo2.rowsourcetype = 6
      .rowsource = 表.课程
command1.click 
if empty(thisform.combo1.value) or empty(thisform.combo2.value)
    messaegbox("选择班级或课程,不能为空")
    retu
endif
sele 表
set filter to allt(表.班级)==allt(thisform.combo1.value) and allt(表.课程)= allt(thisform.combo2.value)
COUNT TO thisform.text1.value  &&人数
......
......
....求出最高分,最低分,平均分,放在text里就ok了

6 楼


我是从几张表里建一个查询放在数据库里的,麻烦你把最后那个代码也写一下好吗?我自己写了,发现运行不了

我来回复

您尚未登录,请登录后再回复。点此登录或注册