Unas de las cosas más cómodas de la sintaxis de Visual Basic es la instrucción WITH…END WITH que, básicamente, nos permite acceder a los miembros de un objeto sin repetir su nombre constantemente.
La sintaxis básica sería la siguiente:
WITH Objeto 'lo que vayamos a hacer 'con sus miembros END WITH
Dicho así no se entiende bien, pero con un ejemplo lo vemos claro. Tenemos aquí un objeto Mensaje y sus miembros son los valores que necesitamos para enviar un email:
With Mensaje Set .Configuration = iConf .To = "correo@gmail.com" .From = "Donnie" .Subject = "Ejemplo with" .HTMLBody = correoHTML .Send End With
Como podéis ver esta sintaxis nos ahorra escribir la referencia al objeto Mensaje antes de cada uno de sus elementos. Es a su vez cómodo para escribir y para leer el código.
Es posible anidar una sentencia WITH dentro de otra para acceder a un objeto interno, pero esto puede hacer nuestro código más difícil de leer.
With obVentana With .Etiqueta .Mensaje= "Esto es un aviso." .Fondo = Brushes.DarkSeaGreen End With .Titulo = "VENTANA DE AVISO" .Show() End With