Discussion :

[hacker59]

Bonjour, voici en image mon projet :


quand je recherche le code dans listview1 ça sélectionne en rouge :


voici mon code :

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
25
26
27
28
29
30
31
32
33
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ListView1.Items.Add("A56601CB30510000")
        ListView1.Items.Add("A56602CB30510000")
        ListView1.Items.Add("A56603CB30510000")
        ListView1.Items.Add("A56604CB30510000")
        ListView1.Items.Add("BF2EA6A46A160000")
        ListView1.Items.Add("A78D4166193C0000")
        ListView1.Items.Add("59504DAA96298000")
        ListView1.Items.Add("D424EC43B9C93000")
    End Sub
 
    Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged
        TextBox1.Text = TextBox1.Text.Replace(" ", "")
        For Each lv As ListViewItem In ListView1.Items
            If lv.SubItems(0).Text = TextBox1.Text Then
                lv.BackColor = Color.White
                lv.ForeColor = Color.Red
            Else
                lv.BackColor = Color.White
                lv.ForeColor = Color.Black
            End If
        Next
    End Sub
 
    Private Sub TextBox1_Click(sender As System.Object, e As System.EventArgs) Handles TextBox1.Click
        TextBox1.SelectAll()
        TextBox1.Clear()
    End Sub
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        TextBox1.Clear()
        TextBox1.Paste()
    End Sub

Mon probléme : Voilà, quand j'entre le code dans textbox1.text => A5 ....etc. il m'affiche en rouge et le code qui commence pas par A5. il s'affiche pas dans listview1 et si je enlevè A5 tous ce remet comme avant.
Pouvez-vous m'aider comment écrire le code . Merci