VB.Net学习地址

https://www.w3cschool.cn/vb_net/vb_net-vxwt1wa9.html

VB.Net的集成开发环境（IDE）

• Visual Studio 2013（VS）

  一个VB.Net程序主要由以下几部分组成：

• 命名空间声明 Namespace declaration
• 一个类或模块 A class or module
• 一个或多个程序 One or more procedures
• 变量 Variables
• 主过程 The Main procedure
• 语句和表达式 Statements & Expressions

• 注释 Comments

打印单词“Hello World”

Imports System
Module Module1'This program will display Hello World Sub Main()Console.WriteLine("Hello World")Console.ReadKey()End Sub
End Module

Rectangle类的实现

Imports System
Public Class RectanglePrivate length As DoublePrivate width As Double'Public methodsPublic Sub AcceptDetails()length = 4.5width = 3.5End SubPublic Function GetArea() As DoubleGetArea = length * widthEnd FunctionPublic Sub Display()Console.WriteLine("Length: {0}", length)Console.WriteLine("Width: {0}", width)Console.WriteLine("Area: {0}", GetArea())End SubShared Sub Main()Dim r As New Rectangle()r.Acceptdetails()r.Display()Console.ReadLine()End Sub
End Class

接受来自用户的值

Module variablesNdataypesSub Main()Dim message As StringConsole.Write("Enter message: ")message = Console.ReadLineConsole.WriteLine()Console.WriteLine("Your Message: {0}", message)Console.ReadLine()End Sub
End Module

声明常量

Module constantsNenumSub Main()Const PI = 3.14149Dim radius, area As Singleradius = 7area = PI * radius * radiusConsole.WriteLine("Area = " & Str(area))Console.ReadKey()End Sub
End Module

声明枚举

Module constantsNenumEnum Colorsred = 1orange = 2yellow = 3green = 4azure = 5blue = 6violet = 7End EnumSub Main()Console.WriteLine("The Color Red is : " & Colors.red)Console.WriteLine("The Color Yellow is : " & Colors.yellow)Console.WriteLine("The Color Blue is : " & Colors.blue)Console.WriteLine("The Color Green is : " & Colors.green)Console.ReadKey()End Sub
End Module