# Re: 请问怎样写才可以由一数到n?

Posted by AnyWhere on August 13, 1999 at 17:50:37:

In Reply to: 请问怎样写才可以由一数到n? posted by Steven Sin on August 13, 1999 at 17:16:07:

: 为甚么这样写不行呢? 应怎样写?
: Private Sub Form_Load()
: a = 0
: Label1.Caption = a
: End Sub

: Private Sub Timer1_Timer()
: a = a + 1
: Label1.Caption = a
: End Sub
: ----------------------
: Timer1---Interval=1000
先在宣告处,写下这二行即可
option explicit '1
dim a '2
1.指明要精确定义
2.变数要宣告在最外层

------------------------------------------

原本的情况是,Sub Timer1_Timer()里的变数a,
与Private Sub Form_Load()的a ,并没有关连.

当VB在Sub Timer1_Timer()之中,遇到了a,由于之
前并无宣告有a的存在,VB就会为a,自行宣告一个.
假始用了option explicit , 则VB就不会自行宣告了,
而是会出现错误讯息..这样做的好处是,程式的除
错会比较容易,否则变数名称打错时,会抓不出BUG在
里儿..

而且若a在副程式里才宣告的话,离开了该副程式时,
a值就乱掉了,就没有a=a+1的效果
出来..

如果宣告在外层,变数a,就只有一个,而且,离开副程式
之后,原值也不会乱掉. 另外又加了option explicit ,
VB找不到变数,就会提示我们了..

Follow Ups: