了解对象的类型
如果你想知道一个对象是否是特殊的类型,请编写下面的代码:
If TypeOf obj Is ListItem Then ...
如果想得到对象类型的名字,使用:
MsgBox "The item is a " & TypeName(obj)
控制长时间的循环
当程序陷入一个很长时间的循环中时,你就不可能点击任何一个命令按钮或者按键。这样对于用户来说,就很不好控制。或许用户不想再执行循环,通过点击Cancel按钮退出呢?怎么解决这个问题?答案是:使用DoEvents命令!就是说,在循环的开始执行DoEvents命令,就象下面的代码一样:
Dim i As Long For i = 1 To 1000000DoEvents... Next i
实际上,DoEvents命令并不需要放置在第1行,将它放在循环中的任何地方都可以。这样做后,程序的其他部分,比如一个结束循环的命令按钮,就又机会接受点击事件了。
使长循环运行更快
我发现,一般情况下,使用...[ 查看全文 ]