22-11-15, 05:11 PM
السلام عليكم
اولا ضع هذا الاجراء كالتالي
اولا ضع هذا الاجراء كالتالي
PHP كود :
Sub FillLstv()
ListView1.Items.Clear()
Dim da As New OleDbDataAdapter("Select * from UsersTb where UserName Like '%" & TextBox1.Text.Trim() & "%'", cn)
Dim dt As New DataTable
da.Fill(dt)
For Each dr As DataRow In dt.Rows
Dim itm As New ListViewItem(dr("id").ToString())
itm.SubItems.Add(dr("UserName").ToString())
ListView1.Items.Add(itm)
Next
End Sub
ثم قم باستدعائه في الحدثين التاليين
PHP كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FillLstv()
End Sub
PHP كود :
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
FillLstv()
End Sub

