vb点虐 类教程 vbnet ui

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
当前URL:http://azwzsj.com/article/ddjhejg.html