锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net实体类的简单介绍

IT技术变量

vb 如何调用 NET写的DLL?VB.net语言
1、创建组件定义
新建一个Probject ， 在代码中写入：
PublicInterfaceIDemo
FunctionTest()AsString
EndInterface
2、实现组件定义
新建一个Probject，添加对上述Probject的引用后，在代码中写入
PublicClassDemo
ImplementsIDemo.IDemo
PublicFunctionTest()AsStringImplementsIDemo.IDemo.Test
Test="HelloWorld!"
EndFunction
EndClass
3、编译出Demo.dll组件
4、使用.net的工具VisualStudio.Net2003CommandPrompt，输入以下命令
RegasmDemo.dll/tlb:Demo.tlb
把Demo.dll注册为一个com对象（这个com对象不等同于普通的用VB编写的Com对象），并导出类型库Demo.tlb
5、新建一个VB工程，添加对Demo.tlb和IDemo.tlb的引用
6、定义两个全局变量
DimvbDemoAsDemo.Demo
DimvbIDemoasIDemo.IDemo
7、在Form_Load事件中初始化
'初始化实体类
SetvbDemo=NewDemo.Demo
'将实体类引用到抽象类
SetvbIDemo=vbDemo
8、然后，我们就可以用vbIDemo.Test这样的方法了
vb.net,强类型转换这属于装箱拆箱 。我举个例子你就明白了：
Dim x As Integer = 5
Dim o As Object = x '装箱
Dim y As Integer = CType(o, Integer) '拆箱（在Option Strict Off的情况下，直接用o给y赋值，会发生自动转换 ， 也就是说在这种情况下，你不必显式调用CType函数）
另外：VB.NET支持后期绑定，所以你也可以不进行拆箱，直接在Object类型下就可以调用它的属性和方法
比如，下面的语句在Option Strict Off是是合法的
Dim s As String = 886
Dim i As Integer = "53"
Dim f As Object = New Form()
f.Show() '注意，f是Object类型的
总之，VB.NET的语法要比C#灵活得多
VB.NET实例化类可以,但是变量不能用ClassA或B来定义,可以用Object,或ClassA,ClassB的基类,,使用类的成员时,再把变量类型转换成相应的类
VB.NET中标准的实体类怎么写的,请教VB高手指导'代码来源：代码街codejie.net
'由于在vb.net里变量名不区分大小写（StuName和stuname是一样的），所以个别变量名需要修改
'在vb.net中,模块级变量的命名原则是以m_开头
Public Class Student
Private m_stuNo As String'学生号字段
Private m_stuName As String'学生姓名字段
Private m_stuAge As Integer'学生年龄字段
Private m_stuAddress As String'学生住址字段
'无参构造方法
Public Sub New()
End Sub
'有参构造方法
Public Sub New(ByVal stuNo As String, ByVal stuName As String, ByVal stuAge As Integer, ByVal stuAddress As String)
m_stuNo = stuNo
m_stuName = stuName
m_stuAge = stuAge
m_stuAddress = stuAddress
End Sub
【vb.net实体类的简单介绍】'学生号属性
Public Property StuNo() As String
Get
Return m_stuNo
End Get
Set(ByVal value As String)
m_stuNo = value
End Set
End Property
'学生姓名属性
Public Property StuName() As String
Get
Return m_stuName
End Get
Set(ByVal value As String)
m_stuName = value
End Set
End Property
'学生年龄属性
Public Property StuAge() As Integer
Get
Return m_stuAge
End Get
Set(ByVal value As Integer)
m_stuAge = value
End Set
End Property
'学生住址属性
Public Property StuAddress() As String
Get
Return m_stuAddress
End Get
Set(ByVal value As String)
m_stuAddress = value
End Set
End Property
End Class
关于vb.net实体类和的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

推荐阅读


上一篇：postgresql日志恢复数据库，sqlserver日志恢复

下一篇：网络游戏研究，网络游戏研究性报告