status.vb

来自「vb.net写的存储过程示例适用于初学者」· VB 代码 · 共 12 行

' Copyright (c) Microsoft Corporation. All rights reserved.
Public Class Status

    Public Overloads Sub Show(ByVal Message As String)
        Label1.Text = Message
        Me.Show()
        Application.DoEvents()
    End Sub



End Class