05-02-20, 01:48 AM
(05-02-20, 12:40 AM)SnTnt كتب :مرحبا يا ايها القائد![]()
تفضل لقد قمت بالتعديل على الكود واصبح مثل ما اردت
ضع هاذا الكود في زر الحذف يا ايها القائد![]()
كود :
Try
Dim vb4arb As String = "C:\Windows\playlest\sami.txt"
Dim Line As Integer = ListBox1.SelectedIndex + 1
Dim lines As List(Of String) = System.IO.File.ReadAllLines(vb4arb).ToList
lines.RemoveAt(Line - 1)
System.IO.File.WriteAllLines(vb4arb, lines)
ListBox1.Items.RemoveAt(ListBox1.SelectedIndex)
Catch ex As Exception
MsgBox("هل حددت الخيار الذي تريد حذفه ؟")
End Try
واضفت بعض الاشياء
شكرا لمساعدتك لنا ونحن سنقوم بالمعروف دائما
الله يكرم أصلك الطيب أخى الكريم ويبارك بعمرك..
المشكلة أننى إهتممت أكثر بالتعامل مع الويب لآتعلم ما يخصنى وتركت الباقى وهذا خطأ كبير طبعا
ولآجل هذا دائما أقول لمن يريد الإلمام باللغة أن لا يهتم بجزء ويترك الباقى كما فعلت أنا ولآجل
هذا بقع فى أشياء بسيطة ولكنى فعلت هذا لظروف شديدة لا يعلمها الا الله...
يعنى لستُ قائد كما تتخيلنى
جارى التجربة أخى.


