Bueno, quiero hacer esto para eso pongo el ejemplo tan sencillo:
en un modulo tengo:
Public Function Mensaje()
Msgbox()
End Function
y en el form
Private Sub Form_Load()
Mensaje("jaja")
End Sub
Entonces deberia de salir un msgbox con el texto jaja , se que el codigo esta mal hecho pongo este ejemplo para que sepais mas o menos como se hace, ahora.......
¿Como se hace? Gracias
Pues sería algo así.
En el módulo:
Public Function Mensaje(ByVal Titulo As String, ByVal Texto As String, ByVal Estilo As VbMsgBoxStyle)
MsgBox Texto, Estilo, Titulo
End function
En el formulario:
Private Sub Form_Load()
Mensaje "Hola", "Prueba de mensaje", vbOKOnly
End Sub
Esto tan solo es un ejemplo. Puedes personalizarlo de diferentes formas. Podrías hasta crear tu propia caja de mensaje en un formulario y darle la apariencia que tu quieras.
Saludos.
Y más o menos que "función" tendría usar una "función" que utilice la "función" "MsgBox"? para simular un MsgBox? como si no exsitiera dicha función y trabajarás solo con API's... :huh:
¿rendundante? :-\
Yo solo queria como hacerlo, es para fomentarlo en otros proyecots con otras formas.