Pop up message

[kpmsivachand]

Hi!

Guys, i need to pop up a message like (bitdefender) right corner of the window. How to do in vb6?

[ThEiMp]

MsgBox "bitdefender", , "Message"

[vb5prgrmr]

Ahhh...

ThEiMp, that will put a msgbox in the center of the screen and not in the right corner of the window as the OP asked...

kpmsivachand, okay, new standard exe project>add command button>add code...

Option Explicit

Private Sub Form_Load()
Me.Left = 0
Me.Top = 0
End Sub

Private Sub Command1_Click()
Load Form2
Form2.QuarterSizeMessage Me, "this is a test"
Form2.Show vbModal, Me
End Sub

Now add another form (Form2) and on it add a label (label1)>add code...

Option Explicit

Public Sub QuarterSizeMessage(WhoCalled As Form, TheMessage As String)
Me.Width = (WhoCalled.Width * 0.25)
Me.Height = (WhoCalled.Height * 0.25)
Me.Left = (WhoCalled.Left + WhoCalled.Width) - Me.Width
Me.Top = (WhoCalled.Top)
Label1.Left = 0
Label1.Top = 0
Label1.Height = Me.Height
Label1.Width = Me.Width
Label1.Caption = TheMessage
End Sub

Run>click>see

Good Luck

[ThEiMp]

I was letting the owner of thread choose where to place the msgbox. If he wished so.

[vb5prgrmr]

How? You show no code for subclassing the standard vb msgbox for placing it in a specific position...

[kpmsivachand]

Hi first of al thanks for your post...

vb5prgrmr [Credit+ ] code works, Actually i need to show the form right corner and bottom of the window(vb5prgrmr did right corner and top of the window). Any how i make it now....

ThEiMp dude, actualy "bitdefender anti virus" will pop up a msg right corner and bottom of the client area, i need to show a form like that... Sorry for i didnt make it clear in first post....


Ok dude i did... Thanks for your support....