منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : بعد ازنكم ممكن مساعد
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمت الله وبركته
ان مبتداء في برنمج فيجول بيسك وعيز كودي اضغط علي بوتون يمسح الارقام ال اعل من250في لست بوكس
وشكران مقدمان
السلام عليكم 
تفضل اخي 
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           For i As Integer = 0 To ListBox1.Items.Count - 1
               If CInt(ListBox1.Items(i)) > 250 Then
                   ListBox1.Items.RemoveAt(i)
               End If
           Next
       Catch ex As Exception

       End Try
   
   End Sub
(20-03-20, 05:59 AM)ابراهيم ايبو كتب : [ -> ]السلام عليكم 
تفضل اخي 
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           For i As Integer = 0 To ListBox1.Items.Count - 1
               If CInt(ListBox1.Items(i)) > 250 Then
                   ListBox1.Items.RemoveAt(i)
               End If
           Next
       Catch ex As Exception

       End Try
   
   End Sub

شكران ولله هو ده المطلوب بلزبط