語句是Visual Basic程式中的完整指令。它可能包含關鍵字,運算子,變數,文字值,常數和表示式。
語句可以分類為如下:
宣告語句用於命名和定義過程,變數,屬性,陣列和常數。當宣告一個程式設計元素時,也可以定義它的資料型別,存取級別和範圍。
可以宣告的程式設計元素包括變數,常數,列舉,類,結構,模組,介面,過程,過程引數,函式返回,外部過程參照,運算子,屬性,事件和委託。
以下是VB.Net中的宣告語句:
Dim語句 - 為一個或多個變數宣告和分配儲存空間。
範例:
Dim number As Integer
Dim quantity As Integer = 100
Dim message As String = "Hello!"
Const語句 - 宣告和定義一個或多個常數。
範例:
Const maximum As Long = 1000
Const naturalLogBase As Object = CDec(2.7182818284)
Enum語句 - Enum語句宣告並定義其成員的值。
範例:
Enum CoffeeMugSize
Jumbo
ExtraLarge
Large
Medium
Small
End Enum
Class語句 - 宣告一個類的名稱,並描述類所包含的變數,屬性,事件和過程的定義。
範例:
Class Box
Public length As Double
Public breadth As Double
Public height As Double
End Class
Structure語句 - 宣告結構的名稱並介紹結構包含的變數,屬性,事件和過程的定義。
範例:
Structure Box
Public length As Double
Public breadth As Double
Public height As Double
End Structure
Module語句 - 宣告模組的名稱,並介紹模組包含的變數,屬性,事件和過程的定義。
範例:
Public Module myModule
Sub Main()
Dim user As String =
InputBox("What is your name?")
MsgBox("User name is" & user)
End Sub
End Module
Interface語句 - 宣告介面的名稱並描述該介面包含的成員的定義。
範例:
Public Interface MyInterface
Sub doSomething()
End Interface
Function語句 - 宣告定義Function
過程的名稱,引數和程式碼。
範例:
Function myFunction
(ByVal n As Integer) As Double
Return 5.87 * n
End Function
Sub語句 - 宣告定義Sub過程的名稱,引數和程式碼。
範例:
Sub mySub(ByVal s As String)
Return
End Sub
Declare 語句 - 宣告對在外部檔案中實現的過程的參照。
範例:
Declare Function getUserName
Lib "advapi32.dll"
Alias "GetUserNameA"
(
ByVal lpBuffer As String,
ByRef nSize As Integer
) As Integer
Operator語句 - 宣告在類或結構上定義操作符過程的操作符,運算元和程式碼。
範例:
Public Shared Operator +
(ByVal x As obj, ByVal y As obj) As obj
Dim r As New obj
'implemention code for r = x + y'
Return r
End Operator
Property 語句 - 宣告一個屬性的名稱,以及用於儲存和檢索屬性值的屬性過程。
範例:
ReadOnly Property quote() As String
Get
Return quoteString
End Get
End Property
Event 語句 - 宣告一個使用者定義的事件。
範例:
Public Event Finished()
Delegate 語句 - 用於宣告一個委託。
範例:
Delegate Function MathOperator(
ByVal x As Double,
ByVal y As Double
) As Double
可執行語句執行一個動作。呼叫過程的語句,分支到程式碼中的另一個地方,迴圈幾個語句或計算表示式是可執行語句。賦值語句是可執行語句的特例。
以下範例演示了一個決策宣告:
Module decisions
Sub Main()
'local variable definition'
Dim a As Integer = 10
'check the boolean condition using if statement'
If (a < 20) Then
'if condition is true then print the following '
Console.WriteLine("a is less than 20")
End If
Console.WriteLine("value of a is : {0}", a)
Console.ReadLine()
End Sub
End Module
當上面的程式碼被編譯並執行時,會產生以下結果:
a is less than 20;
value of a is : 10