ورود

View Full Version : آموزش: تغییر بک گراند کانتینیوزفرم اکسس بر اساس فیلد


padide55
شنبه 25 بهمن 1399, 09:18 صبح
با سلام
فایل نمونه
شما میتوانید بک گراند فرم کانتینیوز خود را بر اساس دیتای وارد شده در فیلدها تغییر دهید

کد مربوطه




Private Sub Detail_Paint()
Dim lngcolor1 As Long, lngcolor2 As Long
Dim lngcolor3 As Long, lngcolor4 As Long

lngcolor1 = RGB(220, 220, 220)
lngcolor2 = RGB(225, 225, 225)
lngcolor3 = RGB(240, 240, 220)
lngcolor4 = RGB(245, 245, 225)

If selectedf = True Then
Detail.BackColor = RGB(255, 10, 10)
Detail.AlternateBackColor = RGB(255, 10, 10)
Else
If sabt = True Then
Detail.BackColor = lngcolor1
Detail.AlternateBackColor = lngcolor2
Else
Detail.BackColor = lngcolor3
Detail.AlternateBackColor = lngcolor4
End If
End If

End Sub



change backcolor of continuse form ms accees according to field value
Conditional Formatting form in ms access
محمد رضا بهبودی
یک شنبه 26 بهمن 1399, 07:25 صبح
با سلام و احترام خدمت استاد گرامی
مطلب جالبی بود ولی در سیستم من به شدت سرعت عملکرد ان پایین است و عملا امکان استفاده از ان وجود ندارد.البته ممکن است مشکل از سیستم من باشد
reza_1199
یک شنبه 26 بهمن 1399, 17:56 عصر
من هم چک کردم و به نوعی سرعت عملکرد پایینه متاسفانه
padide55
یک شنبه 26 بهمن 1399, 18:04 عصر
این روش رو روی یک برنامه دیگه تست کردم مشکلی نداشت .
باز هم دوستان اگر روش دیگری این کار رو میشه انجام داد راهنمایی بفرمایند .
البته میشه یک لیبل در بک گراند گذاشت و بر اساس متن داخل فیلد .رنگ لیبل تغییر کنه.
ولی میخوایم این کار با تغییر رنگ فرم انجام بشه .
reza_1199
یک شنبه 26 بهمن 1399, 18:15 عصر
جناب آقای پدیده ضمن خسته نباشید و دست مریضاد من تو برنامه ای ار لیبل استفاده کردم ولی خوب اونم حین استفاده سرعت عملکرد رو پایین میاره ولی در کل کار شما ایده و جذابیت خودشو داره و واقعا ستودنی ممنون
mazoolagh
دوشنبه 27 بهمن 1399, 08:50 صبح
در سیستم من به شدت سرعت عملکرد ان پایین است و عملا امکان استفاده از ان وجود ندارد.البته ممکن است مشکل از سیستم من باشد



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


این یک روش مرسوم و شناخته شده است، یک میلیون رکورد هم که داشته باشید تاثیری در سرعت نداره.
چون رخداد paint فقط وقتی رکورد نمایش داده میشه اتفاق میفته.

طراحی فرم تون مشکل داره.
طراحی فرم رو بررسی کنین
mazoolagh
دوشنبه 27 بهمن 1399, 08:51 صبح
من تو برنامه ای ار لیبل استفاده کردم ولی خوب اونم حین استفاده سرعت عملکرد رو پایین میاره
مطلقا نیازی نیست و کار نادرستی هست.
همین روش رو استفاده کنین.
ariayekta
دوشنبه 18 اسفند 1399, 14:43 عصر
سلام وقت بخیر
فقط خواستم تشکر کنم بدرد من یکی که خیلی خورد خیلی نیتز داشتم همیشه با کلی دردسر از لیبل استفاده میکرددم