مدت روشن بودن سیستم

مدت روشن بودن سیستم 

تابع زیر مدت زمانی که سیستم روشن است را برمی گرداند:

Private Declare Function GetTickCount Lib "kernel32" () As Long

این تابع را در قسمت General فرم تعریف کنید حال در رویداد Load فرم می نویسیم:

&Retval = GetTickCount

"MsgBox Str$(Fix(Retval / 60000)) + " Minutes you turned On PC

در بالا مقدار برگشتی تابع تقسیم بر 60000 می شود؛چون تابع بر حسب میلی ثانیه خروجی می دهد.

منتظر نظرات و پیشنهادات شما دوستان عزیز هستم...

کد مرلین جادوگر

ابتدا باید کنترلی به نام Microsoft Agent به فرم افزوده شود تا بتوانیم با Merlin ارتباط برقرار کنیم برای این کار روی نوار ابزار راست کلیک کنید و Component را کلیک کنید.(CTRL+T)

حال به دنبال کنترل Microsoft Agent Control 2.0 بگردید و آن را به فرم بیافزایید.

کنترل Ajent به

داروخانه ی پروردگار

داروخانه ی پروردگار

هویج حلقه شده شبیه چشم انسان است..مردمک و عنبیه و خط نوری که به چشم میرسد درست مانند چشم انسان میباشد.تحقیقات نشان میدهد که مصرف هویج باعث افزایش جریان خون در  عملکرد چشم میشود