| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 731 人关注过本帖
标题:各位大神,帮忙改一下表单!
只看楼主 加入收藏
cut9
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2009-11-8
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:9 
各位大神,帮忙改一下表单!
vfp.rar (2.44 KB)


要求:按开始,出现个随机的3位数:
按完3次停后,出现另外一个3位数,
若与之前的三位数相等,则进入下一表单!
搜索更多相关主题的帖子: 大神 表单 
2010-01-03 12:04
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:18 
(1)不喜欢下载附件,所以不知道你表单有哪些控件。这里假设有两个文本框,两个命令按钮。
(2)“开始”按钮的click事件代码:
thisform.text1.value=int(rand()*900+100)
(3)“停”按钮的click事件代码:
n=n+1
if n=3
  thisform.text2.value=int(rand()*900+100)
  if thisform.text1.value=thisform.text2.value
    do form 另外一个表单
  endif
  n=0
endif
(4)表单的init事件代码
public n
n=0
(5)这个表单这样设计,用途有点折磨用户的感觉,不知道什么时候能进入“另外一个表单”。玩笑,玩笑,别当真。

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2010-01-03 14:05
cut9
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2009-11-8
收藏
得分:0 
回复 2楼 Tiger5392
伟大的斑竹啊!我不是这个意思啊,你理解错我的意思啦
你就行行好看看我的附件吧……
2010-01-03 14:28
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
(1)表单的Init事件代码
public i,j,k
store 0 to i,j,k
(2)timer1.timer事件代码
thisform.Label1.caption=str(i,1)
i=iif(i=9,0,i+1)
*timer2.timer和timer3.timer类推
(3)command4.click事件代码
   thisform.TIMER3.enabled=.f.
   QQ=
   if  val(QQ)=i*100+j*10+k
       do form hh     
   else
      开始"   
   endif
   

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2010-01-03 16:15
cut9
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2009-11-8
收藏
得分:0 
回复 4楼 Tiger5392
老大,那个表单是能运行啦,可是即使正确也无法进入hh表单啊,总是提示我按错啦,咋回事啊?我把计时器调到1000,让我输入的跟他一致,可就是不行……

[ 本帖最后由 cut9 于 2010-1-4 18:53 编辑 ]
2010-01-04 18:51
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
thisform.TIMER3.enabled=.f.
QQ=
if  val(QQ)=i*100+j*10+k
  thisform.release
  do form hh
else
  开始"   
endif

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2010-01-05 00:22
cut9
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2009-11-8
收藏
得分:0 
回复 6楼 Tiger5392
斑竹大人,还是不行哦!之前我也加了thisform.release也不行!
2010-01-05 23:33
Tiger5392
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:88
帖 子:2775
专家分:2237
注 册:2006-5-17
收藏
得分:0 
你这也不行,那也不行,我这里却行,怎么办

感言:学以致用。 博客:http://www./blog/user14/65009/index.shtml email:Tiger5392@
2010-01-06 01:04
bc123
Rank: 2
等 级:论坛游民
帖 子:14
专家分:12
注 册:2006-2-4
收藏
得分:2 
参阅程序运行过程中如何调用另一表单,里面有一些设置问题。
2010-01-06 19:44
cut9
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2009-11-8
收藏
得分:0 
回复 8楼 Tiger5392
嘻嘻 算啦 我凉拌啦~ 反正是我同学问的问题,嘿嘿
2010-01-06 21:01
快速回复:各位大神,帮忙改一下表单!
数据加载中...
 
   



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

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