本文介绍了可以帮我一些吗的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
If Not My.Computer.Screen.Bounds.Right - My.Computer.Screen.WorkingArea.Right = 0 Then End If If Not My.Computer.Screen.Bounds.Bottom - My.Computer.Screen.WorkingArea.Bottom = 0 Then ' I did hlep here If Not My.Computer.Screen.Bounds.Bottom - My.Computer.Screen.WorkingArea.Bottom = 0 Then If MousePosition.X < 20 Then Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width / 2, Screen.PrimaryScreen.WorkingArea.Height) Form2.Location = New Point(0, 0) ElseIf MousePosition.X > Screen.PrimaryScreen.WorkingArea.Width - (My.Computer.Screen.Bounds.Height - My.Computer.Screen.WorkingArea.Height) Then Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width / 2, Screen.PrimaryScreen.WorkingArea.Height) Form2.Location = New Point((Screen.PrimaryScreen.WorkingArea.Width / 2), 0) ElseIf MousePosition.Y < 20 Then Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height / 2) Form2.Location = New Point(0, 0) ElseIf MousePosition.Y > Screen.PrimaryScreen.WorkingArea.Height - (My.Computer.Screen.Bounds.Height - My.Computer.Screen.WorkingArea.Height) Then Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height / 2) Form2.Location = New Point(0, (Screen.PrimaryScreen.WorkingArea.Height / 2) - (My.Computer.Screen.Bounds.Width - My.Computer.Screen.WorkingArea.Width)) Else Form2.Hide() End If End If End If If Not My.Computer.Screen.Bounds.Top - My.Computer.Screen.WorkingArea.Top = 0 Then If MousePosition.X < 20 Then Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width / 2, Screen.PrimaryScreen.WorkingArea.Height) Form2.Location = New Point(0, My.Computer.Screen.Bounds.Height - My.Computer.Screen.WorkingArea.Height) ElseIf MousePosition.X > Screen.PrimaryScreen.WorkingArea.Width - (My.Computer.Screen.Bounds.Height - My.Computer.Screen.WorkingArea.Height) Then Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width / 2, Screen.PrimaryScreen.WorkingArea.Height) Form2.Location = New Point((Screen.PrimaryScreen.WorkingArea.Width / 2), My.Computer.Screen.Bounds.Height - My.Computer.Screen.WorkingArea.Height) ElseIf MousePosition.Y < 20 Then 'top Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height / 2) Form2.Location = New Point(0, (My.Computer.Screen.Bounds.Height - My.Computer.Screen.WorkingArea.Height)) ElseIf MousePosition.Y > Screen.PrimaryScreen.WorkingArea.Height - (My.Computer.Screen.Bounds.Height - My.Computer.Screen.WorkingArea.Height) Then 'button Form2.Show() Form2.Size = New System.Drawing.Size(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height / 2) Form2.Location = New Point(0, (Screen.PrimaryScreen.WorkingArea.Height / 1.82)) Else Form2.Hide() End If End If
推荐答案
否 您没有问任何问题,只是转储了一些不易阅读的代码,我非常怀疑有人会花时间去尝试您正在尝试做的事情以及您所遇到的问题,因为那是您应该做的事情告诉我们 . No You asked no question, just dumped some code which is not easy to read and I highly doubt anyone will take the time to go trhough what you''re trying to do and what your problems is as that is what you''re supposed to tell us.
更多推荐
可以帮我一些吗
发布评论