demo.vb

来自「< SQL Server2005程序设计>」· VB 代码 · 共 18 行

Public Class Demo

    Private Sub btnSimple_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSimple.Click
        Dim sForm As New Simple
        sForm.Show()
    End Sub

    Private Sub btnService_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnService.Click
        Dim sForm As New Service
        sForm.Show()
    End Sub

    Private Sub btnRender_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRender.Click
        Dim sForm As New RenderRpt
        sForm.Show()
    End Sub

End Class