锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net激活窗体 vba激活窗体

IT技术传递

vb.net 怎样判断某个窗体是否打开Dim F1 As New Datasystem.Form2'实例化窗体
For Each na As Form In Application.OpenForms '打开窗体的集合
If na.ProductName = F1.ProductName AndAlso na.Name = F1.Name0 Then '判断程序集的产品名称和窗体名称是否已存在打开的窗体中
If na.WindowState = FormWindowState.Minimized Then'判断窗体是否最小化
na.WindowState = FormWindowState.Normal'还原窗体
End If
na.Activate() '激活窗体
Return'返回
End If
Next
F1.Show()'如果没有打开的窗体中未找到，重新打开窗体
使用VB.NET的五个技巧之窗体嵌套NET框架组件太大了 比任何以前所写的封装功能的库都要大 这样有好处 因为它大幅削减了建立应用程序所需编写的代码 但是也使我们不可能完全了解该框架组件 但是我们很容易从中找到一些技巧
窗体嵌套
经验丰富的Visual Basic开发者知道多文档界面（MDI）应用程序能够包含子窗体 那些子窗体由MDI父窗体管理 但是如果没有MDI的能力你怎样实现包含嵌套窗体？例如一个MDI子窗体也可能需要包含另一个窗体
有时能够使用用户控件（UserControl）实现这种功能 但是如果你真的需要把一个窗体嵌套进另一个窗体 有多种方法可以实现 窗体衍生自Control类 这意味着它能被放入另一个窗体的控件集合中 使用如下的逻辑
Dim f As New frmEmbed ()Me Controls Add(f)f Show()
但是很不幸 这段代码将会导致一个运行时（runtime）异常（见图 ）
图 试图把一个窗体添加到另一个窗体的控件集合时出现的运行时错误
为了避免这种异常 该窗体的TopLevel属性必须设置为False（见下面的代码）
Dim f As New frmEmbed () f TopLevel = False Me Controls Add(f) f Show()
图 显示的是使用上面的逻辑实现的一个窗体嵌入另一个窗体 嵌入的窗体有一个标题条（它的颜色是未激活的系统颜色） 因此该嵌入窗体能在容器窗体内四处拖动 在图 中 该窗体从它的开始位置（左上角）拖到了右下角
图 在容器窗体中有一个嵌入的窗体 嵌入的窗体能在容器窗体中拖动
通常在显示嵌入的窗体前先设置它的位置 这只需要简单的设置嵌入窗体的Left和Top属性 嵌入窗体的位置与容器窗体是相对的
与MDI子窗体不同 嵌入窗体能覆盖容器窗体上的控件 图 显示了它们的不同
图 嵌入窗体（左）可以覆盖容器窗体上的控件 MDI子窗体（右）不能覆盖MDI父窗体上的控件
在右边的MDI例子中 没有办法使按钮隐藏在子窗体的后面 但是在左边该按钮被嵌入窗体覆盖了
当窗体第一次被嵌入时 它将显示在容器窗体上的已存在的控件的后面 当它被点击时 它走向前台并停留在那儿 这会打扰用户 但是能通过插入下面的代码防止这种情况发生
f BringToFront（）
嵌入的窗体可以包含其它的嵌入窗体 没有实际的限制 图 显示了一个本身包含嵌入的窗体的嵌入窗体
lishixinzhi/Article/program/net/201311/12398
VB.NET的Form的所有事件名称
说明
Activated
当使用代码激活或用户激活窗体时发生 。
AutoSizeChanged
当 AutoSize 属性更改时发生 。
AutoValidateChanged
当 AutoValidate 属性更改时发生 。
BackColorChanged
当 BackColor 属性的值更改时发生 。（从 Control 继承 。）
BackgroundImageChanged
当 BackgroundImage 属性的值更改时发生 。（从 Control 继承 。）
BackgroundImageLayoutChanged
当 BackgroundImageLayout 属性更改时发生 。（从 Control 继承 。）
BindingContextChanged
当 BindingContext 属性的值更改时发生 。（从 Control 继承 。）
CausesValidationChanged

推荐阅读


上一篇：java便签代码，java代码签名

下一篇：梨花游戏角色扮演，梨花游戏角色扮演教案