锐客网

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

vb.net窗口 VBNEt窗口焦点怎么控制

IT技术Classcastexc

VB.NET命令窗口Vb不是人机对话窗口 ， 而是编程工具，可以编写代码进行调试执行或者生成可执行文件 。
用Visual Studio .Net开发"Hello World!"程序：
我们知道"Hello World"一般是命令行程序，而这种程序在Visual Studio .Net中被称为"控制台程序" 。下面是Visual Studio .Net编写控制台"Hello World！"程序的具体步骤：
（1）、启动Visual Studio .Net 。
（2）、选择菜单【文件】|【新建】|【项目】后 ， 弹出【新建项目】对话框 。
（3）、将【项目类型】设置为【Visual Basic项目】 。
（4）、将【模板】设置为【控制台应用程序】 。
（5）、在【名称】文本框中输入【Hello World】 。
（6）、在【位置】的文本框中输入【E:VS.NET项目】，然后单击【确定】按钮，则Visual Studio .Net会按照上面设定的参数创建一个控制台应用程序项目，具体如图01所示 。
图01："Hello World"控制台程序的【新建项目】界面
（7）、在【解决方案资源管理器】窗口中，双击Module1.vb文件，进入Module1.vb文件的编辑界面 。
（8）、Visual Studio .Net已经为产生Main()函数 。在系统创建的Main()函数中加入下面一行代码就可以了：
【vb.net窗口 VBNEt窗口焦点怎么控制】Console.WriteLine ("Hello World!")
（9）、选择【文件】|【保存Module1.vb】菜单或者按快捷键Ctrl＋S，保存所做的修改 。
（10）、此时单击快捷键Ctrl＋F5运行程序就可以得到图02所示运行界面：
vb.net中怎么可以让窗体全屏显示？Me.Height = My.Computer.Screen.Bounds.Height
Me.Width = My.Computer.Screen.Bounds.Width
这是设置窗体的长宽和屏幕的分辨率一样大小vb.net窗口，相当于全屏 。
如果Me.WindowState=FormWindowState.Maximized的话 ， 只是单纯的将窗体最大化，但恢复窗口大小后窗体的大小实际上还和原来一样大 。
VB.NET的特点
1.真正成为面向对象以及支持继承性的语言 。
2.窗体设计器支持可视化继承，并且包含了许多新的特性，比如自动改变窗体大小、资源本地化支持、数据类工具内在支持XML数据 。
3.直接建立在.NET的框架结构上 ， 因此开发人员可以充分利用所有.NET平台特性，也可以与其vb.net窗口他的.NET语言交互 。
4.为Windows应用程序提供了XCOPY部署，开发者不再需要为DLL的版本问题担忧 。
如何给VB.NET窗体添加子窗体？直接添加一个MID父窗体或在已有窗体的属性中找到IsMDIContainer属性，然后设置为True，然后创建第二个窗体  ， 需要加载子窗体的时候：
Dim NewMDIChild As New Form2
NewMDIChild.MdiParent = Me
NewMDIChild.Show()
Public Shared Sub CheckMDIChildForm(ByVal MDIForm As Windows.Forms.Form, ByVal MDIChildForm As Windows.Forms.Form, ByVal MDIChildFormName As String)
If MDIForm.MdiChildren.Length1 Then
'如果没有任何一个MDI子窗体，则创该MDI子窗体的窗体实例
Dim MDIChildFrm As Windows.Forms.Form = MDIChildForm ' 定义MDI子窗体
MDIChildFrm.MdiParent = MDIForm '指定父窗体
MDIChildFrm.Show() '打开窗体
Exit Sub
Else
Dim x As Integer
Dim frmyn As Boolean
For x = 0 To (MDIForm.MdiChildren.Length) - 1
Dim tempChild As Windows.Forms.Form = CType(MDIForm.MdiChildren(x), Windows.Forms.Form)
If tempChild.Name = MDIChildFormName Then
'检测到有该MDI子窗体，设为激活 并退出循环
frmyn = True
tempChild.BringToFront()
Exit For
Else
frmyn = False
End If
Next
If Not frmyn Then
'在打开的窗体中没检测到则新建
Dim MDIChildFrm As Windows.Forms.Form = MDIChildForm ' 定义MDI子窗体

推荐阅读


上一篇：哪个文件是mysql的参数文件，mysql数据库文件在哪个目录

下一篇：区块链应用需要多久培训，区块链培训内容