commonfunctions.vb

来自「vb.net写的图书管理系统,功能完备,能正常使用,可用于二次开发.」· VB 代码 · 共 16 行

Module common

    Public Sub InfoMSG(ByVal MSG As String)
        MessageBox.Show(MSG, "书籍借阅管理系统", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End Sub

    Public Sub ErrorMSG(ByVal MSG As String)
        MessageBox.Show(MSG, "书籍借阅管理系统", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Sub

    Public Sub ExclaMSG(ByVal MSG As String)
        MessageBox.Show(MSG, "书籍借阅管理系统", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
    End Sub

End Module