واضح آرشیو وب فارسی:سایت ریسک: Blue Rose23-05-2006, 04:17 AMسلام ممنون ميشم اگه به اين 2 تا سوال جواب بديد؟ 1-) چطوري ميتونم محتويات يک فيلد ديتا بيس رو در کومبوباکس قرار بدم 2-) تو یه پروژه اکتیوایکس (زیاد هم مهم نیست که اکتیوایکس باشه) 3تا عکس با سایز 67*67 داریم روی هر کدوم که میریم سایزش به 100*100 تغییر پیدا میکنه تصاویر در هر حالتی باید وسط صفحه باشند(به این نگاه کنید) Http://arashi2.persiangig.com/NewProject.rar tomcat23-05-2006, 05:36 AMدر مورد سوال اول باید بگم که شما باید از dbcombo استفاده کنید کارتون راحت تر میشه . سوال دوم هم چیزی ازش نفهمیدیم میشه بیشتر توضیح بدین . Blue Rose23-05-2006, 05:46 AMدر مورد سوال اول باید بگم که شما باید از dbcombo استفاده کنید کارتون راحت تر میشه . سوال دوم هم چیزی ازش نفهمیدیم میشه بیشتر توضیح بدین . سلام اگه میشه در مورد DBCOMBO یه توضیحی بدین تا حالا اسمش به گوشم نخورده در مورد سوال دوم هم 3 تا عکس پیش هم وسط فرم داریم روی هر عکس که میری اندازه طول و ارتفاعش 2 برابر میشه موس رو که از روش بر میداری هم بر میگرده به حالت اولش تو سورسی که گذاشتم هر چهار تا حالت رو توضیح دادم حالتی که موس رو هیچ کدوم نیست بعدش رو اولیه تا آخر با تشکر amin.pz23-05-2006, 09:53 PMبرای این کار من پیشنهاد میکنم که اطلاعات فیلد را تک تک بخوانید و در combo box اضافه كنيد براي اين كاراز متد index در رويداد record setاستفاده كنيد tomcat24-05-2006, 05:29 AMدوست عزیز یه کامپوننت به نام Microsoft Datalist 6 وجود داره که باید اضافه کنید . اگر در حالت Enterprise هستید احتیاجی به اضافه کردن ندارید چون به صورت پیش فرض اضافه شده ولی اگر در حالت Standard هستید باید اضافه بشه . در ضمن شما از چه پایگاه داد ای استفاده می کنید ؟ و از چه رابطی ؟ Blue Rose25-05-2006, 04:17 AMسلام خیلی ممنون بخاطر جوابها اما من تونستم مشکل اول رو اينطوري حل کنم Dim I As Integer Dim Cap As String Dim nGro As Integer rs.Open "[BlueRose]", db, adOpenStatic, adLockReadOnly For I = 0 To rs.RecordCount If rs.EOF Then Exit For If Not IsNull(rs![Name]) Then Cap = rs![Name] If Not rs.EOF Then rs.MoveNext If Not rs.RecordCount = 0 Then CmbName.AddItem Cap, nGro nGro = nGro + 1 End If Next rs.Close CmbName.ListIndex = 0 البته من قبلا بوسيله کنترل Data کار ميکردم واسه همين اين تغيير روش دو تا مشکل ديگه واسم پيش اورد وقتي از کومبو باکس يه آيتمي (Name) رو انتخاب ميکنم ميخوام فيلد (Age) همون ID رو تو تکست باکس ببينم يا فيلد (Country) همون ID رو تو ليست باکس ببينم يه چيز ديگه ميخوام با زدن يگ دگمه فقط آيتمهايي (Name) در کومبو ديده بشه که مثلا (Country) اونها Iran باشه ممنون ميشم اگه کمکم کنيد در ضمن مشکل اون اکتيوايکس هم حل شد حالا گير کردم تو اينکه چطوري انتخابيش کنم مثلا کاربر بتونه رنگ پيش زمينه واسش انتخاب کنه يه مقاله انگليسي گير اوردم دارم باش ور ميرم اينم ادرسش اگه خواستيد سورس و اکتيوايکس هاي جالبي داره قسمت اول در 14 صفحه (http://cuinl.tripod.com/tutorials/ocx-11.htm) قسمت اول در 7 صفحه (http://cuinl.tripod.com/tutorials/ocx-21.htm) Blue Rose30-05-2006, 08:44 AMسلام خیلی ممنون بخاطر جوابها اما من تونستم مشکل اول رو اينطوري حل کنم Dim I As Integer Dim Cap As String Dim nGro As Integer rs.Open "[BlueRose]", db, adOpenStatic, adLockReadOnly For I = 0 To rs.RecordCount If rs.EOF Then Exit For If Not IsNull(rs![Name]) Then Cap = rs![Name] If Not rs.EOF Then rs.MoveNext If Not rs.RecordCount = 0 Then CmbName.AddItem Cap, nGro nGro = nGro + 1 End If Next rs.Close CmbName.ListIndex = 0 البته من قبلا بوسيله کنترل Data کار ميکردم واسه همين اين تغيير روش دو تا مشکل ديگه واسم پيش اورد وقتي از کومبو باکس يه آيتمي (Name) رو انتخاب ميکنم ميخوام فيلد (Age) همون ID رو تو تکست باکس ببينم يا فيلد (Country) همون ID رو تو ليست باکس ببينم يه چيز ديگه ميخوام با زدن يگ دگمه فقط آيتمهايي (Name) در کومبو ديده بشه که مثلا (Country) اونها Iran باشه ممنون ميشم اگه کمکم کنيد در ضمن مشکل اون اکتيوايکس هم حل شد حالا گير کردم تو اينکه چطوري انتخابيش کنم مثلا کاربر بتونه رنگ پيش زمينه واسش انتخاب کنه يه مقاله انگليسي گير اوردم دارم باش ور ميرم اينم ادرسش اگه خواستيد سورس و اکتيوايکس هاي جالبي داره قسمت اول در 14 صفحه (http://cuinl.tripod.com/tutorials/ocx-11.htm) قسمت اول در 7 صفحه (http://cuinl.tripod.com/tutorials/ocx-21.htm) سلام یعنی اینقدر سوالم سخته که هنوز دارید بهش فکر میکنید لطفا اگه چیزی میدونید که شاید بدردم بخوره من رو بی نصیب نذاره با تشکر سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 532]