標題: SET 指令 [打印本頁]

---

作者: t8899    時間: 2014-1-5 07:16     標題: SET 指令

本帖最後由 t8899 於 2014-1-5 07:19 編輯

有用過set 指令在程序最後都需要加上
set ?????= nothing 嗎?

另外如果set 指令用在Worksheet_Calculate()
有需要 set ?????= nothing 嗎?

---

作者: GBKEE    時間: 2014-1-5 08:53

回復 1# t8899

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2.     Dim Rng As Range    '這程式裡 Dim  為私用變數, 只有這程式可用的變數.其他程式不可用的變數
   
3.     Set Rng = Target
   
4.      '程式結束,這變數會被系統釋放出來,是不需要 Set Rng = Nothing

複製代碼

1. Dim Rng As Range   '模組頂端的 Dim 宣告為這模組的私用變數,這模組的其他程序可使用
   
2. Private Sub Worksheet_Change(ByVal Target As Range)
   
3.         Set Rng = Target
   
4.        Set Rng = Nothing  '釋放: 如其他程序執行如沒使用到這變數,可擴大記憶體

複製代碼

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)