کد اینلاینش رو نتونستم بنویسم ولی این کد رو ببینین میشه؟
For Each element In dlgOpen.FileNames.Select(Function(f) IO.Path.GetFullPath(f)).ToArray
If Not Me.lstListBox1.Items.Contains(element) Then Me.lstListBox1.Items.Add(element)
Next
کد اینلاینش رو نتونستم بنویسم ولی این کد رو ببینین میشه؟
For Each element In dlgOpen.FileNames.Select(Function(f) IO.Path.GetFullPath(f)).ToArray
If Not Me.lstListBox1.Items.Contains(element) Then Me.lstListBox1.Items.Add(element)
Next
آخرین ویرایش به وسیله ASHKANLAEI : یک شنبه 22 دی 1398 در 19:25 عصر