پرفروش ترين
برترين
آخرين محصولات فروشگاه
فایل الکترونیکی آموزش اکسل پیشرفته ۲۰۱۰
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
یوزرفرم پیشرفته -Advanced  User Form
داشبورد (مقدماتی) – Dashboards(Elementary)
ابزارهای اعتبار سنجی و اخطار دهنده
بسته آموزشی userform
مدیریت و کنترل خطا در اکسل
توابع متنی
گرافیک در اکسل
جزوه آموزشی جداول و نمودارهای پاشنه ای
فایل آموزشی نحوه تهیه فرمت عددی دلخواه یا custom number format cell
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
نمایش نتایج: از شماره 1 تا 1 , از مجموع 1

موضوع: نکات برنامه نویسی در اکسس

  1. #1

    آخرین بازدید
    03 _ 01 _ 2018
    تاریخ عضویت
    January_2018
    نوشته ها
    1
    امتیاز
    10
    سپاس
    0
    سپاس شده
    0 در 0 پست

    نکات برنامه نویسی در اکسس

    تو این بخش میخوام نکاتی رو که خودم روز مره و هنگام برنامه نویسی بهشون برخورد میکنم رو بنویسم
    این بخش از آموزش اصلی سایت جداست
    تغییر شکل آیکن ماوس
    برای تغییر شکل آیکن ماوس از این دستور استفاده می شود:
    Screen.MousePointer = 0
    تغییر به شکل ساعت شنی
    Screen.MousePointer = 11


    Setting De******ion
    0 (Default) The shape is determined by Microsoft Access حالت عادی
    1 Normal Select (Arrow)
    3 Text Select (I-Beam)
    7 Vertical Resize (Size N, S)
    9 Horizontal Resize (Size E, W)
    11 Busy (Hourglass) ساعت شنی
    --------------------------------------------------------------------------------------
    .
    فارسی کردن کیبرد در هنگام ورود اطلاعات
    فکر می کنم با کمک این تابع API خواسته دوستمون برآورده بشه . البته اینطور که من متوجه شدم ایشون در نظر دارن که کاربر کلاً با زبان فارسی ثبت اطلاعات انجام بده .
    این کد رو به رخداد On Open فرم استارت آپ برنامه اضافه کنید بنابراین وقتی برنامه باز بشه زبان سیستم شما به فارسی تبدیل میشه و در خلال کار با برنامه اگر زبان دستی تغییر داده نشه تا انتها فارسی باقی خواهد بود حتی در زمان ورود داده درخواستی از سمت Query .


    Private Declare Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As Long, ByVal flags As Long) As Long
    Private Sub Form_Load()
    Call ActivateKeyboardLayout(1, 1)

    End Sub
    -------------------------------------------------------------------------------------
    غیر فعال کردن پیغام های خطا یا آپدیت کوئری

    DoCmd.SetWarnings False...DoCmd.SetWarnings True------------------------------------------------------------------------------------خودکار پر شدن ادامه کمبو باکس
    من یک کمبو باکس رو به یه جدول وصل کردم و می خواهم ببینم می توانم این کمبو رو به گونه ای تغییر دهم که با وارد کردن ابتدای یک آیتم بصورت اتومات بقیه موارد پر شود سپاسگزارم
    کد:
    comboBox1.AutoCompleteSource = AutoCompleteSource.ListItems;
    comboBox1.AutoCompleteMode = AutoCompleteMode.Append;
    ------------------------------------------------------------------------------------
    جهت دادن خروجی اکسل :
    با دو دستور می توانید این کار را انجام بدهید.
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "TableName", "C:\Eee.xls"

    DoCmd.OutputTo acOutputTable, "ObjectName", acFormatXLS, "C:\EEEEE.xls"
    روش دوم بهتره ، چون می تونید هم کووری و هم جدول و هم ریپورت و غیره ارسال کنید
    برای اطلاعات بیشتر کلمه Output را در قسمت برنامه نویسی انتخاب کنید و دکمه F1 را بزنید تا Help مربوط به همه موارد را ببینید.
    در صورتی که مسیر داده نشود ، خود برنامه از شما سوال خواهد کرد.
    این مثال در مورد خروجی یک گزارش است:

    Private Sub Command37_Click()
    On Error GoTo Err_Command37_Click

    Dim stDocName As String

    stDocName = "rpt_Wage"
    DoCmd.OutputTo acReport, stDocName, acFormatXLS

    Exit_Command37_Click:
    Exit Sub

    Err_Command37_Click:
    MsgBox Err.De******ion
    Resume Exit_Command37_Click

    End Sub
    در مثال زیر خروجی از یک جدول را بررسی کرده ایم:
    Private Sub Command37_Click()
    On Error GoTo Err_Command37_Click

    Dim stDocName As String

    stDocName = "tbl__LCSS_Part"
    DoCmd.OutputTo acOutputTable, stDocName, acFormatXLS

    Exit_Command37_Click:
    Exit Sub

    Err_Command37_Click:
    MsgBox Err.De******ion
    Resume Exit_Command37_Click

    End Sub

    -*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-نکات روزانه و کوچک


    اگر در لیست باکس اطلاعات خالی باشد ، موقع تبدیل به تکست باکس مقدار نول را میدهد.
    اگر مقدار عددی روی Double تنظیم نشود ، آنگاه مقادیر اعشاری را ذخیره نمیکند.
    غصه نخور، قصه نویس خداست...!!

  2.  


اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. تابع صحت کد ملی در اکسس
    توسط reza.rh در انجمن سوالات اكسس - Access Questions
    پاسخ ها: 2
    آخرين نوشته: 15 _ 04 _ 2016, 02:03
  2. نمونه برنامه برنامه نویسی سی شارپ با بانک اطلاعاتی اکسس
    توسط Amir_Kouhkan در انجمن برنامه نویسی در اکسس
    پاسخ ها: 2
    آخرين نوشته: 12 _ 08 _ 2015, 10:35
  3. محاسبات در اکسس
    توسط پیام در انجمن سوالات اكسس - Access Questions
    پاسخ ها: 10
    آخرين نوشته: 31 _ 01 _ 2014, 11:33
  4. مرورگر وب در فرم اکسس
    توسط zoobin در انجمن سوالات اكسس - Access Questions
    پاسخ ها: 2
    آخرين نوشته: 21 _ 01 _ 2014, 09:22
  5. مفاهیم اولیه کنترل خطا در اکسس
    توسط ~M*E*H*D*I~ در انجمن برنامه نویسی در اکسس
    پاسخ ها: 0
    آخرين نوشته: 10 _ 01 _ 2014, 11:39

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

انجمن اكسل ايران , اكسل , اكسس , سوال و جواب اكسل , سوال اكسس , انجمن اكسل ايران , توابع اكسل, آموزش اكسل, آموزش اكسس, VBA, ويژوال بيسيك

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است
با ما در تماس باشيد