vb.net中类的使用的简单介绍

在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中类与对象有什么特征【vb.net中类的使用的简单介绍】和其它语言是一样的
写法不同而已
类关键字
在下面的例子中 , 代码包含了一个关键字End
Class 。这是一个新的关键字,使用它的目的是为了在一个源文件中包含多个类,这点正是VB.NET与VB6在创建类区别的精髓所在 。每当我们在VB.NET中创建类的时候 , 我们只是简单地将所有的的代码包含在Class和End
Class
之间 。例子代码如下:
Public护鸡篙课蕻酒戈旬恭莫
Class
TheClass
Public
Sub
MyWorks()
End
Sub
End
Class
另外在一个特定的源文件(后缀名为.vb)中,我们可以使用多个Class...End
Class块 。
希望能帮到你
VB.NET里的“类”有何用?模块相当于一堆公开方法的集合,类相当于你平时拖的控件 , 在vb6里面你想自己写个控件是很复杂的,而vb.net里只需要继承自现有控件即可 。就按钮来说同样是按钮类,你可以拖若干个到界面上,也就是存在若干实例或对象,而模块,通常只有一个对吧 , 模块相当于c#的静态类 。
vb.net 如何在一个项目中创建类,并且使用他?在任意form类或模块中都可以创建类vb.net中类的使用,跟建立函数和过程一样 。
示例vb.net中类的使用:
public class form1
‘创建一个属于formvb.net中类的使用的子类vb.net中类的使用,名称为【类名】 。
public class 类名
’定义类成员text
public text as string
end class
‘定义一个【类名】类vb.net中类的使用的公共变量 。
dim 类名1 as 类名
’定义一个过程,使用【类名】类的text成员
public sub 过程
‘实例化【类名1】
类名1=new 类名
类名1.text=“赋值”
’定义一个【新类】类的私用变量 , 并实例化 。
dim 新类1 as new 新类
新类1.name=“一个字符串”
新类1.age=12
end sub
end class
‘’‘创建一个与form同级的类,名称为【新类】
public class 新类
public sub new()
end sub
public name as string
public age as integer
end class
在模块中使用:
public class module1
dim a asnew form1.类名
end module
vb.net中类的使用的介绍就聊到这里吧 , 感谢你花时间阅读本站内容,更多关于、vb.net中类的使用的信息别忘了在本站进行查找喔 。

    推荐阅读