اصلاح کد [بایگانی] - برنامه نویس

نسرین2000

چهارشنبه 11 دی 1392, 10:08 صبح

سلام
من اطلاعات یکی از جداول بانکم رو توسط تابع sreader خوندم حالا می خوام اطلاعات رو وارد سلولهای دیتا گرید کنم . کد زیر رو نوشتم ولی ارور می ده ؟
For i = 0 To grdhamrah.RowCount - 1
Form8.grdsearch.Item(i, 0) = sReader.GetValue(0)
Form8.grdsearch.Item(i, 0) = sReader.GetValue(1)
Form8.grdsearch.Item(i, 0) = sReader.GetValue(2)
Form8.grdsearch.Item(i, 0) = sReader.GetValue(3)
　
Next

sagggad

چهارشنبه 11 دی 1392, 10:21 صبح

سلام..
لطفا ارورش..؟:چشمک:

sagggad

چهارشنبه 11 دی 1392, 10:38 صبح

نسرین جان به کدت دقت کن:

For i = 0 To grdhamrah.RowCount - 1
Form8.grdsearch.Item(i, 0) = sReader.GetValue(0)
Form8.grdsearch.Item(i, 0) = sReader.GetValue(1)
Form8.grdsearch.Item(i, 0) = sReader.GetValue(2)
Form8.grdsearch.Item(i, 0) = sReader.GetValue(3)
Next

شما در این کد دارین Value یک فیلد از گرید ویو رو هر دفعه برابر یک Value مختلف از sReader میکنین..!!!یعنی در خط اول گفتین:

Form8.grdsearch.Item(i, 0) = sReader.GetValue(0)

حالا در خط دوم دقیقا همین فیلدرو برابر این مقدار کردید:

Form8.grdsearch.Item(i, 0) = sReader.GetValue(1)

در نتیجه این کار برای برنامه منطقی نیست.!!

نسرین2000

چهارشنبه 11 دی 1392, 10:50 صبح

من این کد رو برای دکمه جستجو نوشتم
اول نام خانوادگی را در تکس باکس می نویسم و بعد با دکمه جستجو از جدول مربوطه اطلاعاتی را که نام خانوادگیشون برابر مقدار وادر شده است می خونه
مثلا ممکنه چند تا نام خانوادگی رادمنش داشته باشیم بنابراین می خوام همه /انها را در دیتا گرید ویو نمایش بده
چیکار کنم ؟

sagggad

چهارشنبه 11 دی 1392, 10:57 صبح

آها متوجه شدم...
کدت رو به کد زیر تغییر بده انشاالله درست میشه:

For i = 0 To grdhamrah.RowCount - 1
Form8.grdsearch.Item(i, 0).Value = sReader.GetValue(0)
Form8.grdsearch.Item(i, 0).Value = sReader.GetValue(1)
Form8.grdsearch.Item(i, 0).Value = sReader.GetValue(2)
Form8.grdsearch.Item(i, 0).Value = sReader.GetValue(3)
　
Next

sagggad

چهارشنبه 11 دی 1392, 11:36 صبح

ضمنا شما برای چک کردن ایم موضوع باید If بذارید اینجوری که نمیشه!!!:متعجب: