VS2010(VB语言)怎么关闭多个窗体
使用:
End
'点击右上角X触发下面的事件
Private Sub Form_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Disposed
Form1.Close()'关闭窗口form1
End Sub
如“chinaboyzyq ”所说,关闭了form1,就会整个程序都退出了。只要在form2和form3里都增加这段程序,点击窗口X时就会退出程序
不可能啦啊,照理说你关掉Form1后程序就会关闭了
用 end 关闭
vb中怎样使一个窗体关闭的时候关闭其他所有窗体~
Visual Studio 2010旗舰版怎么不能在Win7下安装?
Visual Studio 2010旗舰版时可以在Win7下安装的。正确安装步骤如下:1、双击应用程序后,打开界面,选择安装选项。2、取消图中右侧的勾选,然后下一步。3、阅读软件的许可协议,选中图中的我同意选项。4、选择安装功能默认完全安装,选择安装路径后,继续。5、接着就是等待组件安装了,耐心等待系统自动...
vs2010 vb 如何使用MouseDown函数??
WithEvents 关键字指示被声明的对象变量引用可以引发事件的类实例。WithEvents 关键字用于下面的上下文中:Dim 语句 Dim [WithEvents] varname[([subscripts])] [As [New] type] [, [WithEvents] varname[([subscripts])] [As [New] type]] . . .Dim 语句的语法包含下面部分:部分 描述 With...
vs2010 VB 匹配括号内容但不包含括号
下面程序已经过调试,可正常使用 str1 = "新方案(gfgfgfg3)6"str2 = ""plag = 0 '未遇到左括号 For i = 1 To Len(str1) ;扫描整个串 If Mid(str1, i, 1) = "(" Then '左括号,标记遇到 plag = 1 ElseIf Mid(str1, i, 1) = ")" Then ‘右括号,字符串截取完成...
VB6.0的工程如何转换到VS2010下使用?
不可能转换 只有自己重新编写。但是如果同时安装了VB6.0和2005,可以用2005中的升级向导对VB6.0的工程进行升级。重新编写时会省事一些。我不知2010中是否有升级向导。
vb.net编程(环境:vs2010)我想在任务管理器中隐藏我的程序,怎么做?
'首先 me.windowsState=Minimized me.ShowInTaskbar = False '因为窗体会出现在AIL+Tab应用程序切换列表中 me.Visible=False 有问题留言
VS2010的VB里面GetPrivateProfileString不好使了?
1. 在xp 环境下 看是否能获取到。2. 在vb6.0 下 看能否获取到。3. ini文件 不用 刻意去Create 当你往里写内容时,若不存在ini文件就直接创建了。4. GetPrivateProfileString为第三个参数参数写个值,如 GetPrivateProfileString("Global", "Dest", "没有找到", DestDir, 255, Pt & "...
VS6.0中怎么打开.vbp或.frm的VB编程文件
改名是不可以的。VBP是VB的工程文件,双击可以打开。FRM是窗体文件,一般是在VB中打开的。如果打不开,应该检查VB安装的正确与否。不行可以修复安装一次。--- 第二次答复的分割线 --- 我没看到你的问题中提到VS2010啊?VB6就是VS6.0的组件之一。.net 环境在打开VB6的工程时,会问你是否要转化升...
MicrosoftVisualBasic6与VS2010VB编程有哪些不同
很多用户好奇,MicrosoftVisualBasic6与VS2010在VB编程上有哪些区别?下面就是关于,大家可以了解一下。一、VS2010版软件VB编程中是没有Caption属性,只可以找到Text属性,即使是其他控件中如Label等控件的属性也是一样的。二、VS2010在某些控件的命名上与VB不同上图信息是VB文本输入框TextBox在VS2010中...
VS2010写VB程序出现Identifier expected 错误程序很简单不知道什么原因...
Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Form.MouseEventArgs) Handles Label1.Text = e.Y Label2.Text = e.X End Sub
VB6.0代码转化为VS2008中可以执行的
已测试,测试环境:win7+VS2010:Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Dim f As Boolean = False, a As String, b() As String Dim objWMIService As Object, colItems As Object objWMIService = GetObject("winmgmts:\\\\.\\root\\cim...
End
'点击右上角X触发下面的事件
Private Sub Form_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Disposed
Form1.Close()'关闭窗口form1
End Sub
如“chinaboyzyq ”所说,关闭了form1,就会整个程序都退出了。只要在form2和form3里都增加这段程序,点击窗口X时就会退出程序
不可能啦啊,照理说你关掉Form1后程序就会关闭了
用 end 关闭
vb中怎样使一个窗体关闭的时候关闭其他所有窗体~
很简单,代码如下:
Private Sub Form_UnLoad()
End
End Sub
FORM1的Unload里添加代码即可。
Private Sub Form_Unload(Cancel As Integer)
End '程序整个结束
End Sub
Visual Studio 2010旗舰版时可以在Win7下安装的。正确安装步骤如下:1、双击应用程序后,打开界面,选择安装选项。2、取消图中右侧的勾选,然后下一步。3、阅读软件的许可协议,选中图中的我同意选项。4、选择安装功能默认完全安装,选择安装路径后,继续。5、接着就是等待组件安装了,耐心等待系统自动...
WithEvents 关键字指示被声明的对象变量引用可以引发事件的类实例。WithEvents 关键字用于下面的上下文中:Dim 语句 Dim [WithEvents] varname[([subscripts])] [As [New] type] [, [WithEvents] varname[([subscripts])] [As [New] type]] . . .Dim 语句的语法包含下面部分:部分 描述 With...
下面程序已经过调试,可正常使用 str1 = "新方案(gfgfgfg3)6"str2 = ""plag = 0 '未遇到左括号 For i = 1 To Len(str1) ;扫描整个串 If Mid(str1, i, 1) = "(" Then '左括号,标记遇到 plag = 1 ElseIf Mid(str1, i, 1) = ")" Then ‘右括号,字符串截取完成...
不可能转换 只有自己重新编写。但是如果同时安装了VB6.0和2005,可以用2005中的升级向导对VB6.0的工程进行升级。重新编写时会省事一些。我不知2010中是否有升级向导。
'首先 me.windowsState=Minimized me.ShowInTaskbar = False '因为窗体会出现在AIL+Tab应用程序切换列表中 me.Visible=False 有问题留言
1. 在xp 环境下 看是否能获取到。2. 在vb6.0 下 看能否获取到。3. ini文件 不用 刻意去Create 当你往里写内容时,若不存在ini文件就直接创建了。4. GetPrivateProfileString为第三个参数参数写个值,如 GetPrivateProfileString("Global", "Dest", "没有找到", DestDir, 255, Pt & "...
改名是不可以的。VBP是VB的工程文件,双击可以打开。FRM是窗体文件,一般是在VB中打开的。如果打不开,应该检查VB安装的正确与否。不行可以修复安装一次。--- 第二次答复的分割线 --- 我没看到你的问题中提到VS2010啊?VB6就是VS6.0的组件之一。.net 环境在打开VB6的工程时,会问你是否要转化升...
很多用户好奇,MicrosoftVisualBasic6与VS2010在VB编程上有哪些区别?下面就是关于,大家可以了解一下。一、VS2010版软件VB编程中是没有Caption属性,只可以找到Text属性,即使是其他控件中如Label等控件的属性也是一样的。二、VS2010在某些控件的命名上与VB不同上图信息是VB文本输入框TextBox在VS2010中...
Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Form.MouseEventArgs) Handles Label1.Text = e.Y Label2.Text = e.X End Sub
已测试,测试环境:win7+VS2010:Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load Dim f As Boolean = False, a As String, b() As String Dim objWMIService As Object, colItems As Object objWMIService = GetObject("winmgmts:\\\\.\\root\\cim...