تقييم الموضوع :
  • 1 أصوات - بمعدل 5
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] اريد كود لحفظ كل مافي ListView واكود تشغيل امر في البرنامج مره واحده
#1
Bug 
اريد كود تشغيل امر مره واحده فقط وكود حفظ كل ما في ListView



ارجو الأفاده ,

وشكراً Sad
الرد }}}}
تم الشكر بواسطة:
#2
كود :
Dim theListBox As ListBox = CType(sender, ListBox)
كود :
Dim itemString As String = CType(theListBox.Items(e.Index), String)
كود :
Dim x As Integer
For x = 1 To 50
ListBox1.Items.Add("Item " & x.ToString())
Next x

RolleyesRolleyesRolleyes
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد }}}}
تم الشكر بواسطة: vbnet
#3
(16-02-14, 12:40 AM)Genius Live كتب :
كود :
Dim theListBox As ListBox = CType(sender, ListBox)
كود :
Dim itemString As String = CType(theListBox.Items(e.Index), String)
كود :
Dim x As Integer
For x = 1 To 50
ListBox1.Items.Add("Item " & x.ToString())
Next x

RolleyesRolleyesRolleyes

اولا شكراً على ردك .
ثانيا انا اطل حفظ ما في ListView وليس ListBox
الرد }}}}
تم الشكر بواسطة:
#4
(16-02-14, 08:28 AM)vbnet كتب : أين تريد حفظها؟

في My Settings
الرد }}}}
تم الشكر بواسطة:
#5
حفظ ListView1.Items في My.Settings

منقول

أولاً: من القائمة Pjoject إختر خصائص المشروع ...WindowsApplication1 Properties
ثانياً: من التبويب Settings أضف عنصر جديد وسمه itms من نوع System.Collections.ArrayList بمجال User
ملاحظة: إن لم تجد System.Collections.ArrayList اختر ...Browse ثم وسع System.Collections واختر منها ArrayList
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If My.Settings.itms IsNot Nothing Then
        For Each itm As String In My.Settings.itms
            Me.ListView1.Items.Add(New ListViewItem(Split(itm, CChar(vbTab))))
        Next
    End If
End Sub

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    Dim itms As New List(Of String)
    For Each itm As ListViewItem In ListView1.Items
        itms.Add(String.Join(CChar(vbTab), (From sitm As ListViewItem.ListViewSubItem In itm.SubItems Select sitm.Text).ToArray))
    Next
    My.Settings.itms = New ArrayList(itms)
    My.Settings.Save()
End Sub
الرد }}}}
تم الشكر بواسطة: amedo
#6
(16-02-14, 05:26 PM)vbnet كتب : حفظ ListView1.Items في My.Settings

منقول

أولاً: من القائمة Pjoject إختر خصائص المشروع ...WindowsApplication1 Properties
ثانياً: من التبويب Settings أضف عنصر جديد وسمه itms من نوع System.Collections.ArrayList بمجال User
ملاحظة: إن لم تجد System.Collections.ArrayList اختر ...Browse ثم وسع System.Collections واختر منها ArrayList
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If My.Settings.itms IsNot Nothing Then
        For Each itm As String In My.Settings.itms
            Me.ListView1.Items.Add(New ListViewItem(Split(itm, CChar(vbTab))))
        Next
    End If
End Sub

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    Dim itms As New List(Of String)
    For Each itm As ListViewItem In ListView1.Items
        itms.Add(String.Join(CChar(vbTab), (From sitm As ListViewItem.ListViewSubItem In itm.SubItems Select sitm.Text).ToArray))
    Next
    My.Settings.itms = New ArrayList(itms)
    My.Settings.Save()
End Sub
أشكرك اخى الكود يعمل بشكل صحيح Smile
الرد }}}}
تم الشكر بواسطة: vbnet


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اريد طريقة صنع دائرة الحظ روليت Mina Botros 0 39 21-07-17, 02:59 PM
آخر رد: Mina Botros
  [VB.NET] اريد اداة tabcontrol تشبه تلك الموجوده في متصفح فايرفوكس او جوجل كروم qadar elzaman 1 58 19-07-17, 10:23 PM
آخر رد: Mina Botros
Sad [سؤال] مشكلة اغلاق البرنامج عند فتحة . MohamedAllam 11 238 19-07-17, 03:42 PM
آخر رد: MohamedAllam
  كيفية تشغيل وإغلاق الادوات الذكية لويندوز 7 عن طريق الكود رمضان محمد 3 462 18-07-17, 03:16 PM
آخر رد: رمضان محمد
  [سؤال] اريد كود لمعرفة الانترنت متصل ام لا Mina Botros 9 161 16-07-17, 02:55 PM
آخر رد: Mina Botros
  [سؤال] اريد كود عندما ادخل كلمة السر يضيف كلمات سر فى الاعدادات وتحفظ Mina Botros 0 47 15-07-17, 03:04 AM
آخر رد: Mina Botros
  اريد طريقة صنع برنامج يقوم بتسجيل الدخول الى الجميل Mina Botros 2 111 14-07-17, 08:26 PM
آخر رد: سعود
Exclamation [سؤال] اريد عندما اضغط على زر يظهرلى نافذة وضع كود Mina Botros 0 45 14-07-17, 02:57 PM
آخر رد: Mina Botros
  كود حماية البرنامج من النسخ والسرقة ramimohammed 5 328 10-07-17, 06:06 PM
آخر رد: sendbad100
  ارجو المساعده للانتهاء من مرحله كبيره فى البرنامج نبيل كونكت 0 46 10-07-17, 01:48 PM
آخر رد: نبيل كونكت

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


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