0 
Private Sub btn_remove_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_remove.Click
    Dim Query As String
    mysqlconn.Open()
    Query = "delete from table where screen_id='" & cmb_id.Text & "' "
    Dim cmd As MySqlCommand = New MySqlCommand(Query, mysqlconn)
    Dim i As Integer = cmd.ExecuteNonQuery()
    If (i > 0) Then
        MsgBox("Record is Successfully deleted")

    Else
        MsgBox("Record is not deleted")
    End If
    mysqlconn.Close()
End Sub

コンボボックスからIDを選択します。選択したIDに応じて、データベースから削除します。上記のコードは同じことを説明していますが、実行時に（データベースから削除した後）コンボボックスから削除されたIDを削除したい

ありがとう

4

1 に答える 1

1

解決策は簡単です。ID を削除した後、コンボ ボックスにデータを再度ロードします。

Private Sub btn_remove_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_remove.Click
    Dim Query As String
    mysqlconn.Open()
    Query = "delete from table where screen_id='" & cmb_id.Text & "' "
    Dim cmd As MySqlCommand = New MySqlCommand(Query, mysqlconn)
    Dim i As Integer = cmd.ExecuteNonQuery()
    If (i > 0) Then
        MsgBox("Record is Successfully deleted")
**===> load the data here or call the function that load the data in the combo box**
    Else
        MsgBox("Record is not deleted")
    End If
    mysqlconn.Close()
End Sub
于 2012-07-12T07:37:24.110 に答える