تقييم الموضوع :
  • 1 أصوات - بمعدل 5
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مشكله فى listbox
#1
Bug 
السلام عليكم اخوانى الكرام
كيف يمكننى اجعل listbox ينتظر
تنفيذ الاكواد فى التايمر
وينتقل للسطر الثانى
ولكن المشكله ان بعمل
Timer1.Enabled = True
Timer1.Interval = 10000

Next
ومجرد ميخلص الوقت ينتقل للسطر اللى تحت بدون ما ينتظر تنفيذ الاكواد اللى فى التايمر
الرد
تم الشكر بواسطة:
#2
.....

ما علاقة ListBox بـ Timer، لو وضعت الأكواد قد تتضح الصورة مع الشرح

.....
الرد
تم الشكر بواسطة:
#3
(27-06-14, 11:22 PM)vbnet كتب : .....

ما علاقة ListBox بـ Timer، لو وضعت الأكواد قد تتضح الصورة مع الشرح

.....

Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
For r = 0 To ListBox1.Items.Count - 1
ListBox1.SetSelected(r, True)
Label1.Text = "join"
Timer1.Enabled = True
Timer1.Interval = 5000


Next
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Timer1.Enabled = False
If Label1.Text.Contains("join") Then
ListBox2.Items.Add(ListBox1.SelectedItem & Label1.Text)
End If
End Sub


End Class



حط فى لست بوكس 1
1
2
3
4
5
6
7
8
9
10
وجرب
الرد
تم الشكر بواسطة:
#4
.....

كود :
Public Class Form1

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        For r = 0 To ListBox1.Items.Count - 1
            ListBox1.SetSelected(r, True)
            Label1.Text = "join"
            fun()

            ' هذين السطرين فقط لترى العملية بشكل بطئ
            Application.DoEvents()
            Threading.Thread.Sleep(500)

        Next
    End Sub

    Private Sub fun()
        If Label1.Text.Contains("join") Then
            ListBox2.Items.Add(ListBox1.SelectedItem & Label1.Text)
        End If
    End Sub

End Class

لم أفهم سبب استخدام التايمر Timer

.....
الرد
تم الشكر بواسطة: ابراهيم مراد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيف اقوم بعمل فلتر لبيانات في LISTBOX تم تعبئة البيانات من خلال قاعدة البيانات dametucorazon 3 62 08-07-18, 03:05 AM
آخر رد: elgokr
  كود تحويل ما في ListBox ل TextBox YousefOkasha 2 59 30-06-18, 11:50 AM
آخر رد: YousefOkasha
  [VB.NET] مشكله في كود بحث بنص مشابهه DOX.1 6 93 28-06-18, 03:52 PM
آخر رد: elgokr
  [سؤال] مشكله فى ادخال قاعد البيانات الي الفيجوال Mahmoud Nasser 1 131 10-06-18, 04:34 PM
آخر رد: elgokr
  [VB.NET] مشكله فى برنامج vb.net 2010 Mahmoud Nasser 8 142 08-06-18, 07:39 PM
آخر رد: elgokr
  التكرار في Listbox عن طريق Regex aftfm 22 2,676 03-06-18, 06:14 PM
آخر رد: mrnooo2000
  [VB.NET] كيف اجعل listbox تستوعب اكبر عدد ممكن من الكلمات او الارقام e-coder 3 134 06-05-18, 12:53 PM
آخر رد: viv
  [Acces2010] مشكله فى الاتصال بقاعدة البينات issamsaidd 2 110 04-05-18, 01:32 PM
آخر رد: issamsaidd
  [VB.NET] مشكله في كود " الفترة التجريبة " e-coder 11 331 31-03-18, 03:18 AM
آخر رد: سعود
  [سؤال] عندى مشكله بكود التعديل فى قاعده البيانات waleedsss 3 233 28-03-18, 12:31 AM
آخر رد: عبدالله الدوسري

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


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