کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

به اشتراک گذاری اطلاعات کسب شده در اکسس از سایت آفیس و سایت های تخصصی خارجی
کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

کلینیک فوق تخصصی اکسس ( کاربرد vba در اکسس )

به اشتراک گذاری اطلاعات کسب شده در اکسس از سایت آفیس و سایت های تخصصی خارجی

ویژگی AppIcon یا AppTitle در اکسس


ویژگی AppIcon یک عبارت رشته ای که نام یک فایل Bitmap یا Icon است. البته شامل مسیر !!!

راحت ترین راه برای تنظیم این ویژگی استفاده از انتخاب Application Icon در جعبه دیالوگ Access Options است.همچنین می توان با استفاده از ماکرو یا ویژوال بیسیک نیز آنرا تنظیم نمود.


برای تنظیم ویژگی AppIcon با استفاده از ماکرو یا ویژوال بیسیک می بایست یا اول در آن پنجره یادشده یکبار تنظیم نمود یا این ویژگی را طبق راه ها( ی )زیر ایجاد کرد :

در یک پایگاه داده اکسس ، می توان آن را با استفاده از مِتُد CreateProperty و الحاق کردنش به مجموعه پراپرتیزهای شئ آبجکت اضافه نمود.


نوشتاری این متد با آرگومان ها که همه Optional هستند نه اجباری و لازم


expression .CreateProperty(NameTypeValueDDL)


Type :

dbBoolean

dbText

dbLong

dbByte

Ex:Name="AppIcon";Type=dbText;Value=PathOfIconOrBitmap


خطای ۳۲۷۰ بدین معنی است که ویژگی پیدا نشد.

  • Error 3270 means that the property was not found.

بالا ساختن ویژگی بود و بعد استفاده از مِتُد زیر : 

اضافه کردن ویژگی جدید به مجموعه یا کالکشن پراپرتیزها

expression .Append(Object)




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

تابع SendMessageA و ارسال پیام ویندوزی WM_SETICON

wParam :

ICON_BIG=1

ICON_SMALL=0

lParam:

Null





























SetWindowTextA  hWndAccessApp,TitleText