mainform.vb

来自「SQL Server 业已成为最为流行的几大数据库之一」· VB 代码 · 共 36 行

Public Class MainForm

    Private Sub BtWmi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtWmi.Click

        Dim mWMIForm As New WMIForm
        mWMIForm.ShowDialog()

    End Sub

    Private Sub BtMail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtMail.Click

        Dim mMailForm As New MailForm
        mMailForm.ShowDialog()

    End Sub

    Private Sub BtTrace_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtTrace.Click
        Dim mTraceForm As New TraceForm
        mTraceForm.ShowDialog()
    End Sub

    Private Sub BtBroker_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtBroker.Click

        Dim mBrokerForm As New BrokerForm
        mBrokerForm.ShowDialog()

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim lREGSF As New RegisteredServerForm
        lREGSF.ShowDialog()

    End Sub
End Class