14-07-17, 01:48 AM
(آخر تعديل لهذه المشاركة : 14-07-17, 01:49 AM {2} بواسطة الماجيك مسعد.)
(14-07-17, 12:40 AM)ابو ليلى كتب : ما حاجتك في هذه
اعد قيمة منطقية True بدلاً عنهاPHP كود :
Return Item.Index
ولا انصحك باستخدام GoTo ستعاني من مشاكل معها
يمكنك تحويل Items الى (List(Of listViewItem و بالتالي الاستفادة من دعم Ling في هذا المجال
امثلة للاستخدام
PHP كود :
Private Function FindItem(ItemList As ListView, ColumnIndex As Integer, SearchString As String)
Dim query = ItemList.Items.Cast(Of ListViewItem)().Where(Function(item) item.SubItems(ColumnIndex).Text = SearchString)
For Each Itm In query
'Do Any Thing
Next
Dim query2 As IEnumerable(Of ListViewItem) = ItemList.Items.Cast(Of ListViewItem)()
Dim Found = From itm In query2
Where itm.SubItems(ColumnIndex).Text = SearchString
Select itm
'تعيد قيمة واحدة
'سترمي استثناء في حال لم تجد شيئ او وجدت اكثر من قيمة
Dim query3 = ItemList.Items.Cast(Of ListViewItem)().Single(Function(item) item.SubItems(ColumnIndex).Text = SearchString)
'تعيد اول قيمة
Dim query4 = ItemList.Items.Cast(Of ListViewItem)().First(Function(item) item.SubItems(ColumnIndex).Text = SearchString)
End Function
المشروع مرفق ؟؟![]()
اشكرك ابو ليلى لمرورك الطيب الى الموضوع
انا بحاجة للاندكس فقط
يعنى ابحث عن القيمة ولو موجودة يجبلى رقم الاندكس بتاعها لانى بستخدمه فى اشياء اخرى
كود البحث ليس به مشكلة ولكن المشكلة فى شروط if
ثالثا المشروع
http://www.elmagek.net/up/do.php?id=410
حمل المشروع وجرب تشغل الفورم هتلاقى ان شرط if
فيه مشكلة
مثال بسيط للمشكلة
نفترض انى عرفت شئ ما
dim x = 0
الان الشرط
if not x = 0 then
x = 5
else if x = 0 then
x = 55
end if
فى الشرط دا المفروض يدينى اكس = 55 صح؟
هذا ما نعرفه جميعا
ولكن فى مشروعى
سيعطينى اكس = 5 وليس 55
وهذه هى مشكلتى
وعندما تجرب انت المشروع ستجد هذه المشكلة
لتحميل المشروع
http://www.elmagek.net/up/do.php?id=410
لم اكن انوى استخداlم go to
ولم اكن سافعل كل هذه الشروط فى الكود
كان فقط شرطين
ولكن غلب امرى فاخدت اجرب كل الطرق
ولم اصل لشئ
6 ساعات متواصلة ولم افهم السبب
لذا لجئت هنا ربما احد منكم يفهمنى
واتمنى ان اكون على خطأ فى شئ ما

