VB.net 2010 視頻教程 VB.net 2010 視頻教程 VB.net 2010 視頻教程
SQL Server 2008 視頻教程 c#入門經典教程 Visual Basic從門到精通視頻教程
  • 【Access教程】 VBA變量聲明中Static關鍵字妙用

  • 2017-04-12 00:10 來源:未知

魔兽世界wow www.geyjm.icu 正 文:

我們在寫VBA程序的時候都需對變量進行聲明,這是因為ACCESS的默認模式是“顯式聲明”,也就是在新增的??樽釙懊婕由?ldquo;Option Explicit”,這一行,也就是要求在使用變量前一定要先聲明,如果你不進行事先聲明,則執行時會出現編譯錯誤。 
     當然我們也可以刪除“Option Explicit”,也就是允許變量不必經過聲明就可以直接在程序使用。我們把這叫“隱式聲明”,這種方式使用時非常方便,但是因為不知何處會突然冒出新的變量,對日后的程序查錯及維護會產生不少困擾.因此我們還是養成"聲明變量"的好習慣。 
     我們在聲明變量的時候必須用到關鍵字,如“Dim”、“Private”、“Public”,使用“Dim”關鍵字就是“Private”,兩 個關鍵字聲明的變量,稱之為局部變量,表示變量只能在同一??檳謔褂沒蚴巧韉哪?檳謔褂?,“Public”的關鍵字聲明的 變量,稱之為全局變量,則表示變量在整個VBA工程(或是數據庫)中都可以使用。 

     以上所說的這些變量聲明是我們常用的,下面我所要說的是聲明變量“Static”關鍵字。我們把用“Static”關鍵字聲明的變量稱之為靜態變量,之所以稱為靜態變量,是因為其值不會因為程序的結束而消失,即會一直保留其變量,直到程序完全結束后才會消失。

例程試驗一:如果用“Dim”聲明變量,無論此過程執行多少次,你會發現“mCounter”變量值不會發生變化。

 

Sub Counter() 
    Dim mCounter as integer 
    mCounter= mCounter+1 
    Msgbox  mCounter 
End sub 
例程試驗二:當我們用“Static”關鍵字時,“mCounter”變量值會隨著程序執行次數進行累加。

 

 

Sub Counter() 
    Static mCounter as integer 
    mCounter= mCounter+1 
    Msgbox  mCounter 
End sub 
利用“Static”關鍵字聲明變量的這一特性,我們可以用來實現對數據庫系統登陸次數限制,如三次登陸錯誤則退出系統。 

例程如下:

 

 

Static intCounter as integer 
If  txtPass <> “密碼” then 
    intCounter =intCounter+1 
Else 
    DoCmd.OpenForm “主窗體” 
End if 

If  intCounter > 3  then 
    Msgbox "你已三次輸錯密碼,系統將退出!" 
    DoCmd.Quit 
End if  
轉自://accesshome.5d6d.net/thread-3186-1-1.html

 

 
相關教程