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 = "Zara Ali"
         .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
Zara Ali
Information Technology