vb.net窗口外观 vbnet mdi窗体

用VB.NET轻松制作特效窗体

体是Windows应用程序vb.net窗口外观的基础 新一代的开发工具Visual Basic Net为设计制作窗体提供了更多简单而丰富的方法 无需再求助于复杂而易错的API函数 我们就可以轻松制作多种特效窗体 轻松制作透明窗体VB NET可以轻松制作出任一透明度的窗体 我们只要在窗体的 属性 窗口中 将 Opacity 属性设置为一个介于 （完全透明）与 （完全不透明）之间的值就可以了 Dim frm As FrmTrans = New FrmTrans()frm Opacity = frm ShowDialog() 轻松制作始终位于最上层的窗体在VB 中 要制作一个始终位于最上层的窗体我们只能求助于令人头痛的API函数 然而在 NET 中 我们只要简单设置窗体的 TopMost 属性就可实现同样效果了vb.net窗口外观！例如 Dim frm As frmTopMost = New frmTopMost()frm TopMost = Truefrm Show() 轻松制作不可见的窗体如果要编写一个不让别人发现的隐藏程序 制作不可见的窗体就是必须实现的第一步 窗体的可见性通常由 Visible 属性控制 但是 如果希望 Windows 应用程序的主窗体在应用程序启动时不可见 您将会发现将它的 Visible 属性设置为 False 的方法无效 窗体总会自己显示出来（这是因为 启动窗体的生存期决定了应用程序的生存期） 虽然如此 我们还是可以通过简单将应用程序的启动设置为一个模块 从而从窗体的生存期分出应用程序的生存期 轻松实现不可见的窗体 在下面这个例子中 窗体在特定的时间内自动隐藏 （ ）在 Visual Basic 中 右击项目并选择 添加模块 以将模块添加到 Windows 应用程序 （ ）在已添加的模块（或类）内 创建可作为项目启动对象的 Main 函数 Sub main()Dim f As New Form ()f Visible = FalseWhile Hour(Date Now) 如果当前时间早于 点 窗体自动隐藏Application DoEvents()End Whilef ShowDialog()End Sub 轻松编写托盘程序托盘程序作为一类特殊的窗体 其快捷图标显示在系统托盘中 窗体本身则隐藏不可见 在 NET之前版本的VB中编写托盘程序是十分困难的 但是VB NET提供的新的NotifyIcon组件却使VB初学者也能轻松编写一个这样的程序 新建 Windows应用程序 设置主窗体Opacity属性为 FormBorderStyle属性为None ShowInTaskbar属性为False 这样窗体将在启动后隐藏 在窗体上放置一个NotifyIcon组件NotifyIcon 一个ContextMenu（弹出菜单）组件ContextMenu 并根据需要为ContextMenu 添加菜单项 设置NotifyIcon 的ICON属性 这个图标就是应用程序出现在系统托盘中的快捷图标 设置NotifyIcon 的Text属性为 VB NET托盘程序 这就是鼠标移动到托盘图标时弹出的文字说明 设置NotifyIcon 的ContextMenu属性为ContextMenu 也就是右键单击快捷图标时的弹出菜单为ContextMenu OK 按F 运行！几乎不用编写代码 一个托盘程序就这样轻松实现了 lishixinzhi/Article/program/net/201311/13831

相关问答

Q1: vb.net 窗口样式的问题

'vb.net2008

'点击窗体Form1中Button1弹出Form2并使其保持在顶层

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

My.Forms.Form2.ShowDialog()

End Sub

End Class

'点击窗体Form2中Button1关闭Form2

Public Class Form2

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Me.Hide()

End Sub

End Class

'在进入程序编程后,在右侧 解决方案资源管理器中 文件名称上（如WindowsApplication1）点击鼠标右键--添加--Windows窗体（F）--再点弹窗上点[添加]就可添加新的窗体

Q2: 怎么用VB/VB.net/C#修改一个其他程序的窗口的边框样式？

      private const int GWL_STYLE = (-16);

      private const int GWL_EXSTYLE = (-20);

      private const uint WS_EX_LAYERED = 0x80000;

      private const uint WS_EX_TRANSPARENT = 0x20;

      private const uint WS_THICKFRAME = 262144;

      private const uint WS_BORDER = 8388608;

    

/// summary使指定 「 see cref="IntPtr"/ 句柄」 窗体 边框样式变为无边框。/summary

      public static uint 无边框窗体(IntPtr 句柄) {

          uint style = API_窗口.GetWindowLong(句柄, GWL_STYLE);

          style = ~WS_BORDER;

          style = ~WS_THICKFRAME;

          return API_窗口.SetWindowLong(句柄, GWL_STYLE, style); ;

      }

API窗口静态类

      [DllImport("user32", EntryPoint = "SetWindowLong")]

      public static extern uint SetWindowLong(IntPtr hwnd, int nIndex, uint dwNewLong);

      [DllImport("user32", EntryPoint = "GetWindowLong")]

      public static extern uint GetWindowLong(IntPtr hwnd, int nIndex);

修改窗口位置

/// summary

      /// 设置窗体的位置和大小。

      /// /summary

      /// param name="hWnd"/param

      /// param name="hWndInsertAfter"用于标识在z-顺序的此 CWnd 对象之前的 CWnd 对象。

      /// para/para如果uFlags参数中设置了SWP_NOZORDER标记则本参数将被忽略。可为下列值之一：

      /// para/paraHWND_BOTTOM：值为1，将窗体置于Z序的底部。如果参数hWnd标识了一个顶层窗体，则窗体失去顶级位置，并且被置在其他窗体的底部。

      /// para/paraHWND_NOTOPMOST：值为-2，将窗体置于所有非顶层窗体之上（即在所有顶层窗体之后）。如果窗体已经是非顶层窗体则该标志不起作用。

      /// para/paraHWND_TOP：值为0，将窗体置于Z序的顶部。

      /// para/paraHWND_TOPMOST：值为-1，将窗体置于所有非顶层窗体之上。即使窗体未被激活窗体也将保持顶级位置。/param

      /// param name="x"窗体新的x坐标。如hwnd是一个子窗体，则x用父窗体的客户区坐标表示/param

      /// param name="y"窗体新的y坐标。如hwnd是一个子窗体，则y用父窗体的客户区坐标表示/param

/// param name="Width"指定新的窗体宽度/param

/// param name="Height"指定新的窗体高度/param

      /// param name="wFlags"/param

      /// returns/returns

      [DllImport("user32.dll", CharSet = CharSet.Ansi, EntryPoint = "SetWindowPos")]

      public static extern int SetWindowPos(IntPtr hWnd, hWndInsertAfter hWndInsertAfter, int x, int y, int Width, int Height, wFlags wFlags);

      /// summary

      /// 调整指定 「 see cref="IntPtr"/ 句柄」 窗体的位置和尺寸。

      /// /summary

      /// param name="句柄"指定 「 see cref="IntPtr"/ 句柄」 窗体/param

      /// param name="x"横坐标/param

      /// param name="y"纵坐标/param

      /// param name="w"宽/param

      /// param name="h"高/param

      public static int 调整窗体(IntPtr 句柄, int x, int y, int w, int h) {

          return API_窗口.SetWindowPos(句柄, 0, x, y, w, h, wFlags.SWP_NOZORDER);

      }

      /// summary

      /// 调整指定 「 see cref="IntPtr"/ 句柄」 窗体的位置。

      /// /summary

      /// param name="句柄"指定 「 see cref="IntPtr"/ 句柄」 窗体/param

      /// param name="x"横坐标/param

      /// param name="y"纵坐标/param

      public static int 调整窗体位置(IntPtr 句柄, int x, int y) {

          return API_窗口.SetWindowPos(句柄, 0, x, y, 0, 0, wFlags.SWP_NOSIZE | wFlags.SWP_NOZORDER);

      }

vb.net窗口外观的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet mdi窗体、vb.net窗口外观的信息别忘了在本站进行查找喔。