如何正確理解VB.NET函數(shù)調(diào)用

1. Shared Function System.Runtime.

成都創(chuàng)新互聯(lián)成立于2013年，我們提供高端成都網(wǎng)站建設(shè)、網(wǎng)站制作公司、網(wǎng)站設(shè)計(jì)、網(wǎng)站定制、營(yíng)銷型網(wǎng)站建設(shè)、成都小程序開(kāi)發(fā)、微信公眾號(hào)開(kāi)發(fā)、成都網(wǎng)站營(yíng)銷服務(wù)，提供專業(yè)營(yíng)銷思路、內(nèi)容策劃、視覺(jué)設(shè)計(jì)、程序開(kāi)發(fā)來(lái)完成項(xiàng)目落地，為辦公窗簾企業(yè)提供源源不斷的流量和訂單咨詢。

InteropServices.DLLimport("user32.dll")

2. MessageBoxA(ByVal hwnd As Integer,

ByVal text As String, ByVal

lpcaption As String, ByVal

wtype As Integer) As Integer

3. End Function

首先integer被作為32位數(shù)據(jù)替代了long(long是64位)

System是Net語(yǔ)言中的一個(gè)族，System.Runtime.InteropServices是system中的一個(gè)類。System.Runtime.InteropServices.DLLimpor是其中的一個(gè)方法。調(diào)用DLL的API

接口，這個(gè)的意思就是vb6的lib"user32", share是共享的意思，例如：

1. Public Class classA

2. Shared Function System.Runtime.

InteropServices.DLLimport("user32.dll")

MessageBoxA(ByVal h As Integer,

ByVal m As String, ByVal c As

String, ByVal type As Integer) As Integer

3. End Function

4. End Class

你可以這樣調(diào)用 classA.MessageboxA 但是如果沒(méi)有這個(gè)share 在class后打點(diǎn)就沒(méi)有MessageboxA的成員出現(xiàn)了 ，現(xiàn)在你就象以前一樣的使用他吧。

其實(shí)上面這個(gè)VB.NET函數(shù)調(diào)用方法并不正確，我們?nèi)耘f要使用API聲明，只是換了一各形式

如果你認(rèn)為這就是VB.NET就錯(cuò)了，看看這個(gè)：

system.WinForms.MessageBox.Show("對(duì)話內(nèi)容寫(xiě)在這里", "標(biāo)題寫(xiě)在這里", messagebox.OK BitOr messagebox.IconAsterisk)

這就是面向?qū)ο?，你已?jīng)完成了所有的任務(wù)。不需要任何的API聲明。不需要寫(xiě)多余的代碼。

1. messagebox.IconAsterisk=驚嘆號(hào)圖標(biāo)

2. messagebox.IconError=錯(cuò)誤圖標(biāo)

3. messagebox.IconExclamation=警告圖標(biāo)

4. messagebox.IconHand=錯(cuò)誤圖標(biāo)

5. messagebox.IconInformation=提示圖標(biāo)

所經(jīng)點(diǎn)NET就是打點(diǎn)到達(dá)，在族后面打點(diǎn)，在類后面打點(diǎn)，在對(duì)象后面打點(diǎn)。第二個(gè)問(wèn)題就是類與類之間相互的關(guān)系，Net在網(wǎng)上處理人與人的關(guān)系，在程序語(yǔ)言中處理類與類的關(guān)系。倒底是加不加share,倒底是類后面打點(diǎn),還是Dim成一個(gè)對(duì)象（把他當(dāng)一個(gè)變量吧）再說(shuō)，是等于class,還是New class.是dim xxx as class=new class 還是dim xxx as new class

就是這樣VB.NET函數(shù)調(diào)用將更簡(jiǎn)單，不須要研究一些很難的東西。

簡(jiǎn)述vb.net過(guò)程的嵌套調(diào)用和遞歸調(diào)用

嵌套是指一個(gè)過(guò)程調(diào)用另一個(gè)過(guò)程的使用,遞歸過(guò)程是這個(gè)過(guò)程中調(diào)用本過(guò)程的使用。遞歸是嵌套的一種特殊形式，遞歸過(guò)程必須有“歸點(diǎn)”，也就是終止調(diào)用本身的一個(gè)分支

vb.net 如何嵌入地圖

新建一個(gè)文件,寫(xiě)入下面的代碼:

!doctype?html

html

head

meta?name="viewport"?content="initial-scale=1.0,?user-scalable=no"?/

meta?http-equiv="Content-Type"?content="text/html;?charset=gbk"?/

titleBaidu?Map?V1.2/title

script?type="text/javascript"?src=";services=true"

!--?add?baidu?map?api?--

/script

/head

body

div?id="container"?style="width:?600px;?height:?400px;"

/div

/body

/html

script?type="text/javascript"

var?map?=?new?BMap.Map("container");???????????? ????//?new?Map

var?point?=?new?BMap.Point(116.397128,?39.916527);??????//?Location,?（經(jīng)度,?緯度）

map.centerAndZoom(point,?15);??????????????????? ????//?show?Map

//?添加縮放功能

map.enableScrollWheelZoom();

map.enableKeyboard();

/script

保存到程序exe同一目錄下,文件名:map.html

然后BUTTON點(diǎn)擊事件:

WebBrowser1.Navigate(Application.StartupPath??"\map.html")

這樣就可以了

ps:經(jīng)緯度可以到百度地圖官網(wǎng)去獲取

或者到: ?去生成代碼

VB.NET想要調(diào)用兼容的軟件如何調(diào)用

程序的兼容模式設(shè)置保存在注冊(cè)表下。

在 HKEY_CURRENT_USER/Software/Microsoft/Windows NT/CurrentVersion/AppCompatFlags/Layers/ 下新建一個(gè)鍵值，鍵值名稱是可執(zhí)行程序文件的完全路徑，數(shù)據(jù)類型為reg_sz，數(shù)據(jù)數(shù)值為兼容的操作系統(tǒng)代碼。

代碼對(duì)照如下：

Windows NT 4.0 (Service Pack 5)：NT4SP5

windows 95：WIN95

windows 98 or windows ME：WIN98

windows 2000：WIN2000

windows xp：WINXP

windows 2003：WIN2003

比如你要以WinXP的兼容模式運(yùn)行 C:\1.exe，那么就是

HKEY_CURRENT_USER/Software/Microsoft/Windows NT/CurrentVersion/AppCompatFlags/Layers 在這下面新建一個(gè)鍵，名為"C:\starcraft.exe”，再在這個(gè)鍵下面創(chuàng)建一個(gè)reg_sz類型的數(shù)據(jù)，數(shù)據(jù)值為WINXP即可。

用VB.NET操作注冊(cè)表這個(gè)你可以百度到很多了。

VB.NET怎么調(diào)用其它模塊的過(guò)程？

調(diào)用過(guò)程，調(diào)用過(guò)程有諸多技巧，它們與過(guò)程的類型、位置以及在應(yīng)用程序中的使用方式有關(guān)。下面說(shuō)明如何調(diào)用 Sub 過(guò)程和 Function 過(guò)程。

調(diào)用 Sub 過(guò)程

與 Sub 過(guò)程不同，在表達(dá)式中，Sub 過(guò)程不能用其名字調(diào)用。調(diào)用 Sub 過(guò)程的是一個(gè)獨(dú)立的語(yǔ)句。Sub 過(guò)程還有一點(diǎn)與函數(shù)不一樣，它不會(huì)用名字返回一個(gè)值。但是，與 Function過(guò)程一樣，Sub 過(guò)程也可以修改傳遞給它們的任何變量的值。

調(diào)用 Sub 過(guò)程有兩種方法：

'以下兩個(gè)語(yǔ)句都調(diào)用了名為 MyProc 的 Sub 過(guò)程。

Call MyProc (FirstArgument, SecondArgument)

MyProc FirstArgument, SecondArgument

注意，當(dāng)使用 Call 語(yǔ)法時(shí)，參數(shù)必須在括號(hào)內(nèi)。若省略 Call 關(guān)鍵字，則也必須省略參數(shù)兩邊的括號(hào)

調(diào)用函數(shù)過(guò)程

通常，調(diào)用自行編寫(xiě)的函數(shù)過(guò)程的方法和調(diào)用 Visual Basic 內(nèi)部函數(shù)過(guò)程（例如 Abs）的方法一樣；即在表達(dá)式中寫(xiě)上它的名字。

'下面的語(yǔ)句都調(diào)用函數(shù) ToDec。

Print 10 * ToDec

X = ToDec

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

X = AnotherFunction ( 10 * ToDec)

就像調(diào)用 Sub 過(guò)程那樣，也能調(diào)用函數(shù)。下面的語(yǔ)句都調(diào)用同一個(gè)函數(shù)：

Call Year (Now)

Year Now

當(dāng)用這種方法調(diào)用函數(shù)時(shí)，Visual Basic 放棄返回值。

調(diào)用其它模塊中的過(guò)程

在工程中的任何地方都能調(diào)用其它模塊中的公用過(guò)程?？赡苄枰付ㄟ@樣的模塊，它包含正在調(diào)用的過(guò)程。調(diào)用其它模塊中的過(guò)程的各種技巧，取決于該過(guò)程是在窗體模塊中、類模塊中還是標(biāo)準(zhǔn)模塊中。

窗體中的過(guò)程

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

Call Form1.SomeSub(arguments)

類模塊中的過(guò)程

與窗體中調(diào)用過(guò)程類似，在類模塊中調(diào)用過(guò)程要調(diào)用與過(guò)程一致并且指向類實(shí)例的變量。例如，DemoClass 是類 Class1 的實(shí)例：

Dim DemoClass as New Class1

DemoClass.SomeSub

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

標(biāo)準(zhǔn)模塊中的過(guò)程

如果過(guò)程名是唯一的，則不必在調(diào)用時(shí)加模塊名。無(wú)論是在模塊內(nèi)，還是在模塊外調(diào)用，結(jié)果總會(huì)引用這個(gè)唯一過(guò)程。如果過(guò)程僅出現(xiàn)在一個(gè)地方，這個(gè)過(guò)程就是唯一的。

如果兩個(gè)以上的模塊都包含同名的過(guò)程，那就有必要用模塊名來(lái)限定了。在同一模塊內(nèi)調(diào)用一個(gè)公共過(guò)程就會(huì)運(yùn)行該模塊內(nèi)的過(guò)程。例如，對(duì)于 Module1 和 Module2 中名為 CommonName 的過(guò)程，從 Module2 中調(diào)用 CommonName 則運(yùn)行 Module2 中的 CommonName 過(guò)程，而不是 Module1 中的 CommonName 過(guò)程。

從其它模塊調(diào)用公共過(guò)程名時(shí)必須指定那個(gè)模塊。例如，若在 Module1 中調(diào)用 Module2 中的 CommonName 過(guò)程，要用下面的語(yǔ)句：

Module2.CommonName (arguments)

Public ? 用于聲明對(duì)所有模塊中的所有其它過(guò)程都可以使用的過(guò)程。?

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