vb.net调用函数 vb如何调用函数

如何正确理解VB.NET函数调用

1. Shared Function System.Runtime.

创新互联是一家专注于成都做网站、网站建设与策划设计,新沂网站建设哪家好?创新互联做网站,专注于网站建设十余年,网设计领域的专业建站公司;建站业务涵盖:新沂等地区。新沂做网站价格咨询:18980820575

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位数据替代了long(long是64位)

System是Net语言中的一个族，System.Runtime.InteropServices是system中的一个类。System.Runtime.InteropServices.DLLimpor是其中的一个方法。调用DLL的API

接口，这个的意思就是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

你可以这样调用 classA.MessageboxA 但是如果没有这个share 在class后打点就没有MessageboxA的成员出现了 ，现在你就象以前一样的使用他吧。

其实上面这个VB.NET函数调用方法并不正确，我们仍旧要使用API声明，只是换了一各形式

如果你认为这就是VB.NET就错了，看看这个：

system.WinForms.MessageBox.Show("对话内容写在这里", "标题写在这里", messagebox.OK BitOr messagebox.IconAsterisk)

这就是面向对象，你已经完成了所有的任务。不需要任何的API声明。不需要写多余的代码。

1. messagebox.IconAsterisk=惊叹号图标

2. messagebox.IconError=错误图标

3. messagebox.IconExclamation=警告图标

4. messagebox.IconHand=错误图标

5. messagebox.IconInformation=提示图标

所经点NET就是打点到达，在族后面打点，在类后面打点，在对象后面打点。第二个问题就是类与类之间相互的关系，Net在网上处理人与人的关系，在程序语言中处理类与类的关系。倒底是加不加share,倒底是类后面打点,还是Dim成一个对象（把他当一个变量吧）再说，是等于class,还是New class.是dim xxx as class=new class 还是dim xxx as new class

就是这样VB.NET函数调用将更简单，不须要研究一些很难的东西。

VB.net关于类之间函数的调用问题。

如上面所说，你可能还不太了解类、函数等的作用。

类可以用来封装一系列操作，或者是一类对象的特性。像上面的描述，有可能是滥用类了。

建议你这样，弄一个专门的运算类，里面有四个运算的函数，比如：

Class 运算

Shared Function 加(ByVal 加数1 As Decimal, ByVal 加数2 As Decimal) As Decimal

'举个例子

Return 加数1 ＋ 加数2 '百度打不出英文加号，你自己改一下

Exit Function

End Function

Shared Function 减(ByVal 被减数 As Decimal, ByVal 减数 As Decimal) As Decimal

'举个例子

Return 被减数 - 减数

Exit Function

End Function

End Class

上面我写了两个例子，你可以照抄然后自己写乘除的，总之不要滥用类就行。

PS：Shared函数的使用不需要类被实例化，可以直接这样使用：

Msgbox(运算.加(1,2).ToString)

你会发现“运算”是蓝色的

vb.net用指针或变量调用函数

指针是c语言的概念，VB、VB.NET没有指针，除了指针以外也很少有人能玩到你的编程深度，关键看不懂呢。

？？？就是子程序的名称，比如每次点击c后就自动调动相对应的子程序，如子程序是

Private Sub my_do ()

........

End Sub

相应的AddHandler c.Click, AddressOf my_do

实际上是个委托

vb.net同一个类中怎样调用其他函数的值

可以像这样，返回变量的值。

Visual Basic code

Public Function number() As Single '你在这已经设置了函数返回值的类型

Dim nJTTZ As Single = 1

return nJTTZ '返回变量的值

End Function

Public Function Index() As Single

Dim zJTTZ As Single = 1

return zJTTZ

End Function

Public Overloads Function CalcAmount() As Boolean

AddItemRow("", "第一部分：静态投资", "正线公里", number(), Index()) ‘调用函数即得到返回的变量值。

End Function