vb点虐窗体程序开头 vba简单窗体实例

VB点虐如何设置程序运行时最先打开的窗体？

你是不是用的Visual Studio来开发的？如果是，这样操作：打开项目菜单中的 XXX属性，在弹出的属性页选择最上面那个应用程序标签，里面有个启动窗体，你选择一下就可以了。

目前成都创新互联已为上千的企业提供了网站建设、域名、网站空间、网站改版维护、企业网站设计、凤山网站维护等服务，公司将坚持客户导向、应用为本的策略，正道将秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。

如果你不是用的visual Studio来开发的，那么可以考虑把另外一个窗口的visible属性先设置为false或者把你要显示的窗口改为对话框的形式，大小比另外一个窗口大一点或者一样（即模态窗口，必须关闭才能继续操作），这样都可以实现你要的效果。

你可以这样做，设置窗体的TopMost 属性为真！

Me.TopMost = True

Form.TopMost 属性

获取或设置一个值，指示该窗体是否应显示为最顶层窗体。

方法如下：

1、打开例1.1创建的工程。

2、选择窗体Form1并双击该窗体，出现窗体的调事件的过程代码体。

3、在窗体调用的过程代码体中编制如下过程代码：

Private Sub Form_Load()

Form1.Width = 4860

Form1.Height = 2520

End Sub

4、设置窗体Form1的SartUpPosition属性为2-屏幕中心，这样运行窗体可以发现，屏幕的大小与例1.6中通过属性设置的大小是一致的。

你把代码写在 Activated 事件中试验一下，写在 Load 事件中肯定不能隐藏form1窗体。

Private Sub Form1_Activated(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Activated

Me.Hide()

Form2.Show()

End Sub

至于一关闭form1整个程序就会关闭，是因为你的form1是主窗体，你找到Application.Designer.vb这个文件，默认应该都有，这里面有这样的代码

Global.System.Diagnostics.DebuggerStepThroughAttribute() _

Protected Overrides Sub OnCreateMainForm()

Me.MainForm = Global.WindowsApplication1.Form1

End Sub

从代码Me.MainForm = Global.WindowsApplication1.Form1中可以看出Form1()是主窗体，如果你想改变主窗体，那么只要修改对应的Form。

标题名称：vb点虐窗体程序开头 vba简单窗体实例
标题URL：http://ybzwz.com/article/ddjojjc.html