e.Form.Controls("ComboBox1")输入的文本为“2014年市海模”

dr("竞赛名称")  的值为 “海模”

以下是代码 

红色部分为字符匹配代码，执行时没有匹配。应如何修改？请指教！！！

Dim mc As String = e.Form.Controls("ComboBox1").text
If mc = "选择竞赛名称"  Then
    MessageBox.Show("请选择竞赛名称!")
    Return
End If
MessageBox.Show(mc)
For Each dr As DataRow In DataTables("花名册").DataRows        
        If dr("竞赛名称") Like "* mc *"
        Dim mm As  String = dr("密码")
        MessageBox.Show(mm)
       
        Dim pwd As String
        If InputPassWord(pwd,"提示","请输入密码:") Then
            If pwd = mm
                DataTables("项目表").AllowEdit = True
            End If
        End If   
    End If
Next
MessageBox.Show("no")