VB.Net With... End With迴圈

這不完全是一個迴圈的結構。它執行一系列重複引用單個對象或結構的語句。

這個迴圈結構的語法是：

With object
    [ statements ]
End With

示例

Module loops
   Public Class Book
      Public Property Name As String
      Public Property Author As String
      Public Property Subject As String
   End Class
   Sub Main()
      Dim aBook As New Book
      With aBook
          .Name = "VB.Net Programming"
          .Author = "Small Su"
          .Subject = "Information Technology"
      End With
      With aBook
          Console.WriteLine(.Name)
          Console.WriteLine(.Author)
          Console.WriteLine(.Subject)
      End With
      Console.ReadLine()
   End Sub
End Module

執行上面示例代碼，得到以下結果 -

VB.Net Programming
Small Su
Information Technology