Public Class AddMember_frm
    Public AddUsercmb  As List(Of Dictionary(Of String, String))
    Public Limitscmb  As List(Of Dictionary(Of String, String))
    Public Pojercmb  As List(Of Dictionary(Of String, String))
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If ComboBox1.Text.Length < 1 Then
            MsgBox("未选择添加成员。")
            Return
        End If
        If ComboBox4.Text.Length < 1 Then
            MsgBox("未选择添加成员权限。")
            Return
        End If
        If ComboBox3.Text.Length < 1 Then
            MsgBox("未选择成员所属项目。")
            Return
        End If

        Me.DialogResult = System.Windows.Forms.DialogResult.OK


    End Sub

    Private Sub AddMember_frm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       
    End Sub

  

End Class