تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] تعديل بيانات خانة معينة في LIST BOX
#1
Question 
السلام عليكم
ممكن كود عند تحديد خانة معينة في LIST1 يتم تعديل البيانات الخاصة بالخانة بكتابة البيانات الجديدة في TEXT1 ويتم ادراج البيانات في الخانة المحددة

وسلام ختام Heart
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم...

كود :
If List1.ListIndex = -1 Then
    MsgBox "الرجاء تحديد بند من اللائحة"
    List1.SetFocus
Else
    List1.List(List1.ListIndex) = Text1.Text
End if

نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
الرد }}}}
تم الشكر بواسطة:
#3
اعطيك مثال عن ليست بوكس بثلاثة عناصر


كود :
Private Sub Command1_Click()
List1.List(i) = text1.text
End Sub

Private Sub List1_Click()
Select Case List1.ListIndex
Case 0
i = 0
text1.text=""
text1.Visible = True
Command1.Visible = True
Case 1
i = 1
text1.text=""
text1.Visible = True
Command1.Visible = True
Case 2
i = 2
text1.Visible = True
text1.text=""
Command1.Visible = True
End Select
End Sub

للايضاح نضيف واحد تكست و واحد كوماند و ننسخ الكود كما هو و السلام
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] ارجوا المساعدة في اظهار بيانات الفورم الأول في الفورم الثالث عبدالقادرعواد 2 69 22-04-17, 11:00 AM
آخر رد: عبدالقادرعواد
  [vb6.0] مساعدة في تعديل هاذا المثال Abdellah 5 139 20-04-17, 05:38 PM
آخر رد: Abdellah
  [سؤال] ادوات ربط قواعد بيانات اكسس أبوسعود 3 75 19-04-17, 02:53 PM
آخر رد: عبد العزيز البسكري
  [vb6.0] ممكن شرح طريقة ربط في قاعدة بيانات واحدة بجدولين MSHFlexGrid2+MSHFlexGrid1 عبدالقادرعواد 3 75 11-04-17, 06:08 PM
آخر رد: sendbad100
  [ تمّ الحل ] : تعديل كلمة المرور عبد العزيز البسكري 8 213 08-04-17, 09:33 PM
آخر رد: larbihamri
  هل من الممكن تعديل بيانات عدد من السجلات في الجدول دفعة واحدة كنونو 6 138 01-04-17, 03:56 PM
آخر رد: كنونو
  [ تمّ الحل ] : التّعامل مع بيانات جداول مختلفة عبد العزيز البسكري 5 133 18-03-17, 05:39 AM
آخر رد: Ahmed_Mansoor
  نقل بيانات الإكسيل إلى الاكسيس Abdellah 2 87 11-03-17, 06:08 PM
آخر رد: Abdellah
  رسالة خطأ بالبرنامج مربوط بقاعدة بيانات بأداة ADODC haniblack 4 312 06-03-17, 12:35 AM
آخر رد: YOUSEF_READH
  [vb6.0] تلوين سطر أو خانة في الليست فيو حسب قيم في عمود grimpmaster 8 683 27-02-17, 09:02 PM
آخر رد: grimpmaster

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


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