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اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات
