Refresh کردن شیء Screen

[M.T.P]

از دوستان کسی میدونه چطور میشه شیء Screen رو Refresh کرد؟
مشکل من در استفاده از متودهای Width و Height این شیء هست ، با شروع برنامه بدرستی عمل میکنه اما با اجرای یک بازی یا برنامه گرافیکی که Resolution رو تغییر میده این شیء به Resolution مربوطه Refresh میشه اما بعد از اتمام بازی و برگشتن Resolution ویندوز به حالت اول شیء Screen دیگه به همون حالت قبل یعنی رزولوشن بازی میمونه و Refresh نمیشه. :ناراحت:
البته با باز و بسته کردن برنامه درست میشه اما در برنامه ای که نوشتم شرایط طوری هست که کاربر نمیتونه برنامه رو ببنده و باید یه طوری Screen رو Refresh کرد.
اگه به نتیجه ای رسیدید لطفا راهنمایی کنید.
با تشکر.

[vbhamed]

سلام

از اين روش استفاده كنيد
واحد برگردونده شده پيكسل هست


Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long

Private Sub Form_Load()

MsgBox GetSystemMetrics(0)
MsgBox GetSystemMetrics(1)

End Sub