可以帮我一些吗

编程入门 行业动态 更新时间:2024-10-06 22:20:59
本文介绍了可以帮我一些吗的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧! 问题描述

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.

更多推荐

可以帮我一些吗

本文发布于:2023-11-02 06:22:56,感谢您对本站的认可!
本文链接:https://www.elefans.com/category/jswz/34/1551609.html
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。
本文标签:帮我

发布评论

评论列表 (有 0 条评论)
草根站长

>www.elefans.com

编程频道|电子爱好者 - 技术资讯及电子产品介绍!