一个会使vb自己卡死的程序

CRT初吻者发布于 2012-01-22 19:46， 1129 次点击

代码如下
Private Sub Form_load()
n = 1
h = 1
Do While n = 1
For j = 1 To 1000000
h = j + h
Next j
Loop
Print h
End Sub
详情点http://user.qzone.

11 回复

Artless2012-01-23 00:58

卡
不死

CRT初吻者2012-01-23 13:27

可以的，两个该程序就会使双核cpu达到100%

风吹过b2012-01-29 08:33

直接就是死循环，卡，不死，
按 CTRL+BREAK 中断执行，
如果你编译成 EXE，那就卡死吧。

apple00720112012-01-29 09:03

死循环啊

幽鬼2012-03-06 19:37

有问题

幽鬼2012-03-06 19:38

有问题

Artless2012-03-06 23:59

以下是引用幽鬼在2012-3-6 19:37:25的发言：

有问题

以下是引用幽鬼在2012-3-6 19:38:13的发言：

有问题

这样重复发贴会被警告请注意

liangge20122012-03-10 19:48

死循环

#10

pingguolx2012-03-10 23:12

！！！

#11

szcjh2012-03-16 18:50

在循环体内加入DoEvents即可

#12

liangge20122012-03-21 17:06

回复 10楼 pingguolx

~~~~~~~