Estas cajas de texto son un poquito
avanzadas ya que nos dan varias opciones de presentación al usuario en tiempo
de ejecución, aquí muestro algunos ejemplos.
La forma sencilla y la tradicional es la
siguiente:
Forma 1: MsgBox("Espacion del mesage")
Esta forma de cómo
resultado la siguiente caja de masajes
Forma2: MsgBox("Espacion del mesage", 0, "Espacio de titulo")
De esta forma se agrega el
titulo deseado, notemos que en la forma 1 el título es el nombre de la
aplicación.
Forma3: MsgBox("Espacion del mesage",
MsgBoxStyle.Exclamation, Title:="Espacio de
titulo")
En este se define el tipo
de mensaje demás de las opciones ya vistas. En el espacio “",
MsgBoxStyle.Exclamation” se define el tipo de mensaje
que también puede ser “Critical” entre
otros
Forma4:
Dim msg As String
Dim title As String
Dim style As
MsgBoxStyle
Dim response As MsgBoxResult
msg = "Espacio del mensaje"
style = MsgBoxStyle.DefaultButton2 Or _
MsgBoxStyle.Critical Or MsgBoxStyle.YesNo
title = "Espacio
de titulo"
response = MsgBox(msg, style, title)
If response = MsgBoxResult.Yes Then
' si la
respuesta es si
Else
' si la respuesta
es no
End If
Esta es una de
las formas mas avanzadas que manejo, ademas de definir el mensage, definir el
titulo y la imagen, define tambien dos botones que son “Si, No” que son para
dar respuesta a la pregunta que se hace con la caja de mesnages. Y queda asi:
Gracias, amigo una pregunta: Dim style as Msgboxstyle
ResponderEliminardefine a style como objeto? o como qué lo define?
gracias