تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] listview اضافة عمود مخفى
#1
Question 
السلام عليكم قومت و عمل كود يعرض رقم و صور ادخل listview و اريد
عرض id بشرط يكون مخفى و عند الضغط على الرقم يتم اظهر id داخل textbox
هذا هو الكود المستخدم الذى اريد التعديل عليه وشكرا ليكم
كود :
Public Sub firendview(ByVal listview As ListView)
       Dim con As New System.Data.SqlClient.SqlConnection("Data Source=DESKTOP-SNS2QF4;Initial Catalog=adduser;Integrated Security=True")
       If con.State = ConnectionState.Open Then con.Close()
       con.Open()
       Dim ds As New DataSet
       ds.Clear()
       Dim da As New SqlClient.SqlDataAdapter("select * from idfriends where (iduser=" & Form1.Label6.Text & ")" & "", con)
       Try
           listview.Items.Clear()
           Dim dt As New DataTable
           da.Fill(dt)

           Dim ImageList1 As New ImageList With {.ColorDepth = ColorDepth.Depth32Bit, .ImageSize = New Size(32, 32)}
           listview.SmallImageList = ImageList1
           listview.LargeImageList = ImageList1

           For Each row As DataRow In dt.Rows
               Dim item As New ListViewItem(row.Item("idfriends").ToString.Trim)
               ImageList1.Images.Add(New ImageConverter().ConvertFrom(row.Item("imguser")))
               item.ImageIndex = ImageList1.Images.Count - 1
               item.ForeColor = Color.SteelBlue
               listview.Items.Add(item)
               Dim grp As ListViewGroup = New ListViewGroup("Online")
               listview.Groups.Add(grp)
               item.Group = listview.Groups(grp.Name)

           Next

       Catch ex As Exception
           MsgBox(ex.Message, MsgBoxStyle.Critical, "alert")

       End Try
     
   End Sub

برجاء المساعدها
قال تعالى : يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ
الرد
تم الشكر بواسطة:
#2
يارب يارب يارب يارب
قال تعالى : يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ
الرد
تم الشكر بواسطة:
#3
PHP كود :
Dim item As New ListViewItem()
item.Tag row.Item("idfriends").ToString.Trim 
PHP كود :
Private Sub listview_SelectedIndexChanged(ByVal sender As ObjectByVal e As EventArgsHandles listview.SelectedIndexChanged
    
Try
        textbox.Text listview.SelectedItems(0).Tag
    
Catch ex As Exception
        
'MessageBox.Show(ex.Message)
    End Try
End Sub 
الرد
تم الشكر بواسطة: alims



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم