- 易表在线答疑 (http://www.egrid2000.com/dvbbs/index.asp)
-- 菜单方案 (http://www.egrid2000.com/dvbbs/list.asp?boardid=6)
---- 八卦巨星扑克占卜游戏（最新作品） (http://www.egrid2000.com/dvbbs/dispbbs.asp?boardid=6&id=467)
-- 发布时间：2006/9/9 22:59:00
-- 八卦巨星扑克占卜游戏（最新作品）
[这个贴子最后由dongd1在 2006/09/10 10:42am 第 1 次编辑]
用了两天时间作了个占卜游戏，意在发扬易表，相信易表也能做一些小游戏的，呵呵！
-- 发布时间：2006/9/10 0:36:00
--
太厉害了嘛,哈哈.收藏珍藏了.谢谢东东.
-- 发布时间：2006/9/10 8:50:00
--
谢谢东东版主!呵呵
-- 发布时间：2006/9/10 19:32:00
--
谢谢！下载。。。
-- 发布时间：2006/9/10 20:44:00
--
有创意！谢过。
-- 发布时间：2006/9/11 23:00:00
--
下来玩玩看。谢了
-- 发布时间：2006/9/12 1:24:00
--
刚才没事，仔细看了一下东东的大作，的确不错，想不到易表还能做出这些有意思的东东。
易表在处理图片存在一些欠缺，比如闪动很大，加上多窗口切换更觉得眼花缭乱，刚才有个想法不知妥否。
删除解释表所有列的刷新公式。
删除解释表第二个和第三个窗口。
在解释表的表验证公式上设置：CloseWindow()。
增加一个表达式变量，变量名：%a%。公式：ListFor("占卜","图片",2)。(意在解决函数嵌套问题)
增加一个数值型变量，变量名：%col%
占卜表第四个窗口，开牌按钮公式：
EvalFor(GridName,"占卜","Rand(54)") And SortCol("占卜",1) And EvalFor(GridName,"占卜","Row") And SortCol("序列",1)and Do(395)and ClearGrid("解释")and RecalcGrid("解释")and OpenGrid("解释")and OpenWindow(1,(screenwidth - 819)/2,(screenheight-644)/2) And SetVariable("%col%",1) And Eval("SetCellText(Grid,1,[%col%],"""+Substitute([%a%],"|",""") And SetVariable(""%col%"",[%col%]+1) And SetCellText(Grid,1,[%col%],""")+""")")
通过上述设置后，感觉养眼一些，个人意见仅供参考。
-- 发布时间：2006/9/12 19:52:00
--
谢谢！
-- 发布时间：2006/9/13 16:39:00
--
下面引用由czy在 2006/09/12 01:24am 发表的内容：
刚才没事，仔细看了一下东东的大作，的确不错，想不到易表还能做出这些有意思的东东。
易表在处理图片存在一些欠缺，比如闪动很大，加上多窗口切换更觉得眼花缭乱，刚才有个想法不知妥否。
删除解释表所有列的刷 ...
刚才没事，仔细看了一下东东的大作，的确不错，想不到易表还能做出这些有意思的东东。
易表在处理图片存在一些欠缺，比如闪动很大，加上多窗口切换更觉得眼花缭乱，刚才有个想法不知妥否。
删除解释表所有列的刷 ...
谢谢老师指教，窗口切换意在实现动画功能，不过确实不雅闪的利害，我现在出差在外，回去按照老师的方法修改修改！！
谢谢，czy老师！！
呵呵！
-- 发布时间：2006/9/15 16:22:00
--
czy老师真是高明，学生佩服，学习学习，现在把老师改过的文件传上来大家分享！管理员密码：888
RAR文件下载