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

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

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

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

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

تولید عدد تصادفی یا رندوم ..... Randomize


minNum=1

maxNum=68

lucky=Int((maxNum - minNum + 1) * Rnd) + minNum




برای استفاده در لوپ و آرایه : 


Const spins=6

Dim lucky(spins)

Dim myNumbers as String

myNumbers=""

عبارت زیر در یک لوپ قرارداده می شود ، فرضا متغیر t در بازه یک تا عدد ثابت spins

lucky(t) = Int((maxNum - minNum + 1) * Rnd) + minNum


می توان داخل این لوپ تعریف شده ، لوپ دیگری زد تا اگرشماره تکراری در این لوپ ۶ تائی تولید شد از آن صرفنظر کرده و عدد دیگری جایگزین گردد البته از یک تا t-1 و این مرتبه جای متغیر t از i استفاده کنید که اگر (lucky(t)=lucky(i  بود دو مرتبه کد رندوم اجرا شود و i برابر صفر قرار گیرد ... 

myNumbers=myNumbers & "-" & lucky(t)









خانم سلطانی برای خانم فیروزه بنی صدر تصریح کرد که مسعود رجوی حتی به تجاوز جنسی به زنان در سطوح بالای فرماندهی و لایه اول زنان شورای رهبری بعداز مریم و ادامه دادن این روند با سایر زنان پرداخته است . خانم سلطانی به بحث درون سازمانی " هزار شین " که مخفف هزار عضو شورای رهبری می باشد پرداخت که نشان از یکی به یکی اضافه شدن این زنان بوده است که همه با توجیه های ایدئولوژیک صورت می گرفته است. در این رابطه خانم سلطانی اظهار کرد که امیدوار است افشاگریهای ایشان بعنوان عاملی بازدارنده، دکان رجوی را بسته باشد.  
خانم دکتر فیروزه بنی صدر نیز ضمن خوش آمدگویی و خرسندی از این دیدار با اشاره به کارکرد فرقه ها گفت:
     «این عملکرد برای من جای تعجبی ندارد، مگر فرقه اسماعیلیه نبود که رهبری این فرقه در ایام ماه رمضان همه مریدان خود را جمع کرده و می گوید که به من وحی شده است که الان باید شراب بنوشیم و زنان و مردان با یکدیگر آمیزش جنسی داشته باشند، بنابر این آقای رجوی نیز از این امر مستثنی نیست چرا که عینا به مثابه رهبر یک فرقه عمل می کند، بنابراین مطالب حزن انگیز شما نه تنها عجیب نیست ، بلکه روند قانونمند و تکاملی رشد یک فرقه است.از نظر من رجوی به خاطر " قدرت " همه این کارها را انجام داده است حتی برکناری مردان و دادن هژمونی به زنان و همین طور تجاوز به زنان سطح فرماندهی برای مشروط [وابسته؟] کردن در ابعاد بسا عمیق تر به خودش و اجرای دستوراتش بوده است.»