传说奇迹(csqj.net)- 怀旧公益奇迹私服-今日新开 千人火爆在线 musf 一切靠努力

标题: 我写了个简单多线程的测试脚本 [打印本页]

---

作者: yingfeng61    时间: 2011-8-28 20:29
标题: 我写了个简单多线程的测试脚本
Dimenv e  
id1 = BeginThread(aaa)  
For 100
        TracePrint i
        i = i + 1
        Delay 1000
        If i = 5 Then
                EndScript
        End If         
Next
Sub onscriptexit()
        MsgBox "exit啦"
        id2 = BeginThread(bbb)
End Sub
Sub aaa()
        Dim i
        For i=0 to 5
                MsgBox i
                If i=3 then exitScript  
        Next
        
End Sub
Sub bbb()
        Do
                MsgBox e
                e= e+1
                If e = 10 Then        ExitScript
        Loop
End Sub


很简单的vbs代码，大家可以看看vbs的基础，1小时就搞定，大家可以把代码粘贴到按键精灵中执行下
回头把注释给大家补全

---

作者: 传说精灵    时间: 2011-8-28 20:39
标题: 回复 1# yingfeng61 的帖子
太厉害了，我们传说真的是卧虎藏龙呀。 :-D

---

作者: 绝对牛叉    时间: 2011-8-28 21:30
精灵看到高手了吧~~混论坛的本来就是无聊的，可能有点依赖了，也不容易的

---

作者: yingfeng61    时间: 2011-8-28 21:35
标题: 回复 3# 绝对牛叉 的帖子
高手屁，我说了等我忙完这段时间，肯定帮论坛做公益性能测试

---

作者: 33149    时间: 2011-8-28 21:59
楼主也别生气，游戏是慢慢玩才有乐趣。

---

作者: 63333798    时间: 2011-8-28 23:10
呵呵！

---

作者: 兽兽    时间: 2011-8-28 23:53
MsgBox "我的妈呀，好厉害！"

---

作者: 长歌    时间: 2011-8-29 07:53
高山仰止.....

---

作者: ieann    时间: 2011-8-29 10:35
游戏专家,
这个是怎么用的,有什么作用?

---

作者: kounijiba1    时间: 2011-8-29 11:57
不懂啊

---

作者: 绝对牛叉    时间: 2011-8-30 23:55
很多人不懂，所以才觉得楼主厉害啊

---

作者: liuyuantz    时间: 2011-8-31 11:20
没看懂，厉害厉害！

---

作者: dubai71    时间: 2011-8-31 19:52
这个多线程是没用的，鉴定完毕

---

作者: yingfeng61    时间: 2011-9-3 21:26
标题: 回复 13# dubai71 的帖子
问你个最简单的问题，你知道什么是多线程吗？什么是进程，什么是线程

---

作者: ohayu123    时间: 2011-9-5 18:05
说的不错。。

---

欢迎光临 传说奇迹(csqj.net)- 怀旧公益奇迹私服-今日新开 千人火爆在线 musf 一切靠努力 (http://bbs.csqj.net/)

Powered by Discuz! X3.2