• ¡Welcome to Square Theme!
  • This news are in header template.
  • Please ignore this message.
مهمان عزیز خوش‌آمدید. ورود عضــویت


امتیاز موضوع:
  • 9 رای - 2.44 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
Title: سورس کد خاموش کردن مانیتور Vb6
حالت خطی
#1
کد:
'=========================================================================
' =========== Paste the lines below into a standard module ===============

Option Explicit
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Any) As Long

Const SC_MONITORPOWER = &HF170&
Const MON_OFF = 2&
Const WM_SYSCOMMAND = &H112


Private Sub procTurnOff()

  SendMessage Me.hWnd, WM_SYSCOMMAND, SC_MONITORPOWER, MON_OFF

End Sub


'Now you can call the above procedure using a command button , say cmdTurnOff

'==============Add this code to the command button=======================

Private Sub cmdTurnOff_Click()

Call procTurnOff

End Sub

'====================End=================================================
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
 
پاسخ
  


پیام‌های این موضوع
سورس کد خاموش کردن مانیتور Vb6 - توسط Amin_Mansouri - 12-30-2011، 03:29 PM

موضوعات مشابه ...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  سورس کدهای ویژوال بیسیک Amin_Mansouri 8 18,466 05-15-2017، 04:35 PM
آخرین ارسال: minarad69
  سورس کد شماره گیری از مودم (ویژوال بیسیک 6 ) Amin_Mansouri 1 7,061 05-07-2017، 06:54 PM
آخرین ارسال: alikorg
  سورس کد کار با وب کم (ویژوال بسیک 6) Amin_Mansouri 1 8,572 04-20-2015، 10:10 PM
آخرین ارسال: hackert41389
  فیلتر کردن دیتا گرید aghamali 4 5,916 11-15-2014، 10:50 AM
آخرین ارسال: aghamali
  سورس کد ذخیره میخوام روشنا 5 10,423 06-25-2014، 08:46 AM
آخرین ارسال: Amin_Mansouri
  دریافت سورس سایت بصورت یونیکد aleas 3 5,970 06-07-2014، 09:19 PM
آخرین ارسال: aleas
  جدا کردن حروف عکس aleas 1 3,776 05-29-2014، 11:06 AM
آخرین ارسال: saeedh
  سورس جمع آوری وبلاگ های بروز میهن بلاگ saeedh 7 10,597 05-26-2014، 04:09 PM
آخرین ارسال: Amin_Mansouri
  سریعترین روش دریافت سورس سایت aleas 0 3,520 05-20-2014، 12:17 AM
آخرین ارسال: aleas
  مشکل در سورس ثبت نام tiktak990 3 6,826 05-13-2014، 10:43 AM
آخرین ارسال: tiktak990

پرش به انجمن:


Browsing: 2 مهمان