验证,参考
Dim dr As DataRowdr = DataTables("表A").Find("第一列 = '" & UserName & "'") If dr IsNot Nothing AndAlso dr("config").contains(MD5Encrypt(password)) Then Verified = TrueEnd If