VB.Net中實現VB6中的App.hInstance

-----------當時的原文↓↓-----------------------------------------------------------------------------------------------------------

VB.Net中實現VB6中的App.hInstance

查了半天，終於找到了一個可用的方法，.Net真是麻煩啊。

先
Imports System.Runtime.InteropServices

然後定義
Dim hInstance as IntPtr

再定義
Dim mdl() As System.Reflection.Module = System.Reflection.Assembly.GetExecutingAssembly.GetModules

最後
hInstance=Marshal.GetHINSTANCE(mdl(0))

如果要傳API的話，還得把IntPtr轉Int32
Dim hInstance32 as Int32 =hIsntance.ToInt32

這段時間搞.Net，感觸真多啊，感覺M$為了做跨平台，把.Net搞的太脫離Win32了，結果現在跨平台沒有進展多少，Win32編程倒是麻煩了不少。不爽啊。  

---------------當時的原文↑↑------------------------------------------------------------------------------------------------------

現在.Net用得多了，回頭來看還是感到比較汗。發現當時對Win32編程的理解也還不夠，現在看來.Net有些很麻煩的地方其實還是有道理的。

其實拋開M$那一套，.Net還是不錯的。