نحوه کار با چک باکس [بایگانی]

evil boy

چهارشنبه 25 مرداد 1391, 09:49 صبح

سلام
من چندتا چک باکس دارم،میخوام وقتی مثلا چک باکس 1 تیک خورد "1" رو توی گرید نمایش بده، وقتی چک باکس 2 تیک خورد "2" رو ذخیره کنه به همین ترتیب تا آخر و وقتی هم مثلا چک باکس 1 و چک باکس 2 با هم تیک خورد توی گرید 1 و 2 رو با هم نمایش بده مثلا بزنه 1 - 2
ممنون

evil boy

پنج شنبه 26 مرداد 1391, 10:44 صبح

کسی راهنمایی نمیکنه؟

m.4.r.m

پنج شنبه 26 مرداد 1391, 15:18 عصر

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

evil boy

پنج شنبه 26 مرداد 1391, 17:10 عصر

یکسری فیلم دارم که داری لیست میگیرم، دوتا فیلد دارم یکی نام فیلم و یکی هم سبک فیلم که سبک فیلم شامل (حادثه ای،رزمی،خانوادگی و ...) میشه،اول آپشن باتن گذاشته بودم با این کد

If Option1.Value = True Then k = "åíÌÇäí"
If Option5.Value = True Then k = "ÑÒãí"
If Option6.Value = True Then k = "ÎÇäæÇÏí"
DataEnvironment1.rsskhareji!sabk = k

که مشکلی هم نبود الان میبینم بعضی فیلم 2 یا 3 تا سبک با هم دارن مثلا حادثه ای و تخیلی که در این صورت دیگه نمیشه از آپشن استفاده کرد
ممنون

just4froum

پنج شنبه 26 مرداد 1391, 19:35 عصر

با سلام :

من دقیقا نفهمیدم مشکلت کجاست ؟

خوب طرز استفاده از چک باکس مثل آپشن هست. مثلا

If Check1.Value = vbChecked Then MsgBox "HELLO"

evil boy

جمعه 27 مرداد 1391, 09:20 صبح

تا این حد بلدم
این کدها رو ببینید

DataEnvironment1.rsskhareji.AddNew
DataEnvironment1.rsskhareji!Name = Text3.Text
If Option1.Value = True Then k = "حادثه ای"
If Option5.Value = True Then k = "رزمی"
If Option2.Value = True Then k = "ترسناک"
DataEnvironment1.rsskhareji!sabk = k
DataEnvironment1.rsskhareji.Update

من یک تکس باکس دام و 3 تا آپشن باتن که از تکس باکس نام فیلم رو میگیرم و با آپشن باتن ها سبک فیلم،مشکلی هم نیست توی آپشن باتن فقط یکی از این 3 تا باید انتخاب بشه برای همین این کد درست کار میکنه
حالا میخوام به جای آپشن باتن چک باکس بزارم چون بعضی فیلم ها دو یا 3 تا سبک داره مثلا (حادثه ای ، رزمی ، ترسناک)،اون موقع دیگه از این کد نمیشه استفاده کرد چون 3 تا انتخاب میشه نه یکی
میخوام بدونم الان چی باید بنویسم
ممنون

just4froum

جمعه 27 مرداد 1391, 12:31 عصر

با سلام :

من تاحالا با گرید کار نکردم ولی فکر کنم این کد درست باشه :

If Check1.Value = vbChecked Then K = K & "Hadesee"
If Check3.Value = vbChecked Then K = K & " Razmi"
If Check5.Value = vbChecked Then K = K & " Tarsnak"
DataEnvironment1.rsskhareji!sabk = LTrim(K)

evil boy

جمعه 27 مرداد 1391, 17:54 عصر

ممنون عزیز
فقط یک مشکل دیگه هست، وقتی 2 تا سبک رو انتخاب میکنم اینطوری مینویسه "حادثه ایرزمی" فاصله بینشون نمیندازه

just4froum

جمعه 27 مرداد 1391, 18:18 عصر

با سلام :

اگر در کد بالا دقت کنی من اینجحوری نوشتم :
" Razmi"

قبل از رزمی یه فاصله گذاشتم ، همینطور برای ترسناک.

شما هم اینطوری عمل کن درست میشه.

البته روش های متفاوت زیادی وجود داره.

jalalgholami

چهارشنبه 08 مهر 1394, 21:26 عصر

سلام من یک چک لیست باکس با نام روزهای هفته دارم و دو تا دیت تایم شمسی که تاریخ شروع و پایان رو داخلش انتخاب می کنم میخوام روزهای انتخاب شده رو با تاریخ شروع و پایان در دیتا گراید ویو ذخیره کنم و تاریخ شروع مطابق با نام همان روز باشه مثلا امروز چهارشنبه 1394/07/08