vb点虐 如何在一个项目中创建类，并且使用他?

在任意form类或模块中都可以创建类，跟建立函数和过程一样。

定安ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景，ssl证书未来市场广阔！成为成都创新互联公司的ssl证书销售渠道，可以享受市场价格4-6折优惠！如果有意向欢迎电话联系或者加微信：13518219792（备注：SSL证书合作）期待与您的合作！

示例：

public class form1

‘创建一个属于form的子类，名称为【类名】。

public class 类名

’定义类成员text

public text as string

end class

‘定义一个【类名】类的公共变量。

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 as new form1.类名

end module

在vb点虐 中怎么调用自定义类？

代码已测试。

一、测试需要的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 和vb点虐 有什么区别！学这个应该选择那类教程比较好

VB一般指的是VB6.0是基于对象的,VB.NET是面向对象的,它们之间的语法接近，但差距也不小，学VB搞VB点虐 不亚于新学一门语言。

VB.NET生成的是托管代码,必须运行于.NET框架之上.VB6则依赖于VB6运行时的支持。

WIN 7中仍然会提供VB6的支持,不过再到以后的版本就没了。

如果你是第一次学,系统用XP，可以搞VB，要是用Win10等新系统，还是直接转向VB.NET学习好了。

关于教程：

人民邮电的 Visual Basic 6.0 编程指南

清华大学的 Visual Basic 6.0 中文版傻瓜书

都是很老的书，可以找电子版，或者去图书馆借。

VB.NET程序设计 电子工业出版社 青岛东合信息技术有限公司

《Visual Basic 2010入门经典》有2个版本，一个是清华大学出版社的，一个是人民邮电出版社的，都不错！

VB.NET什么教材好呢？正在学习，不知道什么教程比较好。像Thinking in java那样的经典的教程

清华大学出版社出版的《VB.NET高级编程》，里面VB.NET的各种实现机制都进行了详细的介绍，特别是类的实现，并且还有文件操作、数据库实现等等，很详细

分享名称：vb点虐 类教程 vbnet ui
标题网址：http://kswjz.com/article/ddjhejg.html