Buenas:


He hecho un formulario que funcionará como msgbox , el motivo de utilizar el formulario es porque queria personalizarme el msgbox. pero hay un error , cuando sale una sola vez el msgbox vabien pero kuando sale por segunda vez algunas cosas fallan. dejo la imagen y el codigo que utilizo.


le agradeceria mucho que alguien me ayudara.


gracias


Codigo:


Public Sub box(error As Integer, msg As String, tit As String)
Form3.Show
'"error" es un numero entre el 1 i 3 que corresponde a la imagen del msgbox(triangulito, infomacion ...)


"msg" es el mensaje


"tit"es el titulo de la ventanita



Beep


Form3.Picture1.Picture = Form3.picx(error).Image



Label1.Caption = msg
Label1.ForeColor = Form1.clrtxt2.BackColor
Label2.ForeColor = Form1.clrtxt2.BackColor
Label2.Caption = tit
Line1.BorderColor = Label1.ForeColor
Picture2.Picture = Form1.picx.Image
Shape1.BorderColor = Label1.ForeColor
Shape1.Top = 0
Shape1.Left = 0
Picture1.Left = 500
Dim med As Integer
med = Picture1.Height / 2
Label1.Top = Picture1.Top + med
Form3.Width = 1000 + Picture1.Width + Label1.Width
Picture2.Left = Form3.Width - 300
Form3.Height = Picture1.Top + Picture1.Height + Picture1.Top
Shape1.Height = Form3.Height
Shape1.Width = Form3.Width
Label2.Width = Picture2.Left - 250
'Form3.StartUpPosition = 2
Me.Left = (Screen.Width - Width) / 2 'Centro
Me.Top = (Screen.Height - Height) / 2 'Centro
End Sub


imagen:

Jodete por usar ese programa de mierda

Haver si alguien con un poco de inteligencia(no como el nico este) me puede ayudar.


gracias

le he estado echando un vistazo y no parece que nadasea como para producir ese efecto... aunque esto...


Form3.Picture1.Picture = Form3.picx(error).Image



... no se...


bueno. Lo que debes hacer es llamarlo con un load form. Luego mostrarlo con form3.show 1 y despues descargarlo con unload form3 y así al volver a llamarlo será como la primera vez (que gonito)

BUenas otra ves:


lo que ase el:


Form3.Picture1.Picture = Form3.picx(error).Image


es cojer el dibujo que aparecerá en el msgbox de otro picture