重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

包含vb.net类模块使用的词条

vb 类模块如何使用模块内容...

类模块代码

成都创新互联公司成立与2013年,先为隰县等服务建站,隰县等地企业,进行企业商务咨询服务。为隰县企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

Option Explicit

Public Function Add(ByVal a As Long, ByVal b As Long) As Long

Add = a + b                 '反回值Add=a+b

End Function

窗体代码

Dim s As New Class1

Private Sub Command1_Click()

MsgBox s.Add(10, 10)

End Sub

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中怎么调用自定义类?

代码已测试。

一、测试需要的INI文件。名称为“setinfo.ini”,存放路径为你解决方案里“Bin“文件夹的”Debug“文件夹里。

内容:

[Location]

pnlTime.Location.X=787

pnlTime.Location.Y=0

[TopMost]

Top=True

二、操作INI文件的类。新建一个类,类中内容为:

Public Class Class1

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _

( _

ByVal lpApplicationName As String, _

ByVal lpKeyName As String, _

ByVal lpDefault As String, _

ByVal lpReturnedString As String, _

ByVal nSize As Int32, _

ByVal lpFileName As String _

) As Int32

End Class

三、界面代码:

Imports System.IO 'for path

Public Class Form1

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

getINI()

End Sub

Private Sub getINI()

Dim iniclass As New Class1 '

Dim myBf As String 'get set_info 开辟存储的内存

myBf = New String(CChar(""), 256)

Dim myFN As String '配置文件的文件路径

myFN = Path.Combine(My.Application.Info.DirectoryPath, "setinfo.ini")

Dim myAN As String 'Application_NAME,也是Section名称

myAN = Me.TextBox1.Text

Dim myKN As String 'KEY_NAME,关键字名称

myKN = Me.TextBox2.Text

Class1.GetPrivateProfileString(myAN, myKN, "", myBf, myBf.Length, myFN) '调用读取INI文件的操作

TextBox3.Text = Microsoft.VisualBasic.Left(myBf, InStr(myBf, Chr(0)) - 1) '截取有用部分,有必要

End Sub

End Class

四、测试截图如下

VB.NET里的“类”有何用?

模块相当于一堆公开方法的集合,类相当于你平时拖的控件,在vb6里面你想自己写个控件是很复杂的,而vb.net里只需要继承自现有控件即可。就按钮来说同样是按钮类,你可以拖若干个到界面上,也就是存在若干实例或对象,而模块,通常只有一个对吧,模块相当于c#的静态类。

vb.net 模块,命名空间,类

我不知道VB中的模块是啥 不过可以给你解释一下类和命名空间,这个都是通用的

你对类的描述是正确的,但不仅仅是这样, 在面向对象中, 所有被描述的东西都被泛化为类,每一个具体的东西就是对应类的实例(也叫类的对象),类的代码可以写在任何位置,他具有复用性,一般.net里都是将一个类单独写成至少1个独立的代码文件

命名空间简单的说就是类的一前缀,比如说一个类叫德州,中国有一个德州,美国也有一个德州,前面的这个限定国家,就相当于命名空间,比如System.Text.StringBuilder 这个类,类名称是StringBuilder,命名空间是System.Text,同一个命名空间下不允许出现两个名字相同的类(有点类似于文件夹和文件的关系,不同的是,类的名称不允许跟命名空间相同,比如你在System.Text命名空间里,不能添加一个叫做Text的类,这个.net规矩,不知道其他的是不是也这样), 通过命名空间可以把类按照其作用(通常是作用)、以及来源(比如Microsoft命名空间) 进行划分管理,使其更容被理解和找到

vb.net 使用模块连接数据库

你说这么一大篇全是业务逻辑,没说明你遇到的技术性问题在哪

.net自带的config文件来配置连接字符串,比ini好N倍,如果你非要用ini那么自己解决问题

检测是否能连接用Connection.Open加try catch就可以


当前名称:包含vb.net类模块使用的词条
分享网址:http://cqcxhl.com/article/doopsso.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP