扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
1、如果上一个窗体是程序的主窗体（默认是程序的第一个窗体），
十余年的昔阳网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。全网整合营销推广的优势是能够根据用户设备显示端的尺寸不同，自动调整昔阳建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联公司从事“昔阳网站设计”,“昔阳网站推广”以来，每个客户项目都认真落实执行。
则不能关闭这个窗体，只能隐藏（Me.Hide()）这个窗体，否则整
个程序就被关掉了。
2、如果上一个窗体不是程序的主窗体，可以用Me.Close()
关闭。
Dim F1 As New Datasystem.Form2 '实例化窗体
For Each na As Form In Application.OpenForms '打开窗体的集合
If na.ProductName = F1.ProductName AndAlso na.Name = F1.Name 0 Then '判断程序集的产品名称和窗体名称是否已存在打开的窗体中
If na.WindowState = FormWindowState.Minimized Then '判断窗体是否最小化
na.WindowState = FormWindowState.Normal '还原窗体
End If
na.Activate() '激活窗体
Return '返回
End If
Next
F1.Show() '如果没有打开的窗体中未找到，重新打开窗体
VB6.0打开窗体：
'Form1
Option Explicit
Private Sub Command1_Click()
Form2.Show
End Sub
VB.net打开窗体：
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Form2.Show()
End Sub
可以把想要的窗体放字典里，比如
Dictionarystring,Form dic = new ...
{
{"Form1", Form1}
}
调用：
Form f1 = dic["Form1"]
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网