📜  VB.Net-基本语法

📅  最后修改于: 2020-11-19 08:44:36             🧑  作者: Mango


VB.Net是一种面向对象的编程语言。在面向对象编程方法中,程序由各种对象组成,这些对象通过动作相互交互。对象可能采取的动作称为方法。相同种类的对象被称为具有相同的类型,或更常见的是,它们属于同一类。

当我们考虑一个VB.Net程序时,可以将其定义为通过调用彼此的方法进行通信的对象的集合。现在让我们简要地研究一下类,对象,方法和实例变量的含义。

  • 对象-对象具有状态和行为。例如:一条狗具有状态-颜色,名称,品种以及行为-摇摆,吠叫,进食等。对象是类的实例。

  • -类可以定义为模板/蓝图,用于描述其类型的对象支持的行为/状态。

  • 方法-方法基本上是一种行为。一个类可以包含许多方法。在编写逻辑,处理数据和执行所有操作的方法中。

  • 实例变量-每个对象都有其唯一的实例变量集。对象的状态由分配给这些实例变量的值创建。

VB.Net中的矩形类

例如,让我们考虑一个Rectangle对象。它具有长度和宽度之类的属性。根据设计,可能需要一些方法来接受这些属性的值,计算面积并显示详细信息。

让我们看一个Rectangle类的实现,并根据我们在其中的观察结果讨论VB.Net基本语法-

Imports System
Public Class Rectangle
   Private length As Double
   Private width As Double

   'Public methods
   Public Sub AcceptDetails()
      length = 4.5
      width = 3.5
   End Sub

   Public Function GetArea() As Double
      GetArea = length * width
   End Function
   Public Sub Display()
      Console.WriteLine("Length: {0}", length)
      Console.WriteLine("Width: {0}", width)
      Console.WriteLine("Area: {0}", GetArea())

   End Sub

   Shared Sub Main()
      Dim r As New Rectangle()
      r.Acceptdetails()
      r.Display()
      Console.ReadLine()
   End Sub
End Class

编译并执行上述代码后,将产生以下结果-

Length: 4.5
Width: 3.5
Area: 15.75

在上一章中,我们创建了一个Visual Basic模块来保存代码。 Sub Main指示VB.Net程序的入口点。在这里,我们使用包含代码和数据的Class。您使用类创建对象。例如,在代码中,r是一个Rectangle对象。

对象是类的实例-

Dim r As New Rectangle()

如果这样指定,则班级可能具有可以从外部班级访问的成员。数据成员称为字段,过程成员称为方法。

可以在不创建类对象的情况下调用共享方法或静态方法。实例方法通过类的对象调用-

Shared Sub Main()
   Dim r As New Rectangle()
   r.Acceptdetails()
   r.Display()
   Console.ReadLine()
End Sub

身份标识

标识符是用于标识类,变量,函数或任何其他用户定义项的名称。在VB.Net中命名类的基本规则如下-

  • 名称必须以字母开头,后跟字母,数字(0-9)或下划线。标识符中的第一个字符不能是数字。

  • 它不能包含任何嵌入的空格或符号? -+! @#%^&*()[] {}。 ; :“’和\。但是,可以使用下划线(_)。

  • 它不应该是保留关键字。

VB.Net关键字

下表列出了VB.Net保留关键字-

AddHandler AddressOf Alias And AndAlso As Boolean
ByRef Byte ByVal Call Case Catch CBool
CByte CChar CDate CDec CDbl Char CInt
Class CLng CObj Const Continue CSByte CShort
CSng CStr CType CUInt CULng CUShort Date
Decimal Declare Default Delegate Dim DirectCast Do
Double Each Else ElseIf End End If Enum
Erase Error Event Exit False Finally For
Friend Function Get GetType GetXML Namespace Global GoTo
Handles If Implements Imports In Inherits Integer
Interface Is IsNot Let Lib Like Long
Loop Me Mod Module MustInherit MustOverride MyBase
MyClass Namespace Narrowing New Next Not Nothing
Not Inheritable Not Overridable Object Of On Operator Option
Optional Or OrElse Overloads Overridable Overrides ParamArray
Partial Private Property Protected Public RaiseEvent ReadOnly
ReDim REM Remove Handler Resume Return SByte Select
Set Shadows Shared Short Single Static Step
Stop String Structure Sub SyncLock Then Throw
To True Try TryCast TypeOf UInteger While
Widening With WithEvents WriteOnly Xor