| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2259 人关注过本帖
标题:如何让用户对选项按钮组做出选择后再往下执行后面的代码?
取消只看楼主 加入收藏
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
结帖率:60%
收藏
已结贴  问题点数:20 回复次数:12 
如何让用户对选项按钮组做出选择后再往下执行后面的代码?
我在表单中用到一个选项按钮组,我想让用户做出选择后再执行后面的代码,以便根据用户的选择来执行不同的代码,但是现在的问题是不等用户做出选择就直接执行后面的代码了,有什么办法让用户做出选择后再执行后面的代码吗?请高手指教,先谢谢了!
搜索更多相关主题的帖子: 如何 用户 
2015-06-09 19:38
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
问题的补充:在设计时先是不可见的,用到的时候再让选项按钮组变成可见的,在发出.visible=.t. 之后想让用户做出选择后再执行后面的代码。
2015-06-09 19:47
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
各位没有看明白我的意思:

thisform.optiongroup2.Visible=.t.
thisform.optiongroup2.option1.Visible=.t.
thisform.optiongroup2.option2.Visible=.t.
thisform.optiongroup2.option3.Visible=.t.
&&此时需要等待做出选择
if thisform.optiongroup2.value=1
   do 1.prg
endif
if thisform.optiongroup2.value=2
   do 2.prg
endif
if thisform.optiongroup2.value=3
   do 3.prg
endif
现在的情况是还没等进行选择呢,后面的IF语句就开始执行了呀。
2015-06-09 20:22
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
回复 3楼 sdta
请帮忙看一下,我的意思是:

thisform.optiongroup2.Visible=.t.
thisform.optiongroup2.option1.Visible=.t.
thisform.optiongroup2.option2.Visible=.t.
thisform.optiongroup2.option3.Visible=.t.
&&此时需要等待做出选择
if thisform.optiongroup2.value=1
   do 1.prg
endif
if thisform.optiongroup2.value=2
   do 2.prg
endif
if thisform.optiongroup2.value=3
   do 3.prg
endif
现在的情况是还没等进行选择呢,后面的IF语句就开始执行了呀。
2015-06-09 20:28
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
用inkey(),wait,timer都不行,用户的按键或鼠标选择都被截获了,根本返不回来用户的选择。
2015-06-09 20:32
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
回复 8楼 sdta
也不行,仍然是不等进行选择就执行下面的代码了。
2015-06-09 20:34
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
回复 12楼 sdta
这个代码在另一个命令按钮的click事件中。
2015-06-09 20:36
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
是不是只能添加一个表单,让选项按钮组在另一个表单中,当选项按钮组的值发生变化时再关闭表单,同时返回值呀。只是这样做出来就不好看了。
2015-06-09 20:41
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
回复 14楼 sdta
当我按这个命令按钮时就需要执行这个代码,但是我希望在执行到选项按钮组时停下来等待选择,然后再根据选择的值执行后面的代码。
2015-06-09 20:43
w7802672
Rank: 1
等 级:新手上路
帖 子:231
专家分:0
注 册:2015-5-20
收藏
得分:0 
回复 18楼 sdta
在这些代码:
thisform.optiongroup2.Visible=.t.
thisform.optiongroup2.option1.Visible=.t.
thisform.optiongroup2.option2.Visible=.t.
thisform.optiongroup2.option3.Visible=.t.

之前还有很多代码,我只能在这个位置需要选项按钮组的出现,真的没有办法吗?
2015-06-09 21:01
快速回复:如何让用户对选项按钮组做出选择后再往下执行后面的代码?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.025144 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved