首次提交后如何防止按钮冻结

时间:2016-08-05 02:20:22

标签: vb.net

我正在使用VB.Net和MySQL作为我的数据库,我有4个带有不同条件语句的文本框,以及Add/insert到数据库的1个按钮。这是group1 TextBox_ATextBox_B的文本框的名称,group2TextBox_CTextBox_D。当我单击提交/插入按钮时,在group1的第一个条件它是正确的,并成功添加到数据库,但我的问题是,当我在2 TextBoxes下输入/填写group2时再次当我点击Add/insert按钮时,按钮将冻结,并且它不允许它提交,我不知道问题是什么,当然我使用open.Connection和{在任何条件下{1}}。

这是我的代码:

Close.Connection

1 个答案:

答案 0 :(得分:0)

一些事情。首先,您的条件没有考虑到所有四个文本框都可以包含文本,如果它们要执行类似的操作,请考虑将其分解为可重用的方法。

编辑:可能比这更简单:)只需添加 .Text

Private Sub cmbInsert_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbInsert.Click
   If TextBox_A.Text <> "" And TextBox_B.Text <> "" And  TextBox_C.Text ="" And TextBox_D.Text = "" Then

      objconn = New MySqlConnection
      objconn.ConnectionString = "server=xxx; username=xxx; password=xxx; database=xxxx"
      objconn.Open()
            With objcmd
                .Connection = objconn
                .CommandText = "insert query here"
                .ExecuteNonQuery()
            End With
       objconn.Close()
       MsgBox("Data Added!", MsgBoxStyle.Information + MsgBoxStyle.OkOnly, "SUCCESS")

   ElseIf TextBox_C.Text <> "" And TextBox_D.Text <> "" And  TextBox_A.Text ="" And TextBox_B.Text = "" Then

      objconn = New MySqlConnection
      objconn.ConnectionString = "server=xxx; username=xxx; password=xxx; database=xxxx"
      objconn.Open()
            With objcmd
                .Connection = objconn
                .CommandText = "insert query here"
                .ExecuteNonQuery()
            End With
       objconn.Close()
      MsgBox("Data Added!", MsgBoxStyle.Information + MsgBoxStyle.OkOnly, "SUCCESS")

   End If
 End Sub