vb.net 如何調用另一個類文件中的方法？

如果是public，直接對象.成員，private可以寫個成員函數返回這個成員，友元也行。

創新互聯主營蕉城網站建設的網絡公司,主營網站建設方案,成都APP應用開發,蕉城h5成都小程序開發搭建,蕉城網站營銷推廣歡迎蕉城等地區企業咨詢

比如：

class A

{

public:

int get(){return a;}

private:

int a;

}

VB.NET的API調用

現在我用我所知道的為樓主介紹VB.NET的API調用，請樓主瀏覽一下，看看行不行。

Windows API就是Windows系統的API函數簡稱（Application Program Interface，即：應用程序接口函數），它是Windows操作系統提供給各種開發基于Windows平臺應用軟件的開發語言的一些公用的函數，這些函數一般都比較底層，所以當各種開發語言使用自帶的函數或類庫已無法解決問題時，調用Windows API函數往往是一種非常直接、有效的解決方法。但由于在程序中調用Windows API函數一般都很復雜，所以對于程序員來說，是否能夠靈活的使用Windows API函數，往往也是其水平高低的一個重要標志。但自從微軟推出.Net框架以后，各種開發基于.Net平臺下的程序語言，如Visual Basic .Net、Visual C＃等卻很少使用Windows API函數，并且微軟公司也不像以前那樣，提倡在這些.Net開發語言中使用Windows API函數，其主要的原因如下：

1. .Net框架所附帶的類庫.Net FrameWork SDK是一個內容豐富、功能強大的軟件開發包，各種Windows API函數所實現的各種功能幾乎都可以在這個軟件開發包中找到與之對應的部分。

2. 微軟Visual Basic .Net、Visual C＃等目的是編寫跨平臺的應用程序，如果在Visual Basic .Net、Visual C＃等中使用Windows API函數，這也就注定了編寫出的程序只能運行于Windows平臺之下，而弱化了.NET的跨平臺能力。這也就是為什么微軟不提倡在.Net平臺調用Windows API函數的原因。

雖然微軟并不提倡在Visual Basic .Net、Visual C＃中調用Windows API函數，但由于目前.Net 框架推出時間較短，.Net FrameWork SDK中提供的類庫還并不足以完全替換Windows API函數的所有功能，所以在某些時候，.Net開發語言還是必須要調用Windows API函數。

一.平臺調用、托管DLL、非托管DLL簡介：

托管DLL就是能夠在公共語言運行庫（Common Language Runtime，簡稱CLR）中能夠直接引用的，并且擴展名為“DLL”的文件。具體所指就是封裝各種命名空間所在的DLL文件，如System.dll等。非托管DLL就是平常所的動態鏈接庫等，其中就包括了封裝所有Windows API函數的DLL文件。各種非托管DLL中的函數在公共語言運行庫中不能直接被調用，而需要經過.Net框架提供的“平臺調用”服務后才可以。

“平臺調用”是.Net框架為Visual Basic .Net、Visual C＃等.Net開發語言提供的一種服務，用以在托管代碼中引入各種非托管DLL中封裝的函數（其中包括Windows API函數）。“平臺調用”依賴于元數據在運行時查找導出函數并封裝其參數。圖01公共語言運行庫利用“平臺服務”調用非托管DLL中的函數的流程圖：

圖01：“平臺服務”的調用非托管函數的流程圖

在托管代碼中使用“平臺調用”服務調用非托管DLL中封裝的函數時，“平臺服務”將依次執行以下操作：

1． 查找包含該函數所在的DLL文件。

2． 如果找到，則將該DLL文件 加載到內存中。

3． 查找函數在內存中的地址并將其參數推到堆棧上，并封送所需的數據。

4． 將控制權轉移給非托管函數。 這樣整個函數調用完成。

在Visual Basic .Net中使用“平臺調用”服務，申明Windows API函數主要有二種具體的實現方法：

1． 使用DllImport特征類來申明Windows API函數。

2． 使用“Declare”語句來申明Windows API函數。

這二種方法雖有異曲同工之效，但在繁簡上卻有很大差異，第一種方法申明過程比較復雜，很容易在申明Windows API函數時出錯，所以并不提倡。而第二種方法相對簡單，并且又保存了以前Visual Basic中的很多語法，所以在平常時大都使用這種方法來申明Windows API函數。

二．VB.Net查看文件中圖標的函數及申明Windows API的方法：

Visual Basic .Net要實現查看文件中的圖標，目前只使用.Net FrameWork SDK是無法實現這種功能的，正如前面所說，主要是由于.Net FrameWork SDK推出的時間較短，其功能還不可能面面俱到。解決問題的關鍵是正確使用Windows API函數，其中所涉及到的Windows API函數主要有二個：其一是獲得指定文件中的圖標數目；其二是從指定文件的指定位置導出圖標的Windows句柄。這二個函數都位于“Shell32.dll”文件中，并且函數的入口點都為“ExtractIcon”。下面是在Visual Basic .Net中分別使用DllImport特征類和“Declare”語句申明這二個Windows API函數的具體方法。

（1）.使用DllImport特征類來申明Windows API函數：

下面是在Visual Basic .Net中使用DllImport特征類申明二個Windows API函數的具體示例：

'函數ExtractIcon，其功能是是從指定文件的指定位置導出圖標的Windows句柄。

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" , EntryPoint := "ExtractIcon" ) ＞ _

Public Function _

ExtractIcon ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

End Function

'函數Icon_Num，其功能是獲得指定文件中的圖標數目

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" , EntryPoint := "ExtractIcon" ) ＞ _

Public Function _

Icon_Num ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As Integer ) As Integer

End Function

在使用DllImport特征類申明Windows API函數時，如果申明的函數名稱和函數的入口點相同，則可以在申明Windows API函數時，省略定義函數入口點對應的代碼，即EntryPoint對象字段對應的代碼，這樣聲明ExtractIcon函數的代碼也可以簡化為如下所示：

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" ) ＞ _

Public Function _

ExtractIcon ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

End Function

（2）.使用“Declare”語句來申明Windows API函數：

使用“Declare”語句的確比使用DllImport特征類要簡單了許多，下面是在Visual Basic .Net中使用“Declare”語句來聲明上述二個Windows API函數的具體方法：

Declare Auto Function ExtractIcon Lib "Shell32.dll" Alias "ExtractIcon" ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

'聲明ExtractIcon函數

Declare Auto Function Icon_Num Lib "Shell32.dll" Alias "ExtractIcon" ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As Integer ) As Integer

'聲明Icon_Num函數

在Visual Basic .Net中聲明Windows API函數時，“Declare”語句中Alias關鍵字的作用相當于使用DllImport特征類中的EntryPoint對象字段。同樣在使用“Declare”語句聲明Windows API函數時，如果聲明的函數和函數的入口點相同，也可以省略Alias關鍵字對應的代碼，所以ExtractIcon函數也可以簡化為如下：

Declare Auto Function ExtractIcon Lib "Shell32.dll" ( ByVal src As System.IntPtr , ByVal strFileName As string , ByVal uiIconIndex As UInt32 ) As System.IntPtr

下面就結合一個示例的編寫過程來掌握的這二個Windows API函數的具體使用方法，這個示例的作用就是讀取指定文件中的圖標數目，并顯示文件中的圖標。

三．本文中程序的編寫、調試和運行環境：

（1）.視窗2000高級服務器版。

（2）.Visual Studio .Net 2003企業結構設計版，.Net FrameWork SDK版本號4322。

四．Visual Basic .Net讀取文件中的圖標的實現步驟：

下面介紹的示例，其功能讀取指定文件中包含的圖標數目，并把這些圖標全部顯示出來。下面是這個示例的實現步驟：

1. 啟動Visual Studio .Net。

2. 選擇菜單【文件】|【新建】|【項目】后，彈出【新建項目】對話框。

3. 將【項目類型】設置為【Visual Basic項目】。

4. 將【模板】設置為【Windows應用程序】。

5. 在【名稱】文本框中輸入【Visual Basic .Net查看文件中的圖標】。

6. 在【位置】的文本框中輸入【E:\VS.NET項目】，然后單擊【確定】按鈕，這樣在【E:\VS.NET項目】目錄中就產生了名稱為【Visual Basic .Net查看文件中的圖標】文件夾，里面存放著【Visual Basic .Net查看文件中的圖標】項目的所有文件。具體如圖02所示：

圖02：【Visual Basic .Net查看文件中的圖標】項目的【新建項目】對話框

7. 選擇菜單【項目】|【添加新項】，在彈出的對話框中的【模板】設置為【模塊】，【名稱】文本框設置為【Module1.vb】后。單擊【打開】按鈕，則在項目中增加了一個模板文件，名稱為【Module1.vb】。

8. 把Visual Stuido .Net的當前窗口切換到Module1.vb的代碼編輯窗口，并在其Module1的代碼區中添加下列代碼，下列代碼是用二種方式聲明二個Windows API函數：

＜ System.Runtime.InteropServices.DllImport ( "Shell32.dll" ) ＞ _

Public Function _

ExtractIcon ( ByVal src As System.IntPtr , ByVal strFileName As String , ByVal uiIconIndex As UInt32 ) As System.IntPtr

End Function

'聲明ExtractIcon函數

Declare Auto Function Icon_Num Lib "Shell32.dll" Alias "ExtractIcon" ( ByVal src As System.IntPtr , ByVal strFileName As String , ByVal uiIconIndex As Integer ) As Integer

9. 把Visual Studio .Net的當前窗口切換到Form1窗體的設計查看，并從【工具箱】中的【Windows窗體】選項卡中拖入下列組件到Form1窗體：

四個Label組件，其中二個用以顯示提示信息，另外二個分別用以顯示選擇的文件名稱和這個文件中包含的圖標數目。

一個ListView組件，利用其顯示大圖標的屬性用以顯示選定文件中的圖標。

一個OpenFileDialog組件，用以選擇要查看圖標的文件名稱。

一個ImageList組件，它起的是橋梁的作用，首先把從文件中導出的圖標存放到這里，然后再提供ListView組件顯示出來。

一個Button組件。

10. 按照表01中數值來設定設定組件的主要屬性：

組件類型 組件名稱 屬性 設置結果

Form Form1 Text VB.NET查看文件中的圖標

Form1 MaximizeBox False

Form1 MinimizeBox False

Form1 FormBorderStyle FixedSingle

ListView ListView1 ImageList1 LargeImageList

ListView1 MultiSelect False

ListView1 Size Size ( 380 , 208 )

Button Button1 Text 選擇文件

Button1 FlatStyle Flat

ImageList ImageList1 Size Size ( 32 , 32 )

ImageList1 TransparentColor Color.Transparent

Label Label1 Text 文件名稱：

Label2 Text 圖標數目：

Label3 Text ""

Label4 Text "0"

表01：【Visual Basic .Net查看文件中的圖標】項目窗體中各組件的主要屬性設定數值表

并按照圖02中各組件的位置、大小和排列方式來調整窗體中各個組件：

圖02：【Visual Basic .Net查看文件中的圖標】項目的設計界面

11. 把Visual Studio .Net當前窗口切換到Form.vb的代碼編輯窗口，并用下列代碼替換Form1.vb中的Button1組件的Click事件的處理代碼，下列代碼是在Button1組件的Click事件中處理查看文件中圖標的功能，具體如下：

Private Sub Button1_Click ( ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.Click

If OpenFileDialog1.ShowDialog ( ) = DialogResult.OK Then

'清除組件中的所有項目

ListView1.Items.Clear ( )

ImageList1.Images.Clear ( )

Dim sfName As String = OpenFileDialog1.FileName

Label3.Text = sfName

Dim iIcon_Num As Integer = Icon_Num ( IntPtr.Zero , sfName , -1 )

'顯示文件中的圖標數目

Label4.Text = iIcon_Num.ToString ( )

Dim i As Integer

For i = 0 To iIcon_Num - 1 Step 1

'強制實現int到uint類型轉換

Dim j As UInt32

j = System.Convert.ToUInt32 ( i )

Dim hIcon As System.IntPtr = ExtractIcon ( IntPtr.Zero , sfName , j )

'在imageList1組件中加入當然提取的圖標

ImageList1.Images.Add ( Icon.FromHandle ( hIcon ).ToBitmap ( ) )

'在ListView組件中加入一個項目

ListView1.Items.Add ( "第" + ( i + 1 ).ToString ( ) + "個圖標" )

'把加入項目的圖象索引指向剛才加入圖標在imagList1組件中的索引，從而顯示圖標

ListView1.Items ( i ).ImageIndex = i

Next i

End If

End Sub

12. 至此，在上述步驟都正確執行后，【Visual Basic .Net查看文件中的圖標】項目的全部工作就完成了。單擊快捷鍵F5就可以運行程序，此時單擊【選擇文件】按鈕選擇文件后，程序就能夠讀取這個文件中的圖標及其數目，并顯示出來了。具體如圖03所示：

圖03：【Visual Basic .Net查看文件中的圖標】項目的運行界面

五．總結：

解決Visual Basic .Net查看文件中的圖標的關鍵并非是使用.Net框架中提供的類庫，而是使用Windows的API函數。雖然這與利用Visual Basic .Net開發跨平臺程序的初衷相違背，但的確不失為一種解決問題的方法。有些時候通過Windows API函數能夠快捷、方便的解決實際問題，而這往往是只使用.Net FrameWork SDK所望塵莫及的，但隨著.Net FrameWork SDK內容的不斷豐富，各種新的組成部分和新的功能不斷加入，可以預見的是，在未來的.Net FrameWork SDK中必將擁有可以替換本文中介紹的二個Windows API函數的組成部分。

VB.NET怎么調用其它模塊的過程？

調用過程，調用過程有諸多技巧，它們與過程的類型、位置以及在應用程序中的使用方式有關。下面說明如何調用 Sub 過程和 Function 過程。

調用 Sub 過程

與 Sub 過程不同，在表達式中，Sub 過程不能用其名字調用。調用 Sub 過程的是一個獨立的語句。Sub 過程還有一點與函數不一樣，它不會用名字返回一個值。但是，與 Function過程一樣，Sub 過程也可以修改傳遞給它們的任何變量的值。

調用 Sub 過程有兩種方法：

'以下兩個語句都調用了名為 MyProc 的 Sub 過程。

Call MyProc (FirstArgument, SecondArgument)

MyProc FirstArgument, SecondArgument

注意，當使用 Call 語法時，參數必須在括號內。若省略 Call 關鍵字，則也必須省略參數兩邊的括號

調用函數過程

通常，調用自行編寫的函數過程的方法和調用 Visual Basic 內部函數過程（例如 Abs）的方法一樣；即在表達式中寫上它的名字。

'下面的語句都調用函數 ToDec。

Print 10 * ToDec

X = ToDec

If ToDec = 10 Then Debug.Print "Out of Range"

X = AnotherFunction ( 10 * ToDec)

就像調用 Sub 過程那樣，也能調用函數。下面的語句都調用同一個函數：

Call Year (Now)

Year Now

當用這種方法調用函數時，Visual Basic 放棄返回值。

調用其它模塊中的過程

在工程中的任何地方都能調用其它模塊中的公用過程。可能需要指定這樣的模塊，它包含正在調用的過程。調用其它模塊中的過程的各種技巧，取決于該過程是在窗體模塊中、類模塊中還是標準模塊中。

窗體中的過程

所有窗體模塊的外部調用必須指向包含此過程的窗體模塊。如果在窗體模塊 Form1 包含 SomeSub 過程，則可使用下面的語句調用 Form1 中的過程：

Call Form1.SomeSub(arguments)

類模塊中的過程

與窗體中調用過程類似，在類模塊中調用過程要調用與過程一致并且指向類實例的變量。例如，DemoClass 是類 Class1 的實例：

Dim DemoClass as New Class1

DemoClass.SomeSub

但是不同于窗體的是，在引用一個類的實例時，不能用類名作限定符。必須首先聲明類的實例為對象變量（在這個例子中是 DemoClass ）并用變量名引用它。

標準模塊中的過程

如果過程名是唯一的，則不必在調用時加模塊名。無論是在模塊內，還是在模塊外調用，結果總會引用這個唯一過程。如果過程僅出現在一個地方，這個過程就是唯一的。

如果兩個以上的模塊都包含同名的過程，那就有必要用模塊名來限定了。在同一模塊內調用一個公共過程就會運行該模塊內的過程。例如，對于 Module1 和 Module2 中名為 CommonName 的過程，從 Module2 中調用 CommonName 則運行 Module2 中的 CommonName 過程，而不是 Module1 中的 CommonName 過程。

從其它模塊調用公共過程名時必須指定那個模塊。例如，若在 Module1 中調用 Module2 中的 CommonName 過程，要用下面的語句：

Module2.CommonName (arguments)

Public ? 用于聲明對所有模塊中的所有其它過程都可以使用的過程。?

Private ?用于聲明只能在包含該聲明的模塊中使用的過程。

當前標題：vb.net中的調用欲哭,vb 調用
瀏覽地址：http://vcdvsql.cn/article44/hsoehe.html

成都網站建設公司_創新互聯，為您提供虛擬主機、企業建站、微信小程序、關鍵詞優化、ChatGPT、網站改版

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯