仿MSN的冒泡窗体

来源:互联网 发布:知托付 编辑:程序博客网 时间:2024/05/22 09:48

1>新建一工程.在Form1上放一个button按钮.

2>添加引用PopProgram.dll

3>程序顶部写入:

Private WithEvents taskbarNotifier2 As PopProgram.PopProgram

4>初始化数据Form1_Load事件

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        taskbarNotifier2 
= New PopProgram.PopProgram

        taskbarNotifier2.SetBackgroundBitmap(
"D: empTaskBarTaskBarskin.bmp", Color.FromArgb(2550255)) '此处图片可以换自已的路径
        taskbarNotifier2.SetCloseBitmap("D: empTaskBarTaskBarclose.bmp", Color.FromArgb(2550255), New Point(1278)) '同上
        taskbarNotifier2.TitleRectangle = New Rectangle(4097025)
        taskbarNotifier2.TextRectangle 
= New Rectangle(84113368)

    End Sub

5>button的Click事件

 Try
            With taskbarNotifier2
                .CloseButtonClickEnabled 
= True
                .TitleClickEnabled 
= False
                .TextClickEnabled 
= True
                .DrawTextFocusRect 
= True
                .KeepVisibleOnMouseOver 
= True
                .ReShowOnMouseOver 
= False
                .Show(
"hello world""你有一單未審核,趕快審核吧!"5003000500)
            End With
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

6>编译,单击button,可以看到屏幕的右下角弹出一个窗体.是不是很像MSN的效果.