关于怎么让编辑框的问题上下循环动起来！

八度豪哥 · 发表于 2012-3-7 23:06:02

关于这里面的文字。。怎么让它动啊上下的动。不停的循环

高手可以写个例子给我吗！以下的这些

石家庄的fqcq*,您的高级VIP会员用户已开通！使用状态
山东的DQF*,您的高级VIP会员用户已开通！使用状态
新加坡的WFG6*,您的高级VIP会员用户已开通！使用状态
成都的QFFQ*您的高级VIP会员用户已开通！使用状态
成都的fqxa*,您的高级VIP会员用户已开通！使用状态
大同的mqq*,您的高级VIP会员用户已开通！使用状态
韶关的QFFQ*,您的高级VIP会员用户已开通！使用状态
郴州的FG6*Q,您的高级VIP会员用户已开通！使用状态
徐汇的6qd1*,您的高级VIP会员用户已开通！使用状态
广州的5qve*,您的高级VIP会员用户已开通！使用状态
顺义的QZFQ*,您的高级VIP会员用户已开通！使用状态
广饶的QF6*6,您的高级VIP会员用户已开通！使用状态

哓哓 · 发表于 2012-3-7 23:06:03

xuanxuan 发表于 2012-3-8 14:35
帮我看看修改成这段文本上下一直循环啊！

没时间了弄了一半就这个思路希望对你有帮助

aaaaaaa.rar (1.77 KB, 下载次数: 29)

哓哓 · 发表于 2012-3-8 09:45:03

000.rar (1.54 KB, 下载次数: 24)

八度豪哥 · 发表于 2012-3-8 13:50:28

哓哓发表于 2012-3-8 09:45
亲如果可以记得好评哦

可是怎么运行不起来哦！能写清楚点吗哦

哓哓 · 发表于 2012-3-8 13:57:50

xuanxuan 发表于 2012-3-8 13:50
可是怎么运行不起来哦！能写清楚点吗哦

.版本 2
.支持库 iext2

.程序集窗口程序集1

.子程序 _时钟1_周期事件

.如果 (到数值 (编辑框1.内容) ＜到数值 (编辑框2.内容) － 3)
超级编辑框1.滚动 (到数值 (编辑框1.内容))
编辑框1.内容＝到文本 (到数值 (编辑框1.内容) ＋ 1)
.否则
超级编辑框1.内容＝到文本 (读入文件 (“D:\1.txt”))
编辑框1.内容＝ “0”
_时钟1_周期事件 ()
.如果结束

.子程序 __启动窗口_创建完毕

写到文件 (“D:\1.txt”, 到字节集 (超级编辑框1.内容))
时钟1.时钟周期＝ 500
编辑框2.内容＝到文本 (超级编辑框1.取行数 ())

八度豪哥 · 发表于 2012-3-8 14:09:32

哓哓发表于 2012-3-8 13:57
.版本 2
.支持库 iext2

是想让它在选择夹里子夹动起来啊！亲你这个代码我试过了。我运行不了！我用纵向滚动条动起来又不顺

哓哓 · 发表于 2012-3-8 14:13:28

xuanxuan 发表于 2012-3-8 14:09
是想让它在选择夹里子夹动起来啊！亲你这个代码我试过了。我运行不了！我用纵向滚动条动起来又不顺 ...

晕怎么又编程选择夹了上源码吧

八度豪哥 · 发表于 2012-3-8 14:35:52

哓哓发表于 2012-3-8 14:13
晕怎么又编程选择夹了上源码吧

我这样做到但是不行.rar (1.63 KB, 下载次数: 19)

wwh944116 · 发表于 2012-3-8 23:19:08

.版本 2

.子程序 _按钮1_被单击
.局部变量文件号1, 整数型
.局部变量一行数据, 文本型

文件号1 ＝打开文件 (取运行目录 () ＋ “/1.txt”, , )
.如果真 (文件号1 ≠ 0)
移到文件首 (文件号1)
列表框1.清空 ()
.判断循环首 (是否在文件尾 (文件号1, 真) ＝假)
一行数据＝读入一行 (文件号1)
列表框1.加入项目 (一行数据, )
.判断循环尾 ()

.如果真结束

关闭文件 (文件号1)
I ＝ 1
行数＝列表框1.取项目数 ()
.计次循环首 (行数, I)
列表框内容BUF [I] ＝列表框1.取项目文本 (I － 1)
.计次循环尾 ()
I ＝ 1

.子程序 _按钮2_被单击

时钟2.时钟周期＝ 500

.子程序 _时钟2_周期事件
.局部变量 j, 整数型

j ＝ 1
.计次循环首 (行数－ 1, j)
列表框1.置项目文本 (j － 1, 列表框内容BUF [j ＋ 1])
.计次循环尾 ()
列表框1.置项目文本 (行数－ 1, 列表框内容BUF [1])
I ＝ 1
.计次循环首 (行数, I)
列表框内容BUF [I] ＝列表框1.取项目文本 (I － 1)
.计次循环尾 ()

＝＝＝＝＝＝＝＝＝＝＝＝
OK了。好久没折腾还有点乱套了。
我说一下思路。
如果用编辑框的话可能是不太好处理的。也可能是我自己更喜欢用列表框。所以干脆改成了用列表框。然后把你的那些内容放到一个文本中。每一行就是一行数据。
读入文本分行放入列表框，然后再用一个计次循环把它读入一个数组中。然后再不停的把数组重写到列表框中，完了就再把数组改变一下，再写，这样看起来就滚动了。

wwh944116 · 发表于 2012-3-8 23:23:44

忘了放上源码。就是在你原来上面的小改一下。
另外，因为是读入一个文本，所以只能做成RAR了。

滚动.rar (2.12 KB, 下载次数: 8)

		自动登录	找回密码
密码			注册

[已解决] 关于怎么让编辑框的问题上下循环动起来！

最佳答案

评分