VF下拉列表框问题

BD9MCG 2012-09-03 01:58:09
我在表单上建了一个选项按纽组:

一班 二班 三班 四班 五班......共二十个班,click代码如下:

public n
n=this.value
if n>0
use str(n)
else
messagebox("请先选择班级",64,"提示")
endif


我现在想把选项按纽组按成下拉列表框,应该怎么操作?

请高手帮忙
...全文
537 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
lygcw9602 2012-09-04
  • 打赏
  • 举报
回复
建议楼主应该看看书,这样下去是很危险的,组合框的最基础的知识都不了解,上面已经告诉你很清楚了,如何设置组合框的属性。
lygcw9602 2012-09-04
  • 打赏
  • 举报
回复
可参考VFP6.0帮助文件,下载地址:http://download.csdn.net/detail/lygcw9602/4538139
BD9MCG 2012-09-04
  • 打赏
  • 举报
回复
好的,我研习你的这段代码,慢慢消化,这几次回帖,已经对我帮助很大了,不瞒您说,我们这儿偏僻,根本买不到这类书,我手头有几本VF的书,现在对我作用不大,好多东西都是通过网上学习的,网上有许多东西比书本上的好懂,比书本上的更实用,不过你能推荐几本这方面的书吗
lygcw9602 2012-09-03
  • 打赏
  • 举报
回复
COMBO1的属性也可以在表单属性窗口中设置
BD9MCG 2012-09-03
  • 打赏
  • 举报
回复
感谢您及时回帖,我试了你的代码,组合模框是空白,什么也没有。我原先建的选项按纽组达到的目的是:在表单上有二十个按纽,每个按代表一个班级,如果这个按纽组的value=1,就打开1班的成绩表也就是表 'str(1)',如果这个按纽的value=2,就打开2班的成绩表也就是表 'str(2)'。就是这段代码:
public n
n=this.value
if n>0
use str(n)
else
messagebox("请先选择班级",64,"提示")
endif


我现在想把选项按纽组要达到的效果改成组合框或列表框 即:在组合框或列表框中要出现二十个班,点一班就打开表“1”,点二班就打开表“2”
请您指教
lygcw9602 2012-09-03
  • 打赏
  • 举报
回复

*-- combo1.init 事件代码
create cursor taba (bj c(10))
for i=1 to 20
insert into taba values (transform(i)+"班")
endfor
*--- 上面四行代码可以不要
with thisform.combo1
.columncount=1
.displaycount=10
.rowsource="taba.bj"
.rowsourcetype=6
.style=2
endwith

2,749

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧