员工基本信息.aspx.vb

来自「人事管理系统」· VB 代码 · 共 26 行

Imports helloxinxi
Partial Class 员工基本信息
    Inherits System.Web.UI.Page

   

    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim ms As New basei()
        Me.GridView2.DataSource = ms.getmsg(Me.DropDownList1.SelectedValue)
        Me.GridView2.DataBind()
        Me.GridView2.Visible = True
        Me.DropDownList1.DataBind()
    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.GridView1.Visible = True
        Me.GridView2.Visible = False
        Me.GridView1.DataBind()

      
    End Sub

   
End Class