在vb.net中禁用文本框时遇到问题

如何第二次禁用文本框？ 这是我的代码，在表单加载中，文本框被禁用，除非用户将在数据库中输入一个idnumber。但是如果用户在数据库中输入一个ID号，然后再输入另一个不是， 这就是这段代码出现的地方，但它有问题，它不会在鼠标点击时禁用文本框，正确的方法是什么

Private Sub Button12_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button12.MouseClick
        Dim NoAcc As String
        Dim NoAccmod2 As String
        Dim NoPas As String

        Dim sqlcon As New MySqlConnection("Server=localhost; Database=school;Uid=root;Pwd=nitoryolai123$%^;")
        Dim sqlcom As MySqlCommand = New MySqlCommand("Select * from student where IDNO= '" & TextBox14.Text & "' ", sqlcon)

        sqlcon.Open()

        Dim rdr As MySqlDataReader
        rdr = sqlcom.ExecuteReader

        If rdr.HasRows Then
            rdr.Read()
            NoAcc = rdr("IDNO")
            If (TextBox14.Text <> NoAcc) Then
                MsgBox("ID Number is not yet registered!, please register first in the general information before trying to register parents information", MsgBoxStyle.Information)
                TextBox7.Enabled = False
                TextBox8.Enabled = False
                TextBox9.Enabled = False
                TextBox10.Enabled = False
                TextBox11.Enabled = False
                TextBox12.Enabled = False
                TextBox13.Enabled = False
            End If
        End If

Private Sub Button12\u MouseClick（ByVal sender作为对象，ByVal e作为System.Windows.Forms.MouseEventArgs）处理按钮12.MouseClick
作为字符串的Dim NoAcc
Dim NoAccmod2作为字符串
作为字符串的Dim NoPas
将sqlcon设置为新的MySqlConnection（“服务器=localhost；数据库=school；Uid=root；Pwd=nitoryolai123$%^；”）
Dim sqlcom As MySqlCommand=New MySqlCommand（“从学生中选择*，其中IDNO='”&TextBox14.Text&'”，sqlcon）
sqlcon.Open（）
Dim rdr作为MySqlDataReader
rdr=sqlcom.ExecuteReader
如果rdr.HasRows那么
rdr.Read（）
NoAcc=rdr（“IDNO”）
如果（TextBox14.Text NoAcc），则
MsgBox（“ID号尚未注册！请先在常规信息中注册，然后再尝试注册家长信息”，MsgBoxStyle.information）
TextBox7.Enabled=False
TextBox8.Enabled=False
TextBox9.Enabled=False
TextBox10.Enabled=False
TextBox11.Enabled=False
TextBox12.Enabled=False
TextBox13.Enabled=False
如果结束
如果结束

在例程顶部，始终禁用文本框，然后在ID号匹配时启用它们

根据您在此处实际要实现的目标，如果ID匹配，您也可以通过鼠标单击清除感兴趣的文本框，如果ID不匹配，则将其设置为焦点（以允许他们查看输入的内容并进行更改…可能他们只是输入错误？）