∩▂∩深水鱼的V日记=^_^= （第六集20130204）

寂寞深水鱼

hwc2ycy 发表于 2013-1-5 07:51

{:271:}烟花 你这样会死循环的。。不好不好。。

寂寞深水鱼

JLxiangwei 发表于 2013-1-4 19:16
好东西阿，加油，继续关注中

{:011:}人韦可可 教我V吧。。

hwc2ycy

寂寞深水鱼 发表于 2013-1-5 21:13
烟花 你这样会死循环的。。不好不好。。

我用的IF，不会死循环的。
要用循环的话，得这样。

1. Sub 深水鱼的学习()
   
2. Dim 深水鱼的学习进度 As Byte
   
3.     Do While 深水鱼的学习进度 < 80
   
4.         深水鱼的学习进度 = 深水鱼的学习进度 + 1
   
5.         Debug.Print " 深水鱼要学习 第 " & 深水鱼的学习进度 & " 课了"
   
6.     Loop
   
7. End Sub

复制代码

寂寞深水鱼

hwc2ycy 发表于 2013-1-5 22:03
我用的IF，不会死循环的。
要用循环的话，得这样。

{:281:}高人额。。。。今天请假。。。。我准备睡觉了。。{:091:}眼皮子在打架。。

寂寞深水鱼

因掌握不佳，内容从简，专业版请查看烟花第四集学习心得：）

hwc2ycy

寂寞深水鱼 发表于 2013-1-7 22:56
因掌握不佳，内容从简，专业版请查看烟花第四集学习心得：）

亲，Smart Indent。

寂寞深水鱼

hwc2ycy

今日已阅，

寂寞深水鱼

youfang

勘误：发现一处小错误，为防学V新手有疑，特指出，高手请飘过。见16楼，如上图片，正确代码应为：
Range("a3") = IIf(Range("a1") <= 0, "负数或零", "正数")