28-11-21, 02:02 PM
عندى سؤال استخدام هذا الكود و هو يعم بنجاح ولكن فى حالة التحديث كل دقيقة يتم عمل يحدث للاداء بطريق اخفاء العناصر و اظهارها مره اخرى
اريد ان يتم فحص اذا كان item موجود فى ListView او لا و يتم حذف من الست او اضافة الجديد بدون عمل تحديث للست
ودى صورة للمشكلة ادخل الاداء
اريد ان يتم فحص اذا كان item موجود فى ListView او لا و يتم حذف من الست او اضافة الجديد بدون عمل تحديث للست
ودى صورة للمشكلة ادخل الاداء
كود :
Private Sub BackgroundWorker2_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker2.DoWork
Dim con As New System.Data.SqlClient.SqlConnection("Data Source=DESKTOP-SNS2QF4;Initial Catalog=SpicyMessenger;Integrated Security=True")
If con.State = ConnectionState.Open Then con.Close()
con.Open()
Dim cmd As New SqlCommand("SELECT publicroom.id,publicroom.nameroom,useraddnew.id,useraddnew.surnameandname,useraddnew.img FROM publicroom INNER JOIN useraddnew ON useraddnew.id = publicroom.id WHERE publicroom.nameroom =('" & Me.Label1.Text.ToString & "')", con)
Dim da As SqlDataReader = cmd.ExecuteReader
Me.ListView1.Items.Clear()
Form1.ListView1.Columns.Add("surnameandname")
Form1.ListView1.GridLines = True
Do While da.Read = True
Dim friendid As Integer = da("id")
Dim friendimg As Byte() = da("img")
Dim namefriend As String = da("surnameandname")
ImageList1.Images.Add(friendid.ToString, ImgFromByte(friendimg))
Dim i As New ListViewItem(namefriend, friendid.ToString)
ImageList1.Images.Add(friendid.ToString, ImgFromByte(friendimg))
i.SubItems.Add(friendid)
ListView1.Items.Add(i)
Loop
If con.State = ConnectionState.Open Then con.Close()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
BackgroundWorker2.RunWorkerAsync()
End Sub
قال تعالى : يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ