如何刷新文本框/數據表以重新運行此命令？

Question

這段代碼使用他們的雇用ID來獲取客戶雇用記錄，並在多個文本框中顯示其詳細信息。 一切都很好，但是，我只能運行一次。 如果我鍵入另一個客戶雇用記錄ID，它只會顯示已實現的第一個客戶詳細信息，我認為這是因為數據表已經根據我輸入的新雇用記錄ID進行了填充，並且沒有刷新。

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

    Dim hirerecord1 As Integer = TextBox13.Text

    Dim cmd2 As New SqlCommand("SELECT * FROM HireItemRecord WHERE HireRecord_Id = " & hirerecord1, cnn)
    Dim sqlDa As New SqlDataAdapter(cmd2)

    sqlDa.Fill(dt1)
    If dt1.Rows.Count > 0 Then
        TextBox14.Text = dt1.Rows(0)("RentalItem_Id").ToString()  
        TextBox15.Text = dt1.Rows(0)("HireRecord_Id").ToString()
        TextBox45.Text = dt1.Rows(0)("HireItemBeginDate").ToString()

    End If
    cnn.Close()

End Sub

我不太確定該怎么做...

另外，我對此也有類似的問題。

Private Sub TextBox46_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox46.TextChanged
    Dim keywords2 As String = TextBox46.Text

    ds1.Tables("PersonDetails").DefaultView.RowFilter = "Last_Name like '%" & keywords2 & "%' "
End Sub

這樣，我可以在datagridview的列中搜索匹配項。 一切正常且良好，直到我將新記錄插入數據庫中為止，此時我刷新datagridview以顯示新添加的記錄。 完成此操作后，我將無法再使用文本框進行搜索。 再一次，我不太確定如何解決此問題。

非常感謝您的幫助。

Answer 1

您正在Button6_Click方法的末尾關閉連接，但看不到它在何處再次打開。 這與您只成功運行一次的方法的症狀相吻合。 您是否嘗試單步執行代碼以查看第二次失敗的地方？