執行程式時提示訊息的方法

       在執行程式時，如果希望提示訊息，
       可以用以下的方式：

        Dim Excuting_msg As New Form
        Excuting_msg.TopMost = True
        Excuting_msg.Width = "300"
        Excuting_msg.Height = "230"
        Excuting_msg.Text = "Message !!!"
       '下面這行可以放圖上去
        Excuting_msg.BackgroundImage = My.Resources.Resources.圖的檔名
        Excuting_msg.BackgroundImageLayout = ImageLayout.Stretch
        Excuting_msg.StartPosition = FormStartPosition.CenterScreen
        Excuting_msg.Show()

        '執行完畢時將訊息關閉。

        Excuting_msg.Close()

        備註：將圖加入資源的流程：
                 1.方案名稱按右鍵點屬性
                 2.點資源 > 加入資源 > 加入現有檔案

                 這樣就可以引用資源圖片了。