اضافه کردن کامپوننت به صورت dynamic

[mahak_f]

توی برنامه نویسی با VB6 میشه به صورت dynamic و طبق خواسته ی کاربر به فرم کامپوننتی اضافه کرد؟
مثلا توی برنامه ای که می نویسم به صورت پیش فرض فقط یک combo box روی فرم قرار داره.حالا میخوام اگر کاربر خواست مورد دیگه ای رو هم انتخاب کنه یه combo box دیگه روی فرم به صورت پویا اضافه شه.

[mahak_f]

هیشکی نیست به من جواب بده؟

[MM_Mofidi]

همینجا بگرد قبلا جواب داده شده باید به dim مربوط به اشیاء فرم یکی اضافه کنی

[mpmsoft]

سلام دوست عزیز و چنین کاری رو برای یک نرم افزار جامع املاک به سفارش دبی کردم

شما می خوای کاربر بتونه چندین کنترل مثل کمبو و یا هرچیز دیگه خودش روی فرم اضافه کنه و بتونه با اون کنترل کار کنه یا اونو حرکت بده و جالب اینجاست که برای هر کمبو که ایجاد می شه کدی بنویسی




برای این کار شما باید به کنترل ها اندیس بدی و بوسیله کدی زیر یک کنترل اضافه کنی

()Private Command1_Click
(Load Combo1(1
Combo(1).visible=true
End Sub

حتا می تونی یک For بذاری و بره تو بانکو بگرده و از تو بانک مقادیر انتخاب شده یک تکست باکس بذاره

For i=1 to rs.recordcount
(load txt(i
txt(i).visible=true
(txt(i).text =rs("name"
next i