DigiNG edición Scripting
Método digi.MsgBox
Muestra un cuadro de mensajes en la pantalla de DigiNG. Este método emula la función MsgBox de VBScript, por que si se ejecuta ésta con un modelo estereoscópico cargado, el programa se minimiza por que el cuadro de diálogo MsgBox de VBScript se ejecuta en otro contexto de ejecución. Para solucionar el problema, es conveniente usar el método suministrado por DigiNG.
digi.MsgBox (descripción, título, botones+iconos )
Argumentos
descripción Texto a mostrar en el MsgBox título Título que aparecerá en la barra de título del cuadro de diálogo. botones+iconos Valor para indicar qué botones mostrar y qué icono mostrar en el cuadro de mensaje de entre los siguientes:
|
Botones |
|
|
OK |
0 |
|
Cancelar |
1 |
|
Abortar, reintentar, ignorar |
2 |
|
Si, no, cancelar |
3 |
|
Si, no |
4 |
|
Reintentar, cancelar |
5 |
|
Iconos |
|
|
Cruz |
16 |
|
Interrogación |
32 |
|
Admiración |
48 |
|
Asterisco |
64 |
Ejemplo
Option Explicit
' Definiciones de los botones a mostrar
' No definimos las siguientes variables por que ya están definidas por defecto por el motor de VBScript, pero las mostramos aquí para conocer
' los valores standard a utilizar.
'Const vbOK=0
'Const vbOKCANCEL=1
'Const vbABORTRETRYIGNORE=2
'Const vbYESNOCANCEL=3
'Const vbYESNO=4
'Const vbRETRYCANCEL=5
Const vbICONHAND=16
Const vbICONQUESTION=32
Const vbICONEXCLAMATION=48
Const vbICONASTERISK=64
retMsgBox = digi.MsgBox("Este es mi primer MsgBox desde DigiNG", "Hola mundo!", vbYESNO + vbICONEXCLAMATION)
Mirar también
Fecha de última modificación: miércoles, 18 de junio de 2003
© 2001-2003 Dreaming With Objects. Todos los derechos reservados.