Bonjour,
j'ai un combobox, qui me sert pour faire une recherche dans une base de donnée.
et un bouton rechercher
Voilà ce que j'ai fait:
Mon problème, c'est que ça marche(c'est pas ça monn problème), mais que quand j'appui sur la touche entrer dans mon combobox, ben y a un bip de l'ordi, comme quand on fait un retour arrière, pour effacer dans une texbox vide(pour decrire le bruit)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 Private Sub bt_rechercher_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bt_rechercher.Click Rechercher() End Sub Private Sub combo_rechercher_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles combo_rechercher.KeyDown If e.KeyCode = Keys.Enter Then Rechercher() End If End Sub Sub Rechercher() Dim MaConn As New SqlClient.SqlConnection(a.getconnectionstring) Dim MaCommand As New SqlClient.SqlCommand("proc_rechercher", MaConn) MaCommand.CommandType = CommandType.StoredProcedure MaCommand.Parameters.Add("@recherche", SqlDbType.NVarChar).Value = "%" & combo_rechercher.Text & "%" Dim MonDA As New SqlClient.SqlDataAdapter(MaCommand) Dim MonDs As New DataSet MonDA.Fill(MonDs) Me.DataGridView1.DataSource = MonDs.Tables(0) Me.DataGridView1.Columns.Remove("id") TreeView1.ExpandAll() End Sub
Partager