如何強制Visual Basic 2008函數僅通過事件訪問？

Question

我希望某些事件處理函數只能通過引發的事件訪問，而不能從程序中調用。

如：

Public Event Event1(Byval TheText as string) 
private sub Event1Handler(Byval TheText as string) handles me.Event1 
    msgbox("Hi") 
end sub 

我想這段代碼執行功能：RaiseEvent Event1("Hi")

但我不希望這樣的代碼來執行功能：Event1Handler("Hi")

是否有聲明或者一些其他方式來實現這一目標？

Answer 1

右鍵單擊該功能，然後單擊「查找所有參考」。定期執行此操作以確保沒有直接引用它

Answer 2

除了將此邏輯嵌入lambda expression之外，沒有別的辦法。