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

نسخة كاملة : اريد select check item ---
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كود :
 For i As Integer = 0 To CheckedListBox1.CheckedItems.Count - 1
dim sa As String = "SELECT  ID,NAME ,SUM(S_PRICE) AS S_PRICE ,SUM(S_COUNT)AS S_COUNT FROM SubGROUB_SALES"&
WHERE  id = [color=#ff3333]'" &CheckedListBox1.CheckedItems(i).Value & "'[/color] )  "

----------------------
هذا الكود لايعمل
السلام عليكم

ما عمل هذا الكود، ليتم تصحيحه بالكود المناسب؟

هذا الكود قد يفي بالغرض بدون For على اساس ان نوع العمود id رقمي
كود :
Dim sa As String = _
   " SELECT  [ID], [NAME], SUM([S_PRICE]) AS [S_PRICE], SUM([S_COUNT]) AS [S_COUNT] " & _
   " FROM [SubGROUB_SALES] " &  _
   " WHERE  [id] = " & CheckedListBox1.CheckedItems(0) & " )  "

ولكن الموضوع يحتاج توضيح اور ارفاق مشروع
عندي ckecklist box اريد جملة select حسب العناصر المختارة من ال cheklist كيف اممر قيمة checklist الي sql
ضع مشروعك لإيجاد الكود المناسب.
For i As Integer = 0 To CheckedListBox1.CheckedItems.Count - 1
ماذا لو فككت المعادلة
لنفترض انك اختار عنصرا واحدا كيف ستكون الجملة
for i=0 TO i=1-1
واذا كان عدد العناصر المختارة يساوي صفر
تكون بالشكل التالي
for i=0 TO i=-1
ربما هذا هو السبب