تشخیص خارج شدن برنامه از محیط صفحه نمایش

[vb2005]

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

Private Sub Timer1_Timer()
Picture1.Left = Picture1.Left - 100
End Sub

[bobrus]

شما Screen.Width و Screen.Height صفحه نمايش رو با me.top و me.left فرمت مقايسه كن اگه بزرگتر باشه يعني از صفحه خارج شده

[vb2005]

شما Screen.Width و Screen.Height صفحه نمايش رو با me.top و me.left فرمت مقايسه كن اگه بزرگتر باشه يعني از صفحه خارج شده

سلام دوست عزیزاگه ممکنه یه مثال بزنید،خودم ازدستور شرطی درتایمر استفاده کردم ولی بعضی مواقع عمل نمیکنه.

[bobrus]

به همين سادگي

If Me.Top < Screen.Height And Me.Left < Screen.Width Then

  Me.Top = Me.Top + 100

  Me.Left = Me.Left + 100

Else

  Me.Left = 0

  Me.Top = 0

End If