View Full Version : Item Data
javadaskari
جمعه 05 مهر 1387, 13:28 عصر
سلام
1.کسي ميدونه معادل متد ItemData که مربوط به شي ListBox در VB 6 بود در VB 2005 چي ميشه؟
2.علت کار نکردن اين کد چيست؟ روي خط اول اشکال ميگرد.آيا حلقه for...each جور ديگري تعريف ميشود؟
For Each row In objDS.Tables("Table1").Rows
List1.Items.Insert(index, reader.GetString(1))
index += 1
Next
ALI TT
شنبه 06 مهر 1387, 00:14 صبح
توی هر دو سوالت : چه کار می خوای کنی ، می خوای خروجیت چی باشه ؟
* در ضمن برای نوشتم کدها در سایت از [CODE] استفاده کن . عکسشم توی نوار ابزاره ----> #
javadaskari
شنبه 06 مهر 1387, 09:29 صبح
ببخشيد کد مورد نظر را به صورت زير اصلاح ميکنم
For Each row In objDS.Tables("Table1").Rows
cbo1.Items.Insert(index, CStr(row("Name")))
index += 1
Next
در سوال اولي ميخواستم يکي از فيلد هاي جدول را به Listbox اضافه کنم و همچنين ID آن فيلد را هم در متد ItemData آن ذخيره کنم.چون ID ها به ترتيب 1 تا n نيست.از اين کار براي حذف و ويرايش استفاده ميکنم.
در سوال دوم هم نميدونم چرا ولي اگر بانکم را به Accsess تغييير دهم مشکل حل ميشود.بانک من در حال حاضر SQL 2005 است.حالا چگونه مشکل را حل کنم؟ با تشکر
شاپرک
شنبه 06 مهر 1387, 12:38 عصر
cbo1.Items.Add
ALI TT
یک شنبه 07 مهر 1387, 02:15 صبح
از این کد هم می تونی بجای حلقه ی For each استفاده کنی :
Dim ID As Integer
For i As Integer = 0 To DataSet1.Tables({نام جدول مربوط}).Rows.Count - 1
ListBox1.Items.Add(DataSet1.Tables(0).Rows(i)(فی لد مربوط)).ToString
ID = DataSet1.Tables(0).Rows(i)(فیلد آی دی)
.
.
.
Next
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.