vb模塊調(diào)用

VB中調(diào)用子程序時參數(shù)不要用括號括起，如

創(chuàng)新互聯(lián)專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù)，包含不限于網(wǎng)站制作、成都網(wǎng)站建設(shè)、博野網(wǎng)絡(luò)推廣、小程序制作、博野網(wǎng)絡(luò)營銷、博野企業(yè)策劃、博野品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運營等，從售前售中售后，我們都將竭誠為您服務(wù)，您的肯定，是我們最大的嘉獎；創(chuàng)新互聯(lián)為所有大學(xué)生創(chuàng)業(yè)者提供博野建站搭建服務(wù)，24小時服務(wù)熱線：18982081108，官方網(wǎng)址：chinadenli.net

mysub

a,

b,

c

而函數(shù)參數(shù)需用括號括起，如

value

=

myfunc

(a,

b,

c)

如果你不需要函數(shù)的返回值，可以當(dāng)作子程序調(diào)用，如

Call

myfunc

(a,

b,

c)

vb.net 連接sql數(shù)據(jù)庫模塊,如何使用？

比如有個asp.net(vb.net)連接sql server 2000數(shù)據(jù)庫的連接模塊(module)：

Module MdlCommon

Public txtSQL As String '存放SQL語句

Public DBSet As DataSet '查詢得到的記錄集

Public ErrorMsg As String '存放錯誤信息

Public Function ExecuteSQL(ByVal strSQL As String, ByRef errMsg As String) As DataSet

Dim cnn As SqlClient.SqlConnection

Dim cmd As New SqlClient.SqlCommand()

Dim adpt As SqlClient.SqlDataAdapter

Dim rst As New DataSet()

Dim SplitSQL() As String

errMsg = ""

Try

SplitSQL = Split(strSQL)

cnn = New SqlClient.SqlConnection("data source=(local);initial catalog=urp;user id=sa;pwd=1234")

If InStr("INSERT,DELETE,UPDATE", UCase$(SplitSQL(0))) Then

cmd.Connection = cnn

cmd.Connection.Open()

cmd.CommandText = strSQL

cmd.ExecuteNonQuery()

Else

adpt = New SqlClient.SqlDataAdapter(strSQL, cnn)

adpt.Fill(rst)

ExecuteSQL = rst

End If

Catch ex As Exception

errMsg = ex.Message

Finally

rst = Nothing

cnn = Nothing

End Try

End Function End Module

調(diào)用時在asp.net后臺寫上txtSQL="SELECT * FROM user";

DBSet=ExecuteSQL(txtSQL,ErrorMsg)就可以查詢db返回結(jié)果了。

在VB中,如何調(diào)用模塊呀?

Dim a as

New Module名

類模塊和標(biāo)準(zhǔn)模塊的不同點在于存儲數(shù)據(jù)方法的不同。標(biāo)準(zhǔn)模塊的數(shù)據(jù)只有一個備份。這意味著標(biāo)準(zhǔn)模塊中一個公共變量的值改變以后，在后面的程序中再讀取該變量時，它將得到同一個值。

而類模塊的數(shù)據(jù)，是相對于類實例（也就是，由類創(chuàng)建的每一對象）而獨立存在的。

同樣的，標(biāo)準(zhǔn)模塊中的數(shù)據(jù)在程序作用域內(nèi)存在，也就是說，它存在于程序的存活期中；而類實例中的數(shù)據(jù)只存在于對象的存活期，它隨對象的創(chuàng)建而創(chuàng)建，隨對象的撤消而消失。

最后，當(dāng)變量在標(biāo)準(zhǔn)模塊中聲明為 Public 時，則它在工程中任何地方都是可見的；而類模塊中的 Public 變量，只有當(dāng)對象變量含有對某一類實例的引用時才能訪問

這個是復(fù)制MSDN上的，希望對你有幫助

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

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

調(diào)用 Sub 過程

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

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

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

Call MyProc (FirstArgument, SecondArgument)

MyProc FirstArgument, SecondArgument

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

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

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

'下面的語句都調(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 過程那樣，也能調(diào)用函數(shù)。下面的語句都調(diào)用同一個函數(shù)：

Call Year (Now)

Year Now

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

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

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

窗體中的過程

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

Call Form1.SomeSub(arguments)

類模塊中的過程

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

Dim DemoClass as New Class1

DemoClass.SomeSub

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

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

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

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

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

Module2.CommonName (arguments)

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

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

關(guān)于VB中模塊調(diào)用

1、調(diào)用模塊一般是指調(diào)用工程中模塊內(nèi)的函數(shù)，只要模塊內(nèi)有這個函數(shù)就可以直接使用它。例如，模塊內(nèi)有函數(shù)Public Function sql_execute(strsql As String) As Boolean

Dim conn As New ADODB.Connection

Set conn = CreateObject("adodb.connection")

conn.Provider = "Microsoft.Jet.OLEDB.4.0"

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\編程狂.mdb;Jet OLEDB:Database Password=260701"

conn.Execute (strsql)

conn.Close

sql_execute = True

End Function在執(zhí)行SQL時，就可以直接使用VarSource = "select max(干部編號) from tb_basic "If sql_execute(VarSource) = True Then

MsgBox "保存成功！", , "提示窗口"

End If2、call是調(diào)用本模塊內(nèi)的函數(shù)或過程，例如Call Command1_Click

vb.net中如何在窗體中調(diào)用模塊

將模塊中的過程寫為Public,在調(diào)用

比如模塊中:

Public Sub text()

......

End Sub

主窗體調(diào)用代碼:

Call text()

當(dāng)前文章：vb.net如何調(diào)用模塊,vb類模塊應(yīng)用實例
網(wǎng)站鏈接：http://chinadenli.net/article2/dsephic.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站改版、軟件開發(fā)、定制網(wǎng)站、網(wǎng)站維護、企業(yè)網(wǎng)站制作、服務(wù)器托管

廣告

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