این کد تک خطی مقدار زمان بارگذاری سیستم عامل را (بر حسب دقیقه) در قالب یک MsgBox به شما نمایش می دهد:
کد:MsgBox(My.Computer.Clock.TickCount \ 60000)
مدیر انجمن برنامه نویسی و رباتیک
این کد تک خطی مقدار زمان بارگذاری سیستم عامل را (بر حسب دقیقه) در قالب یک MsgBox به شما نمایش می دهد:
کد:MsgBox(My.Computer.Clock.TickCount \ 60000)
آخرین ویرایش توسط ravegoat در تاریخ 03-01-09 انجام شده است علت: بهینه سازی کد
Moein (08-03-13), SajjadKhati (22-06-18)
|
|
مدیر انجمن برنامه نویسی و رباتیک
با این کد می توان مقدار حافظه ی فیزیکی رایانه (مقدار RAM) بر حسب مگابایت به دست آورد و آن را در یک MsgBox نمایش داد:
کد:MsgBox(My.Computer.Info.TotalPhysicalMemory \ 1023 ^ 2)
مدیر انجمن برنامه نویسی و رباتیک
این کد در رویداد FormLoad برنامه قرار می گیرد و مسیر اجرای برنامه را بررسی می کند. اگر درایوی که برنامه از روی آن اجرا می شود از نوع CD Rom, CD Writer و ... نبود، برنامه با دستور End بسته می شود.
کد زیر را در رویداد FormLoad فرم اصلی قرار دهید:
کد:Dim appdrive As New IO.DriveInfo(Application.StartupPath.Substring(0, 2)) If appdrive.DriveType <> 5 Then End
1 کاربر در حال مشاهده این موضوع. (0 عضو و 1 میهمان)
Bookmarks