瞎貓撞著死耗子1: 沒new的模組層級物件變數和必須CALL的單參數過程

Technorati 標籤: 模組層級物件變數,單參數過程,call,new,VBA

今天莫名其妙調通兩個地方。

第一個是關於物件變數。模組層級物件變數聲明的時候沒new，在form open裡new。過程出來之後，這個物件變數竟然不存在了。不應該呀，既然我聲明了它是模組層級，它就應該始終存在，雖然我是在過程之中申請的記憶體，可它已經被模組層級變數引用了，怎麼能過程一結束自己就放學了呢？沒整明白。只好改成在聲明裡new。

Private mobjATree1 As New annaTree 'TreeView6

第二個是關於過程的調用。有2個及以上參數的過程的調用是一定要用call的，而只有一個參數的過程的調用其實可以不用call。可是今天我調用對象的只有一個參數的方法，不用call揍不行。報的錯是：runtime error 438: 對象不支援該屬性或方法。VBA的報錯機制真是太鬱悶了，你若是按它的指示去猜測出錯的地方，准得吐血。我之所以沒吐血，是因為之前喝了點小酒，壓住了點。我查了對象的方法聲明、查了傳給這個方法的對象參數的聲明、添加了監視，都沒問題。把方法的內文全部注釋掉，也不成……饒是俺暈乎乎不知哪跟竅開了，加了個call，就成了。%￥&×*$%&*$%^&*

Call mobjATree2.CopyNodeFromOtherTree(mobjATree1)