Right hand side popup Notification from

Question

We have form which displays notification at the right hand bottom side. If another instance is invoked it should show the window the top of current one if its active. Please advice.

---

Coderv9

Answer 1

Hi,

Can you provide more information? Or provide some code.
By the way, what is this project?

Best Regards,

Alex

---

MSDN Community Support Please remember to click "Mark as Answer" the responses that resolved your issue, and to click "Unmark as Answer" if not. This can be beneficial to other community members reading this thread. If you have any compliments or complaints to MSDN Support, feel free to contact [e-mail].

Answer 2

Hi Alex,

Am trying to develop a program to view incoming chat notifications.

When an incoming chat arrives which is stored in a array. Application should provide notification in the above format.

If there are multiple incoming chats it's should notify the user like above.

---

Coderv9

Answer 3

The best thing I've seen unfortantely is WPF/C#. They stack and permit you to determine the life span of each toast window.

https://github.com/rafallopatka/ToastNotifications 

I have not seen anything like this for VB.NET.

---

Please remember to mark the replies as answers if they help and unmark them if they provide no help, this will help others who are looking for solutions to the same or similar problem. Contact via my Twitter (Karen Payne) or Facebook (Karen Payne) via my MSDN profile but will not answer coding question on either.
VB Forums - moderator

Answer 4

Here is a start on a vb version using a FlowLayoutPanel and Buttons.

Public Class Form4
    Private WithEvents Flow1 As New FlowLayoutPanel With {.Parent = Me, .Dock = DockStyle.Right,
     .BackColor = Color.Black, .ForeColor = Color.AntiqueWhite, .Width = 150, .FlowDirection = FlowDirection.BottomUp}
    Private WithEvents Button1 As New Button With {.Parent = Me, .Location = New Point(20, 20), .Text = "Add Msg"}
    Private NotesTotal As Integer

    Private Sub Buttons_Click(sender As Object, e As EventArgs)
        'close this message
        Dim btn As Button = DirectCast(sender, Button)
        btn.Dispose()
    End Sub

    Private Sub Buttons1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        'add button note to flow panel
        Dim btn As New Button
        NotesTotal += 1

        With btn
            .Name = "B" & NotesTotal.ToString
            .Size = New Size(Flow1.Width - 2, 60)
            .Text = "Message Type:" & vbLf & "   NOTE " & NotesTotal.ToString
            .BackColor = Color.Maroon
            .BackgroundImage = SystemIcons.Warning.ToBitmap()
            .BackgroundImageLayout = ImageLayout.None
            .ImageAlign = ContentAlignment.MiddleLeft
            AddHandler .Click, AddressOf Buttons_Click
        End With

        Flow1.Controls.Add(btn)

    End Sub
End Class

Answer 5

Thank you tommy. This is so close to what we are looking for.

---

Coderv9

Answer 6

Awesome UI. Thank you for the link Karen

---

Coderv9