خاموش کردن مانیتور در دات نت 2005

[amirsajjadi]

با سلام
این برنامه رو با ویژوال بیسیک 6 نوشتم که مانیتور رو خاموش میکنه
حالا میخوام همین برنامه رو توی دات نت 2005 اجرا کنم
از Sendmessage ش ایراد میگیره میخواستم ببینم تابعی تو دات نت هست که کار Sendmessage رو انجام بده
------------------------------------------------------------
برنامه خاموش کردن مانیتور :



PrivateConstMONITOR_OFF = 2&
PrivateConstSC_MONITORPOWER = &HF170&
PrivateConstWM_SYSCOMMAND = &H112


PrivateSubForm1_Load(ByValsenderAsSystem.Object, ByValeAsSystem.EventArgs) HandlesMyBase.Load
SendMessage(Me.Handle.ToInt32, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_OFF)
EndSub
------------------------------------------------------------
با تشکر

[ghafoori]

دوست عزیز باید تابع sendmessage را تعریف کنی

Private Declare Function SendMessage Lib "user32" Alias "SendMessageW" (ByVal hwnd As Integer, ByVal wMsg As integer, ByVal wParam As Integer, ByVal lParam As Object) As Integer

[amirsajjadi]

تابع رو تعریف کردم تویه ماژول اینجا فراموش کردم بنویسم